diff options
Diffstat (limited to 'src/interp/i-analy.boot')
-rw-r--r-- | src/interp/i-analy.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/i-analy.boot b/src/interp/i-analy.boot index 5b1997b2..361afc75 100644 --- a/src/interp/i-analy.boot +++ b/src/interp/i-analy.boot @@ -290,9 +290,9 @@ bottomUpCompilePredicate(pred, name) == bottomUpIdentifier(t,id) == m := isType t => bottomUpType(t, m) EQ(id,'noMapVal) => throwKeyedMsg('"S2IB0002",NIL) - EQ(id,'noBranch) => + EQ(id,'%noBranch) => keyedSystemError("S2GE0016", - ['"bottomUpIdentifier",'"trying to evaluate noBranch"]) + ['"bottomUpIdentifier",'"trying to evaluate %noBranch"]) transferPropsToNode(id,t) defaultType := ['Variable,id] -- This was meant to stop building silly symbols but had some unfortunate |