aboutsummaryrefslogtreecommitdiff
path: root/src/interp/wi1.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/wi1.boot')
-rw-r--r--src/interp/wi1.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/wi1.boot b/src/interp/wi1.boot
index bb772e94..d3a43e8f 100644
--- a/src/interp/wi1.boot
+++ b/src/interp/wi1.boot
@@ -808,7 +808,7 @@ coerce(T,m) ==
'"function coerce called from the interpreter."])
--==================> changes <======================
--The following line is inappropriate for our needs:::
---rplac(second T,substitute("$",$Rep,second T))
+--T.rest.first := substitute("$",$Rep,second T)
T' := coerce0(T,m) => T'
T := [T.expr,fullSubstitute("$",$Representation,T.mode),T.env]
--==================> changes <======================