aboutsummaryrefslogtreecommitdiff
path: root/src/interp/c-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/c-util.boot')
-rw-r--r--src/interp/c-util.boot3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot
index 4b3647d3..65636852 100644
--- a/src/interp/c-util.boot
+++ b/src/interp/c-util.boot
@@ -155,8 +155,7 @@ consProplistOf(var,proplist,prop,val) ==
[[prop,:val],:proplist]
warnLiteral x ==
- stackSemanticError(['%b,x,'%d,
- '"is BOTH a variable and a literal"],nil)
+ stackWarning('"%1b is BOTH a variable a literal",[x])
intersectionEnvironment(e,e') ==
ce:= makeCommonEnvironment(e,e')