[Ecls-list] swank-ecl.lisp call-with-compilation-hooks

[Matthew Mondor]

(defimplementation call-with-compilation-hooks (function)
  #-ecl-bytecmp
  (funcall function)
  #-ecl-bytecmp
  (handler-bind ((c:compiler-message #'handle-compiler-message))
    (funcall function)))

It seems that the function above is called twice; I suppose that one of
both #-ecl-bytecmp should be #+ecl-bytecmp?

Thanks,
-- 
Matt