X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fcode%2Fgc.lisp;h=6cd611a3497ed625526e56905c8daaefe0a4a218;hb=a30fb4f28fb891abc98eee8fdf99c2dbed2129de;hp=27d08c79210dc37d15b8adf61f5f607ec5c90fb7;hpb=5dc28680e9cb2d598da02aed512aa49ea81fdade;p=sbcl.git diff --git a/src/code/gc.lisp b/src/code/gc.lisp index 27d08c7..6cd611a 100644 --- a/src/code/gc.lisp +++ b/src/code/gc.lisp @@ -374,7 +374,7 @@ (incf *gc-run-time* (- (get-internal-run-time) start-time)))) ;; FIXME: should probably return (VALUES), here and in RETURN-FROM - (/show "returning from tail of SUB-GC") + (/show0 "returning from tail of SUB-GC") nil) ;;; This routine is called by the allocation miscops to decide whether