From e3790da8fee54ede09e8126213a10da0aa555d06 Mon Sep 17 00:00:00 2001
From: dos-reis <gdr@axiomatics.org>
Date: Sun, 15 May 2011 03:06:56 +0000
Subject: cleanup

---
 src/interp/nrunfast.boot | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

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

diff --git a/src/interp/nrunfast.boot b/src/interp/nrunfast.boot
index 834e2432..8962ebf9 100644
--- a/src/interp/nrunfast.boot
+++ b/src/interp/nrunfast.boot
@@ -89,7 +89,7 @@ getOpCode(op,vec,max) ==
 
 evalSlotDomain(u,dollar) ==
   $returnNowhereFromGoGet: local := false
-  $ : fluid := dollar                      -- ??? substitute
+  $: local := dollar                      -- ??? substitute
   $lookupDefaults : local := false -- new world
   u is '$ => dollar
   u is "$$" => dollar
@@ -607,7 +607,7 @@ newExpandLocalTypeArgs(u,dollar,domain,typeFlag) ==
   newExpandLocalTypeForm(u,dollar,domain)
  
 nrtEval(expr,dom) ==
-  $:fluid := dom             --??? this should be a substitute
+  $: local := dom             --??? this should be a substitute
   eval expr
  
 domainVal(dollar,domain,index) ==
-- 
cgit v1.2.3