aboutsummaryrefslogtreecommitdiff
path: root/src/interp/wi2.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/wi2.boot')
-rw-r--r--src/interp/wi2.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/wi2.boot b/src/interp/wi2.boot
index d0265132..781c9e63 100644
--- a/src/interp/wi2.boot
+++ b/src/interp/wi2.boot
@@ -1096,7 +1096,7 @@ doItExpression(item,T) ==
wiReplaceNode(item,code, 22)
wiReplaceNode(node,ocode,key) ==
- ncode := CONS(first ocode, rest ocode)
+ ncode := [first ocode,:rest ocode]
code := replaceNodeInStructureBy(node,ncode)
SETQ($NODE,COPY node)
SETQ($NODE1, COPY first code)