[perl #61532] Method declaration not parsed correctly when invocant present

[via RT]

# New Ticket Created by  Cory Spencer 
# Please include the string:  [perl #61532]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=61532 >



The following code:

   class Array is also {
     method splice(@array: $offset = 0, Int $size? = 0, *...@values) {
       say "Splicing array: offset = $offset, size = $size";
     }
   };

   (1..10).splice(1, 1);

does not parse the method declaration correctly.  The $offset 
(and subsequent) parameter will not be defined in the method body:

   Scope not found for PAST::Var '$offset'
   current instr.: 'parrot;PCT;HLLCompiler;panic' pc 146
     (src/PCT/HLLCompiler.pir:102)
   called from Sub 'parrot;PAST;Compiler;post_children' pc 1991
     (src/PAST/Compiler.pir:411)
   called from Sub 'parrot;PAST;Compiler;call' pc 4191
     (src/PAST/Compiler.pir:1088)
   called from Sub 'parrot;PAST;Compiler;post_children' pc 1991
     (src/PAST/Compiler.pir:411)
   ...
   ...