CVS: sbcl package-data-list.lisp-expr,1.177,1.178 version.lisp-expr,1.557,1.558

Update of /cvsroot/sbcl/sbcl
In directory usw-pr-cvs1:/tmp/cvs-serv17267

Modified Files:
        package-data-list.lisp-expr version.lisp-expr 
Log Message:
0.7.8.6:
        made the debugger no longer rebind *PRINT-PRETTY*, since it
                made it unnecessarily difficult to debug problems
                involving PRINT-OBJECT bugs, and was just too DWIMish 
        As long as I'm killing DWIMish things in INVOKE-DEBUGGER,
                comment out the sigsetmask(0).
        As long as as I'm cleaning up pretty-printer-related stuff,
                get rid of *PRETTY-PRINTER* too. (Since in ANSI the
                pretty printer is not an optional add-on, we shouldn't
                need the Spice-Lisp-ish hook to support the addition
                of a pretty printer.)


Index: package-data-list.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/package-data-list.lisp-expr,v
retrieving revision 1.177
retrieving revision 1.178
diff -u -d -r1.177 -r1.178
--- package-data-list.lisp-expr 23 Sep 2002 16:18:12 -0000      1.177
+++ package-data-list.lisp-expr 29 Sep 2002 18:48:53 -0000      1.178
@@ -963,7 +963,7 @@
              "*CURRENT-LEVEL-IN-PRINT*" "*EMPTY-TYPE*"
              "*GC-INHIBIT*"
              "*NEED-TO-COLLECT-GARBAGE*"
-             "*PRETTY-PRINTER*" "*CONTROL-STACK-EXHAUSTION-SAP*"
+             "*CONTROL-STACK-EXHAUSTION-SAP*"
             "*UNIVERSAL-TYPE*" "*UNIVERSAL-FUN-TYPE*"
              "*UNPARSE-FUN-TYPE-SIMPLIFY*" "*WILD-TYPE*"
              "32BIT-LOGICAL-AND" "32BIT-LOGICAL-ANDC1"
@@ -1466,7 +1466,9 @@
     :name "SB!PRETTY"
     :doc "private: implementation of pretty-printing"
     :use ("CL" "SB!EXT" "SB!INT" "SB!KERNEL")
-    :export ("PRETTY-STREAM" "PRETTY-STREAM-P" "!PPRINT-COLD-INIT"))
+    :export ("OUTPUT-PRETTY-OBJECT"
+            "PRETTY-STREAM" "PRETTY-STREAM-P"
+            "!PPRINT-COLD-INIT"))
 
  #s(sb-cold:package-data
     :name "SB!PROFILE"

Index: version.lisp-expr
===================================================================
RCS file: /cvsroot/sbcl/sbcl/version.lisp-expr,v
retrieving revision 1.557
retrieving revision 1.558
diff -u -d -r1.557 -r1.558
--- version.lisp-expr   29 Sep 2002 07:03:19 -0000      1.557
+++ version.lisp-expr   29 Sep 2002 18:48:53 -0000      1.558
@@ -18,4 +18,4 @@
 ;;; internal versions off the main CVS branch, it gets hairier, e.g.
 ;;; "0.pre7.14.flaky4.13".)
 
-"0.7.8.5"
+"0.7.8.6"



-------------------------------------------------------
This sf.net email is sponsored by:ThinkGeek
Welcome to geek heaven.
http://thinkgeek.com/sf