diff options
Diffstat (limited to 'src/interp/category.boot')
| -rw-r--r-- | src/interp/category.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/category.boot b/src/interp/category.boot index cdfc9958..c5d4fbfe 100644 --- a/src/interp/category.boot +++ b/src/interp/category.boot @@ -116,7 +116,7 @@ mkCategory(domainOrPackage,sigList,attList,domList,principal) == categoryAttributes(v) := attList categoryRef(v,3) := $Category if principal ~= nil then - for x in 6..#principal-1 repeat + for x in $NRTbase..#principal-1 repeat categoryRef(v,x) := categoryRef(principal,x) categoryAssociatedTypes(v) := [categoryPrincipals principal, |