aboutsummaryrefslogtreecommitdiff
path: root/src/interp/nrunfast.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/nrunfast.boot')
-rw-r--r--src/interp/nrunfast.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/nrunfast.boot b/src/interp/nrunfast.boot
index a2cbd0a3..c160002f 100644
--- a/src/interp/nrunfast.boot
+++ b/src/interp/nrunfast.boot
@@ -403,7 +403,7 @@ lazyMatch(source,lazyt,dollar,domain) ==
lazyMatchArgDollarCheck(s,d,dollarName,domainName) ==
#s ~= #d => nil
scoSig :=
- s.op in '(Union Mapping Record) => [true for x in s.args]
+ s.op in '(Union Mapping Record _:) => [true for x in s.args]
getDualSignature s.op or return nil
and/[fn for x in s.args for arg in d.args for xt in scoSig] where
fn() ==