p6rt
commented
10 years ago From @finanalyst
The following snippet illustrates code that a) compiles correctly b) works without perl6-debug c) will not load into perl6-debug unless the module is compiled.
The problem occurs when a 'when' clause has a comment and is followed by another 'when' or 'default' clause.
The work around is to remove or relocate the comments to the end of the 'default' clause or to the 'given' line.
As I wrote this, I realised that the module was not necessary, but the failure is more spectacular - so I left it.
All that is necessary is for a 'when' clause to have a comment on the end of the line and to be followed by another 'when' or 'default', eg.
when / ss / { say 'something' ; succeed } # comment default { say 'something else' }
This works fine when run, but causes perl6-debug to issue a 'confused' error.
In other words, it appears to be a debug bug rather than a rakudo bug.
I am using Rakudo * on Ubuntu.
$ perl6 -v This is perl6 version 2013.11 built on parrot 5.9.0 revision 0 $ perl6-debug -v This is perl6 version built on parrot 5.9.0 revision 0
$ perl6 -v This is perl6 version 2013.11 built on parrot 5.9.0 revision 0 $ perl6-debug -v This is perl6 version built on parrot 5.9.0 revision 0 $ $ cat goo.p6 use v6; use NewClass; $ $ cat NewClass.pm6 use v6; class NewClass is export { method a { given 'a' { when /^ 'ss' / { succeed } # comment default {} } } } $ $ perl6 -I. --target=pir NewClass.pm6 > NewClass.pir $ perl6-debug -I. goo.p6
LOADING goo.p6 $ $ rm *.pir $ perl6-debug -I. goo.p6 LOADING goo.p6 LOADING /home/richard/development/Micro_Macro/test/NewClass.pm6 Null PMC access in get_attr_str() current instr.: '' pc 5982 (src/gen/perl6-moduleloader.pir:2536) (gen/parrot/ModuleLoader.nqp:274) called from Sub '' pc 4896 (src/gen/perl6-moduleloader.pir:2075) (gen/parrot/ModuleLoader.nqp:226) called from Sub 'load_module' pc 4073 (src/gen/perl6-moduleloader.pir:1733) (gen/parrot/ModuleLoader.nqp:215) called from Sub 'load_module' pc 5768 (src/gen/perl6-symboltable.pir:2306) (src/Perl6/World.nqp:334) called from Sub '' pc 86351 (src/gen/perl6-grammar.pir:30852) (src/Perl6/Grammar.nqp:1309) called from Sub '' pc 86077 (src/gen/perl6-grammar.pir:30738) (src/Perl6/Grammar.nqp:1304) called from Sub 'statement_control:sym\
thrown from: current instr.: '' pc 376105 (src/gen/p-CORE.setting.pir:158719) (gen/parrot/CORE.setting:9209) called from Sub 'at_key' pc 377173 (src/gen/p-CORE.setting.pir:159212) (gen/parrot/CORE.setting:9273) called from Sub 'postcircumfix:\<{ }>' pc 75370 (src/gen/p-CORE.setting.pir:29941) (gen/parrot/CORE.setting:2465) called from Sub 'postcircumfix:\<{ }>' pc 75340 (src/gen/p-CORE.setting.pir:29918) (gen/parrot/CORE.setting:2461) called from Sub '' pc 4712 (/home/richard/development/perl6/rakudo-star-2013.11/install/lib/parrot/5.9.0/languages/perl6/lib/Debugger/UI/CommandLine.pir:1770) (/home/richard/development/perl6/rakudo-star-2013.11/install/lib/parrot/5.9.0/languages/perl6/lib/Debugger/UI/CommandLine.pm:732) called from Sub '' pc 328412 (src/gen/p-CORE.setting.pir:138334) (gen/parrot/CORE.setting:7243) called from Sub 'reify' pc 327392 (src/gen/p-CORE.setting.pir:137963) (gen/parrot/CORE.setting:7220) called from Sub '' pc 325749 (src/gen/p-CORE.setting.pir:137230) (gen/parrot/CORE.setting:7138) called from Sub 'reify' pc 324936 (src/gen/p-CORE.setting.pir:136912) (gen/parrot/CORE.setting:7110) called from Sub 'gimme' pc 334305 (src/gen/p-CORE.setting.pir:140951) (gen/parrot/CORE.setting:7566) called from Sub 'sink' pc 346020 (src/gen/p-CORE.setting.pir:145670) (gen/parrot/CORE.setting:7976) called from Sub 'unhandled' pc 4518 (/home/richard/development/perl6/rakudo-star-2013.11/install/lib/parrot/5.9.0/languages/perl6/lib/Debugger/UI/CommandLine.pir:1697) (/home/richard/development/perl6/rakudo-star-2013.11/install/lib/parrot/5.9.0/languages/perl6/lib/Debugger/UI/CommandLine.pm:726) called from Sub '' pc 5982 (src/gen/perl6-moduleloader.pir:2536) (gen/parrot/ModuleLoader.nqp:274) called from Sub '' pc 4896 (src/gen/perl6-moduleloader.pir:2075) (gen/parrot/ModuleLoader.nqp:226) called from Sub 'load_module' pc 4073 (src/gen/perl6-moduleloader.pir:1733) (gen/parrot/ModuleLoader.nqp:215) called from Sub 'load_module' pc 5768 (src/gen/perl6-symboltable.pir:2306) (src/Perl6/World.nqp:334) called from Sub '' pc 86351 (src/gen/perl6-grammar.pir:30852) (src/Perl6/Grammar.nqp:1309) called from Sub '' pc 86077 (src/gen/perl6-grammar.pir:30738) (src/Perl6/Grammar.nqp:1304) called from Sub 'statement_control:sym\
Migrated from rt.perl.org#120956 (status was 'new')
Searchable as RT120956$