diff options
Diffstat (limited to 'src/interp/g-cndata.boot')
| -rw-r--r-- | src/interp/g-cndata.boot | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/src/interp/g-cndata.boot b/src/interp/g-cndata.boot index 52d2040a..d90b5ef3 100644 --- a/src/interp/g-cndata.boot +++ b/src/interp/g-cndata.boot @@ -169,9 +169,8 @@ isNameOfType x == $doNotAddEmptyModeIfTrue:local:= true (val := get(x,'value,$InteractiveFrame)) and (domain := objMode val) and - member(domain,$LangSupportTypes) => true - y := opOf unabbrev x - constructor? y + listMember?(domain,$LangSupportTypes) => true + constructor? opOf unabbrev x unabbrev1(u,modeIfTrue) == atom u => |