Fudge typing on Match.synthetic

sorear · Jan 27, 2012 · 2537901 · 2537901
1 parent bef38b1
commit 2537901
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/lib/CORE.setting b/lib/CORE.setting
@@ -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})
         };
     }