diff options
Diffstat (limited to 'src/interp/i-analy.boot')
| -rw-r--r-- | src/interp/i-analy.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-analy.boot b/src/interp/i-analy.boot index c54043c5..862f4212 100644 --- a/src/interp/i-analy.boot +++ b/src/interp/i-analy.boot @@ -757,7 +757,7 @@ bottomUpFormRetract(t,op,opName,argl,amsl) == ms := [m, :ms] b:= true m.first := objMode(object) - ms := [COPY_-TREE m, :ms] + ms := [copyTree m, :ms] putAtree(x,'retracted,true) putValue(x,object) putModeSet(x,[objMode(object)]) |