gistfile1.txt

pmichaud@orange:~/ng$ ./perl6 --target=pir
> our $x = 3;

.HLL "perl6"

.namespace []
.sub "_block11"  :anon :subid("10_1257026635.18483")
.annotate "line", 1
    get_global $P13, "$x"
    unless_null $P13, vivify_11
    new $P13, "Perl6Scalar"
    get_hll_global $P14, ["Bool"], "True"
    setprop $P13, "rw", $P14
    set_global "$x", $P13
  vivify_11:
    .lex "$x", $P13
    find_lex $P15, "$x"
    $P16 = "&infix:<=>"($P15, 3)
    .return ($P16)
.end