|
[Sbcl-commits] CVS: sbcl/contrib stale-symbols.lisp,1.2,1.3
From: William Harold Newman <wnewman@us...> - 2003-12-18 01:05
|
Update of /cvsroot/sbcl/sbcl/contrib
In directory sc8-pr-cvs1:/tmp/cvs-serv30619/contrib
Modified Files:
stale-symbols.lisp
Log Message:
0.8.6.40:
merged patch from Marco Baringer (sbcl-devel 2003-12-02) to
allow (TRACE "MY-PACKAGE-NAME")
collapsed IF clause at the end of EXPAND-TRACE, since SBCL now
always has a compiler and shouldn't need to worry about
supporting interpreter-only environments
Index: stale-symbols.lisp
===================================================================
RCS file: /cvsroot/sbcl/sbcl/contrib/stale-symbols.lisp,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -d -r1.2 -r1.3
--- stale-symbols.lisp 24 Oct 2002 16:24:10 -0000 1.2
+++ stale-symbols.lisp 18 Dec 2003 01:05:19 -0000 1.3
@@ -71,7 +71,8 @@
(length static-space-refs)
(length dynamic-space-refs)))
(format t "Symbol ~a::~a~%"
- (and (symbol-package obj) (package-name (symbol-package obj)))
+ (and (symbol-package obj)
+ (package-name (symbol-package obj)))
(symbol-name obj))
(unless (null read-only-space-refs)
(princ " Reference in read-only space: ")
|
| Thread | Author | Date |
|---|---|---|
| [Sbcl-commits] CVS: sbcl/contrib stale-symbols.lisp,1.2,1.3 | William Harold Newman <wnewman@us...> |