diff options
Diffstat (limited to 'src/interp/ht-root.boot')
-rw-r--r-- | src/interp/ht-root.boot | 2 |
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] |