diff options
| author | dos-reis <gdr@axiomatics.org> | 2011-04-20 21:49:59 +0000 |
|---|---|---|
| committer | dos-reis <gdr@axiomatics.org> | 2011-04-20 21:49:59 +0000 |
| commit | 1e67a3445ddda759c38b455494350ed00390d73f (patch) | |
| tree | 720721577c197b4ff455f25ad767c9a8de5c5d94 /src/interp/htsetvar.boot | |
| parent | 517b9dd50dcdf3f7881d5f682e8217174d03a211 (diff) | |
| download | open-axiom-1e67a3445ddda759c38b455494350ed00390d73f.tar.gz | |
more cleanup
Diffstat (limited to 'src/interp/htsetvar.boot')
| -rw-r--r-- | src/interp/htsetvar.boot | 2 |
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) |