diff options
Diffstat (limited to 'src/interp/g-cndata.boot')
-rw-r--r-- | src/interp/g-cndata.boot | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/interp/g-cndata.boot b/src/interp/g-cndata.boot index ff50bc36..ea0c974c 100644 --- a/src/interp/g-cndata.boot +++ b/src/interp/g-cndata.boot @@ -33,6 +33,7 @@ import sys_-macros +import c_-util namespace BOOT --% Manipulation of Constructor Datat @@ -90,8 +91,8 @@ packageForm? d == categoryFrom?: %Form -> %Boolean categoryForm? c == op := opOf c - symbolMember?(op, $CategoryNames) => true - getConstructorKindFromDB op = "category" => true + builtinCategoryName? op => true + getConstructorKindFromDB op is "category" => true false -- probably will switch over to 'libName soon |