aboutsummaryrefslogtreecommitdiff
path: root/src/interp/termrw.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/termrw.boot')
-rw-r--r--src/interp/termrw.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/termrw.boot b/src/interp/termrw.boot
index 937dcdf4..7d018dc5 100644
--- a/src/interp/termrw.boot
+++ b/src/interp/termrw.boot
@@ -110,7 +110,7 @@ mergeSubs(S1,S2) ==
null S2 => S1
S3 := [p for p in S2 | not ASSQ(first p, S1)]
-- for p in S1 repeat S3:= augmentSub(first p,rest p,S3)
- APPEND(S1,S3)
+ append(S1,S3)
subCopy(t,SL) ==
-- t is any LISP structure, SL a substitution list for sharp variables