File: 03-inline.t

package info (click to toggle)
nqp 2014.07-3
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 23,596 kB
  • ctags: 7,993
  • sloc: ansic: 22,689; java: 20,240; cpp: 4,956; asm: 3,976; perl: 950; python: 267; sh: 245; makefile: 14
file content (10 lines) | stat: -rw-r--r-- 108 bytes parent folder | download | duplicates (4) 
1
2
3
4
5
6
7
8
9
10
 
#!./parrot nqp.pbc

# inline

plan(2);

Q:PIR { say 'ok 1' };
my $x := Q:PIR { %r = box 'ok 2' };
say($x);