diff options
Diffstat (limited to 'src/interp/c-util.boot')
| -rw-r--r-- | src/interp/c-util.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot index ab41941f..8312e4b1 100644 --- a/src/interp/c-util.boot +++ b/src/interp/c-util.boot @@ -264,7 +264,7 @@ mkErrorExpr level == highlight(b,a) == atom b => substitute(var,b,a) where - var:= INTERN strconc(STRINGIMAGE $bright,STRINGIMAGE b,STRINGIMAGE $dim) + var:= makeSymbol strconc(STRINGIMAGE $bright,STRINGIMAGE b,STRINGIMAGE $dim) highlight1(b,a) where highlight1(b,a) == atom a => a |