diff options
Diffstat (limited to 'src/interp/i-coerce.boot')
-rw-r--r-- | src/interp/i-coerce.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/i-coerce.boot b/src/interp/i-coerce.boot index 823e6df4..bd11d794 100644 --- a/src/interp/i-coerce.boot +++ b/src/interp/i-coerce.boot @@ -927,7 +927,7 @@ coerceSubDomain(val, tSuper, tSub) == getSubDomainPredicate(tSuper, tSub, pred) == predfn := HGET($superHash, [tSuper,:tSub]) => predfn - arg := GENSYM() + arg := gensym() predfn := COMPILE(nil,["LAMBDA",[arg],substitute(arg,"#1", pred)]) HPUT($superHash, [tSuper,:tSub], predfn) predfn |