Skip to content
Snippets Groups Projects
Commit c638d7bd authored by wlott's avatar wlott
Browse files

Was testing the wrong special in ROOM when printing out whether or not the

garbage collector was enabled.
parent ddc9620a
No related branches found
No related tags found
No related merge requests found
......@@ -7,7 +7,7 @@
;;; Scott Fahlman or slisp-group@cs.cmu.edu.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/gc.lisp,v 1.12 1992/03/26 03:24:14 wlott Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/gc.lisp,v 1.13 1992/03/26 05:55:23 wlott Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -88,8 +88,8 @@
(format t "Control Stack Usage: ~10:D bytes.~%" (control-stack-usage))
(format t "Binding Stack Usage: ~10:D bytes.~%" (binding-stack-usage))
(format t "The current dynamic space is ~D.~%" (current-dynamic-space))
(format t "Garbage collection is currently ~:[DISABLED~;enabled.~]~%"
*gc-trigger*))
(format t "Garbage collection is currently ~:[enabled~;DISABLED~].~%"
*gc-inhibit*))
(defun room-intermediate-info ()
(room-minimal-info)
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment