aboutsummaryrefslogtreecommitdiff
path: root/src/interp/define.boot
diff options
context:
space:
mode:
authordos-reis <gdr@axiomatics.org>2011-05-02 16:23:37 +0000
committerdos-reis <gdr@axiomatics.org>2011-05-02 16:23:37 +0000
commit6c36217f8a6721a3695e6c8d0b5f86401b5ed18b (patch)
tree8c2aa73f3e0dbb7aab710621e72707cf27d74c36 /src/interp/define.boot
parente694e02b3c8e9ae322df7440a29c3011a11503e7 (diff)
downloadopen-axiom-6c36217f8a6721a3695e6c8d0b5f86401b5ed18b.tar.gz
more cleanups
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