diff options
Diffstat (limited to 'src/interp/parse.boot')
-rw-r--r-- | src/interp/parse.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/parse.boot b/src/interp/parse.boot index 52d29596..49aee33f 100644 --- a/src/interp/parse.boot +++ b/src/interp/parse.boot @@ -234,7 +234,7 @@ parseHas [x,y] == if $InteractiveMode then x:= get(x,'value,$CategoryFrame) is [D,m,.] - and m in '((Mode) (Domain) (SubDomain (Domain))) => D + and m in $LangSupportTypes => D parseType x mkand [["has",x,u] for u in fn y] where mkand x == @@ -256,7 +256,7 @@ parseHas [x,y] == parseHasRhs u == --$InteractiveMode = true get(u,'value,$CategoryFrame) is [D,m,.] - and m in '((Mode) (Domain) (SubDomain (Domain))) => m + and m in $LangSupportTypes => m y := abbreviation? u => loadIfNecessary y => [unabbrevAndLoad y] [["ATTRIBUTE",u]] |