aboutsummaryrefslogtreecommitdiff
path: root/src/interp/compiler.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/compiler.boot')
-rw-r--r--src/interp/compiler.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/compiler.boot b/src/interp/compiler.boot
index c6841f5b..8915a10b 100644
--- a/src/interp/compiler.boot
+++ b/src/interp/compiler.boot
@@ -1243,7 +1243,7 @@ coerceExtraHard(T is [x,m',e],m) ==
m' is ['Record,:.] and m = $Expression =>
[['coerceRe2E,x,['ELT,COPY m',0]],m,e]
belongsTo?(m',["UnionType"],e) and hasUniqueCaseView(x,m,e) =>
- coerceByModemap(T,m)
+ autoCoerceByModemap(T,m)
nil
++ returns true if mode `m' is known to belong to category `cat' in