aboutsummaryrefslogtreecommitdiff
path: root/src/interp/htsetvar.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/htsetvar.boot')
-rw-r--r--src/interp/htsetvar.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/htsetvar.boot b/src/interp/htsetvar.boot
index 614b24a5..8c1af47e 100644
--- a/src/interp/htsetvar.boot
+++ b/src/interp/htsetvar.boot
@@ -430,7 +430,7 @@ htCacheSet htPage ==
num := chkAllNonNegativeInteger
htpLabelInputString(htPage,htMakeLabel('"c",i))
$cacheAlist := ADDASSOC(makeSymbol name,num,$cacheAlist)
- if (n := LASSOC('all,$cacheAlist)) then
+ if (n := symbolLAssoc('all,$cacheAlist)) then
$cacheCount := n
$cacheAlist := deleteAssoc('all,$cacheAlist)
htInitPage('"Cache Summary",nil)