aboutsummaryrefslogtreecommitdiff
path: root/src/interp/g-cndata.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/g-cndata.boot')
-rw-r--r--src/interp/g-cndata.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/g-cndata.boot b/src/interp/g-cndata.boot
index 96060aef..52d2040a 100644
--- a/src/interp/g-cndata.boot
+++ b/src/interp/g-cndata.boot
@@ -69,7 +69,7 @@ putConstructorProperty(name,prop,val) ==
true
attribute? name ==
- MEMQ(name, $BuiltinAttributes)
+ symbolMember?(name, $BuiltinAttributes)
abbreviation? abb ==
-- if it is an abbreviation, return the corresponding name
@@ -90,7 +90,7 @@ packageForm? d ==
categoryFrom?: %Form -> %Boolean
categoryForm? c ==
op := opOf c
- MEMQ(op, $CategoryNames) => true
+ symbolMember?(op, $CategoryNames) => true
getConstructorKindFromDB op = "category" => true
false