aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-analy.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-analy.boot')
-rw-r--r--src/interp/i-analy.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-analy.boot b/src/interp/i-analy.boot
index 4a66b64b..e0624236 100644
--- a/src/interp/i-analy.boot
+++ b/src/interp/i-analy.boot
@@ -513,7 +513,7 @@ bottomUpForm(t,op,opName,argl,argModeSetList) ==
bottomUpForm2(t,op,opName,argl,argModeSetList)
bottomUpForm3(t,op,opName,argl,argModeSetList) ==
- $origArgModeSetList:local := COPY argModeSetList
+ $origArgModeSetList:local := copyTree argModeSetList
bottomUpForm2(t,op,opName,argl,argModeSetList)
bottomUpForm2(t,op,opName,argl,argModeSetList) ==