Parrot NQP, grammars, and actions #14

Inline PIR ( Q:PIR {...} )

Q:PIR { load_bytecode 'PGE.pbc' };

my $name := 'Fred';
Q:PIR {
    $P0 = find_lex '$name'
    say $P0
};
Q:PIR {{
    print "\x{ab}Hello\x{bb}"
}}
Copyright © 2009
http://www.pmichaud.com/2009/pres/