aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-intern.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-intern.boot')
-rw-r--r--src/interp/i-intern.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-intern.boot b/src/interp/i-intern.boot
index e91f1d43..b8be53f7 100644
--- a/src/interp/i-intern.boot
+++ b/src/interp/i-intern.boot
@@ -449,9 +449,9 @@ remprop(x,prop,e) ==
e
fastSearchCurrentEnv(x,currentEnv) ==
- u:= QLASSQ(x,first currentEnv) => u
+ u:= symbolTarget(x,first currentEnv) => u
while (currentEnv:= rest currentEnv) repeat
- u:= QLASSQ(x,first currentEnv) => u
+ u:= symbolTarget(x,first currentEnv) => u
transformCollect [:itrl,body] ==
-- syntactic transformation for COLLECT form, called from mkAtree1