Revision: 3688 Author: ksprotte URL: http://bknr.net/trac/changeset/3688

removed again print-object hack for testing - sorry for the noise U trunk/build.lisp

Modified: trunk/build.lisp =================================================================== --- trunk/build.lisp 2008-07-30 08:31:31 UTC (rev 3687) +++ trunk/build.lisp 2008-07-30 08:42:31 UTC (rev 3688) @@ -191,11 +191,7 @@ (zerop (nth-value 8 (5am::partition-results results)))))

(defun test () - (cl-gd::load-gd-glue) - (eval '(defmethod print-object :around ((object t) stream) - (handler-case - (call-next-method) - (error (c) (print-unreadable-object (object stream :type t :identity t)))))) + (cl-gd::load-gd-glue) (format t "~&;;; --- running tests~%") (run-tests #+(or)