aboutsummaryrefslogtreecommitdiff
path: root/src/interp/i-spec1.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/i-spec1.boot')
-rw-r--r--src/interp/i-spec1.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-spec1.boot b/src/interp/i-spec1.boot
index 1ab11dc0..444cb15f 100644
--- a/src/interp/i-spec1.boot
+++ b/src/interp/i-spec1.boot
@@ -79,7 +79,7 @@ upADEF t ==
$compilingMap : local := true
-- if there is a predicate, merge it in with the body
- if pred ^= true then body := ['IF,pred,body,'noMapVal]
+ if pred ^= true then body := ['IF,pred,body,'%noMapVal]
tar := getTarget t
null m and tar is ['Mapping,.,:argTypes] and (#vars = #argTypes) =>