Fix issue #7 - add evaluation control for CCL.

pnathan · Jul 19, 2015 · 53badf7 · 53badf7
1 parent c744435
commit 53badf7
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/cl-ansi-text.lisp b/cl-ansi-text.lisp
@@ -33,7 +33,7 @@
 ;;;
 ;;; At least from the thread "Compiler problem, MCL 3.9" by Arthur
 ;;; Cater around '96.
-#+ccl(common-lisp:eval-when (:compile-toplevel)
+#+ccl(common-lisp:eval-when (:compile-toplevel :load-toplevel :execute)
        (defmethod make-load-form ((obj cl-colors:rgb )  &optional env)
 	 (make-load-form-saving-slots obj)))