diff options
Diffstat (limited to 'src/interp/clam.boot')
| -rw-r--r-- | src/interp/clam.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/clam.boot b/src/interp/clam.boot index ae13ae5f..98986f85 100644 --- a/src/interp/clam.boot +++ b/src/interp/clam.boot @@ -358,8 +358,8 @@ clearCategoryCaches() == if getConstructorKindFromDB name = "category" then if BOUNDP(cacheName:= mkCacheName name) then symbolValue(cacheName) := nil - if BOUNDP(cacheName:= mkDomainCatName name) - then symbolValue(cacheName) := nil + db := constructorDB name => + dbTemplate(db) := nil clearCategoryCache catName == symbolValue(mkCacheName catName) := nil |