Permalink
Browse files

Fudge typing on Match.synthetic

  • Loading branch information...
1 parent bef38b1 commit 2537901c39d70ced0326181dd8999943f2c1e1f9 @sorear committed Jan 27, 2012
Showing with 2 additions and 2 deletions.
  1. +2 −2 lib/CORE.setting
View
@@ -2523,15 +2523,15 @@ my class Match is Cool does Associative does Positional {
method CURSOR() { Q:CgOp { (ns (cursor_unmatch (cast cursor (@ {self})))) } }
method cursor() { Q:CgOp { (ns (cursor_unmatch (cast cursor (@ {self})))) } }
method reduced() { Q:CgOp { (box Str (cursor_reduced (cast cursor (@ {self})))) } }
- method synthetic(:$cursor!, :$method = "", :@captures, :$from!, :$to!) {
+ method synthetic(:$cursor!, :$method = "", :$captures, :$from!, :$to!) {
my $*match;
Q:CgOp {
(prog
(cursor_synthetic
(cast cursor (@ {$cursor})) (obj_getstr {$method})
(cast int (obj_getnum {$from}))
(cast int (obj_getnum {$to}))
- {@captures})
+ {@$captures})
{$*match})
};
}

0 comments on commit 2537901

Please sign in to comment.