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


When trying to reduce
https://rt.perl.org/rt3//Public/Bug/Display.html?id=101562,
I hit another(?) bug.


In rakudo nom 9c3d3d103a52b7fdaa847ae1e001229a6e841ff1


$ cat h.p6  Q:PIR {  say 'hi'    }; $ perl6 h.p6hi$ perl6
hi.p6===SORRY!===error:imcc:syntax error, unexpected '\n'       in file
'(file unknown)' line 237
$ cat hi.p6sub a {   Q:PIR {  say 'hi'    }; } $$ perl6 --target=pir
hi.p6  > hi.pir; parrot hi.pirerror:imcc:syntax error, unexpected
'\n'    in file 'hi.pir' line 258
current instr.: '__default_get_packfile' pc 428 (frontend/parrot2/prt0.pir:217)

Looking at hi.pir starting line 257, I see that the
perl6_decontainerize_return_value instruction is incorrect. Note the
trailing comma.


  say 'hi'
  perl6_decontainerize_return_value $P100,


According to the source in src/ops/perl6.ops it expects an argument
which is missing
  inline op perl6_decontainerize_return_value(out PMC, in PMC) :base_core {




-- 
cognominal stef

Reply via email to