(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,