aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--src/interp/ChangeLog4
-rw-r--r--src/interp/macros.lisp2
2 files changed, 5 insertions, 1 deletions
diff --git a/src/interp/ChangeLog b/src/interp/ChangeLog
index 60c5597e..53530f5f 100644
--- a/src/interp/ChangeLog
+++ b/src/interp/ChangeLog
@@ -1,5 +1,9 @@
2007-10-14 Gabriel Dos Reis <gdr@cs.tamu.edu>
+ * macros.lisp (SETANDFILE): Use defparameter, not setq.
+
+2007-10-14 Gabriel Dos Reis <gdr@cs.tamu.edu>
+
* Makefile.pamphlet (${DEPSYS}): Depend on g-error.$(FASLEXT),
g-boot.$(FASLEXT), c-util.$(FASLEXT), clam.$(FASLEXT),
slam.$(FASLEXT).
diff --git a/src/interp/macros.lisp b/src/interp/macros.lisp
index b46f1864..8c5c16c6 100644
--- a/src/interp/macros.lisp
+++ b/src/interp/macros.lisp
@@ -60,7 +60,7 @@
; 5.3 Top-Level Forms
-(defun SETANDFILE (x y) (LAM\,EVALANDFILEACTQ `(setq ,x ',y)))
+(defun SETANDFILE (x y) (LAM\,EVALANDFILEACTQ `(defparameter ,x ',y)))
; 5.3.2 Declaring Global Variables and Named Constants