Skip to content

Instantly share code, notes, and snippets.

Created November 19, 2014 04:37
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save anonymous/5c9be05d7e2ac123ccb0 to your computer and use it in GitHub Desktop.
Save anonymous/5c9be05d7e2ac123ccb0 to your computer and use it in GitHub Desktop.
Having errors accessing QAST children when invoking perl6 instead of nqp runtime
use QAST:from<NQP>;
my $qast := QAST::Block.new(
QAST::IVal.new( :value(42) )
);
my $comp_unit := QAST::CompUnit.new(
# Set the HLL.
:hll('perl6'),
# This variable contains the outermost QAST::Block of the
# program.
$qast,
# If we run the program as the mainline, then call the top
# block automatically.
:main(QAST::Op.new(
:op('call'),
QAST::BVal.new( :value($qast) )
))
);
# currently broken when invoked via perl6 but works when invoked from nqp
my $thingy := $comp_unit[0];
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment