Revision: 3686 Author: ksprotte URL: http://bknr.net/trac/changeset/3686 oops - "typo" in last patch U trunk/build.lisp Modified: trunk/build.lisp =================================================================== --- trunk/build.lisp 2008-07-30 08:11:13 UTC (rev 3685) +++ trunk/build.lisp 2008-07-30 08:20:42 UTC (rev 3686) @@ -192,9 +192,8 @@ (defun test () (cl-gd::load-gd-glue) - (compile - (eval '(defmethod print-object :around ((object t) stream) - (print-unreadable-object (object stream :type t :identity t))))) + (eval '(defmethod print-object :around ((object t) stream) + (print-unreadable-object (object stream :type t :identity t)))) (format t "~&;;; --- running tests~%") (run-tests #+(or)