From 7535af091a5549487ca1333d9d52eb47f2f08778 Mon Sep 17 00:00:00 2001
From: wlott <wlott>
Date: Mon, 2 Jul 1990 04:36:58 +0000
Subject: [PATCH] Removed the #+nil in front of the call to purify or gc.

---
 code/save.lisp | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/code/save.lisp b/code/save.lisp
index 1198b0d07..cb7673cce 100644
--- a/code/save.lisp
+++ b/code/save.lisp
@@ -8,7 +8,7 @@
 ;;; Scott Fahlman (FAHLMAN@CMUC). 
 ;;; **********************************************************************
 ;;;
-;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/save.lisp,v 1.1.1.2 1990/06/25 21:00:16 wlott Exp $
+;;; $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/save.lisp,v 1.1.1.3 1990/07/02 04:36:58 wlott Exp $
 ;;;
 ;;; Dump the current lisp image into a core file.  All the real work is done
 ;;; be C.
@@ -85,8 +85,6 @@
   :print-herald
       If true, print out the lisp system herald when starting."
   
-  (declare (ignore purify root-structures))
-  #+nil
   (if purify
       (purify :root-structures root-structures)
       (gc))
-- 
GitLab