From 64dee33447f6db28cfe4d6abe92e51bf4e70a2c6 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Tue, 6 May 2008 15:37:58 +0000
Subject: 	* interp/define.boot: Explicitly initialize fluid variables. 
 * interp/functor.boot: Likewise. 	* interp/g-opt.boot: Likewise. 	*
 interp/nruncomp.boot: Likewise. 	* interp/nrunfast.boot: Likewise. 
 * interp/package.boot: Likewise. 	* interp/parse.boot: Likewise. 	*
 interp/pspad1.boot: Likewise. 	* interp/record.boot: Likewise. 	*
 interp/template.boot: Likewise. 	* interp/trace.boot: Likewise. 	*
 interp/wi1.boot: Likewise. 	* interp/wi2.boot: Likewise.

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

(limited to 'src/interp/parse.boot')

diff --git a/src/interp/parse.boot b/src/interp/parse.boot
index 0a157057..0ba361ba 100644
--- a/src/interp/parse.boot
+++ b/src/interp/parse.boot
@@ -48,7 +48,7 @@ parseTransform x ==
 
 parseTran: %ParseForm -> %Form
 parseTran x ==
-  $op: local
+  $op: local := nil
   atom x => parseAtom x
   [$op,:argl]:= x
   u := g($op) where g op == (op is ["elt",op,x] => g x; op)
-- 
cgit v1.2.3