From daed04c57b8ff8c3be53a5a183635c5687ab7bf6 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Tue, 25 Mar 2008 04:07:32 +0000
Subject: 	* interp/vmlisp.lisp (DEFINE-FUNCTION): Move boot-pkg.lisp. 
 (BPINAME): Tidy. 	* interp/slam.boot (reportFunctionCompilation): Tidy. 
 * interp/daase.lisp: Don't use anachronistic SET. 	* interp/debug.lisp:
 Likewise. 	* interp/br-saturn.boot: Substitute GENSYM for GENTEMP. 
 * interp/fortcall.boot: Likewise. 	* interp/ht-util.boot: Likewise. 
 * interp/pf2sex.boot: Likewise. 	* interp/server.boot: Likewise. 
 * interp/buildom.boot (UnionEqual): Tidy. 	(coerceUn2E): Likewise. 
 * interp/boot-pkg.lisp (define-function): Define here. 	*
 interp/Makefile.pamphlet (diagnostics.$(FASLEXT)): Tidy. 
 (hash.$(FASLEXT)): Likewise. 	(vmlisp.$(FASLEXT)): Likewise. 	*
 interp/diagnostics.boot: Import "types". 	* interp/hash.lisp: Import
 "types" instead of "vmlisp". 	* interp/i-output.boot ($algebraOutput): Move
 to sys-globals.boot. 	(ERROROUTSTREAM): Likewise. 	(ERRORINSTREAM):
 Likewise. 	* interp/macros.lisp ($algebraOutputStream): Don't set here. 
 * interp/patches.lisp ($algebraOutputStream): Don't set here. 
 ($texOutputStream): Likewise. 	($fortranOutputStream): Likewise. 
 ($texOutputStream): Likewise. 	($formulaOutputStream): Likewise.

---
 src/interp/br-saturn.boot | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src/interp/br-saturn.boot')

diff --git a/src/interp/br-saturn.boot b/src/interp/br-saturn.boot
index 51f61968..fe38e3cb 100644
--- a/src/interp/br-saturn.boot
+++ b/src/interp/br-saturn.boot
@@ -631,7 +631,7 @@ htInitPageNoHeading(propList) ==
 
 --------------------> NEW DEFINITION <--------------------------
 htpMakeEmptyPage(propList,:options) ==
-  name := IFCAR options or  GENTEMP()
+  name := IFCAR options or  GENSYM()
   if not $saturn then
     $activePageList := [name, :$activePageList]
   setDynamicBinding(name, val := VECTOR(name, nil, nil, nil, nil, nil, propList, nil))
-- 
cgit v1.2.3