aboutsummaryrefslogtreecommitdiff
path: root/src/interp/c-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/c-util.boot')
-rw-r--r--src/interp/c-util.boot3
1 files changed, 1 insertions, 2 deletions
diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot
index bec24a42..29debb01 100644
--- a/src/interp/c-util.boot
+++ b/src/interp/c-util.boot
@@ -500,8 +500,7 @@ isSomeDomainVariable s ==
isSubset(x,y,e) ==
($useRepresentationHack and x="$" and y="Rep") or x=y or
LASSOC(opOf x,get(opOf y,"Subsets",e) or GETL(opOf y,"Subsets")) or
- LASSOC(opOf x,get(opOf y,"SubDomain",e)) or
- opOf(y)='Type or opOf(y)='Object
+ LASSOC(opOf x,get(opOf y,"SubDomain",e)) or opOf(y)="Type"
isDomainInScope(domain,e) ==
domainList:= getDomainsInScope e