diff options
Diffstat (limited to 'src/interp/setvars.boot')
| -rw-r--r-- | src/interp/setvars.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/setvars.boot b/src/interp/setvars.boot index b16fb1da..20e5b14b 100644 --- a/src/interp/setvars.boot +++ b/src/interp/setvars.boot @@ -694,7 +694,7 @@ countCache n == for x in l repeat not ident? x => sayKeyedMsg("S2IF0007",[x]) $cacheAlist:= insertAlist(x,n,$cacheAlist) - cacheCountName:= INTERNL(x,'";COUNT") + cacheCountName:= makeSymbol strconc(x,'";COUNT") symbolValue(cacheCountName) := n sayCacheCount(x,n) optionError(CAAR $options,nil) |