Update of /cvsroot/sbcl/sbcl/src/pcl
In directory fdv4jf1.ch3.sourceforge.com:/tmp/cvs-serv28573/src/pcl
18.104.22.168: COMPILE-FILE and toplevel symbols
* The fopcompiler elided unused symbol references completely: warn
and dump the appropriate SYMBOL-VALUE form even if the value is
unused is the variable is undefined.
* This reveals a missing start of a block comment in
src/pcl/dfun.lisp -- fix it. Did you realize that ||# reads as a
symbol? I didn't. One strike against using the "emacs friendly"
#||...||# instead of #|...|#.
* Also fix on #-sb-unicode issue in the test-suite.
RCS file: /cvsroot/sbcl/sbcl/src/pcl/dfun.lisp,v
retrieving revision 1.65
retrieving revision 1.66
diff -u -d -r1.65 -r1.66
--- dfun.lisp 30 May 2008 13:16:27 -0000 1.65
+++ dfun.lisp 17 Oct 2008 11:57:32 -0000 1.66
@@ -1790,6 +1790,7 @@
;;; I'm aware of, but they look like they might be useful for
;;; debugging or performance tweaking or something, so I've just
;;; commented them out instead of deleting them. -- WHN 2001-03-28
(defun list-dfun (gf)
(let* ((sym (type-of (gf-dfun-info gf)))
(a (assq sym *dfun-list*)))