aboutsummaryrefslogtreecommitdiff
path: root/src/interp/ht-root.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/ht-root.boot')
-rw-r--r--src/interp/ht-root.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/ht-root.boot b/src/interp/ht-root.boot
index e7ac3df1..563326d9 100644
--- a/src/interp/ht-root.boot
+++ b/src/interp/ht-root.boot
@@ -105,7 +105,7 @@ htSystemVariables() == main where
fn(rest t,gn(first t,al),firstTime)
gn(t,al) ==
[.,.,class,key,.,options,:.] := t
- not MEMQ(class,$levels) => al
+ not symbolMember?(class,$levels) => al
key = 'LITERALS or key = 'INTEGER or key = 'STRING => [[$heading,:t],:al]
key = 'TREE => fn(options,al,false)
key = 'FUNCTION => [[$heading,:t],:al]