From 5c84358bb066ac8546a90c2675f542fe1994392e Mon Sep 17 00:00:00 2001
From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Wed, 16 Jul 1997 01:46:32 +0000
Subject: [PATCH] Conditionalized EMPTY_LIST initialization for code sharing
 between 7.4 and 8.0.

---
 v7/src/microcode/boot.c | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/v7/src/microcode/boot.c b/v7/src/microcode/boot.c
index fd2bd3e7f..c003bd16d 100644
--- a/v7/src/microcode/boot.c
+++ b/v7/src/microcode/boot.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: boot.c,v 9.98 1997/07/15 22:54:57 adams Exp $
+$Id: boot.c,v 9.99 1997/07/16 01:46:32 adams Exp $
 
 Copyright (c) 1988-96 Massachusetts Institute of Technology
 
@@ -186,10 +186,16 @@ DEFUN (main_name, (argc, argv),
       Setup_Memory ((BLOCKS_TO_BYTES (Heap_Size)),
 		    (BLOCKS_TO_BYTES (Stack_Size)),
 		    (BLOCKS_TO_BYTES (Constant_Size)));
+
+#ifdef EMPTY_LIST_VALUE
+      /* EMPTY_LIST_VALUE is defined if it is teh true value for '() and
+         EMPTY_LIST is a location used to store '() or #F
+	 */
       if (option_empty_list_eq_false)
 	EMPTY_LIST = SHARP_F;
       else
 	EMPTY_LIST = EMPTY_LIST_VALUE;
+#endif
 
       initialize_primitives ();
       if (! option_fasl_file)
-- 
2.25.1