aboutsummaryrefslogtreecommitdiff
path: root/src/interp/define.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/define.boot')
-rw-r--r--src/interp/define.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/define.boot b/src/interp/define.boot
index 599e9ca4..5d3772e0 100644
--- a/src/interp/define.boot
+++ b/src/interp/define.boot
@@ -656,7 +656,7 @@ mkEvalableCategoryForm c ==
op="Join" => ["Join",:[mkEvalableCategoryForm x for x in argl]]
op is "DomainSubstitutionMacro" => mkEvalableCategoryForm second argl
op is "mkCategory" => c
- symbolMember?(op,$CategoryNames) =>
+ builtinCategoryName? op =>
([x,m,$e]:= compOrCroak(c,$EmptyMode,$e); m=$Category => x)
--loadIfNecessary op
getConstructorKindFromDB op = 'category or