From ba0fcdc9f0c800815fbbad4f3cb1caca43f3dc7b Mon Sep 17 00:00:00 2001 From: pmichaud Date: Sat, 14 Nov 2009 23:59:51 -0600 Subject: [PATCH] Update bootstrap. --- src/stage0/HLL-s0.pir | 2165 +++--- src/stage0/NQP-s0.pir | 1364 ++-- src/stage0/P6Regex-s0.pir | 13917 ++++++++++++++++++------------------ src/stage0/Regex-s0.pir | 25 +- 4 files changed, 8779 insertions(+), 8692 deletions(-) diff --git a/src/stage0/HLL-s0.pir b/src/stage0/HLL-s0.pir index 790af85..be8c751 100644 --- a/src/stage0/HLL-s0.pir +++ b/src/stage0/HLL-s0.pir @@ -824,7 +824,7 @@ An operator precedence parser. ### .include 'gen/hllgrammar-grammar.pir' .namespace [] -.sub "_block11" :anon :subid("10_1258208084.60641") +.sub "_block11" :anon :subid("10_1258264412.38819") .annotate "line", 0 get_hll_global $P14, ["HLL";"Grammar"], "_block13" capture_lex $P14 @@ -838,9 +838,9 @@ An operator precedence parser. .namespace [] -.sub "" :load :init :subid("post89") :outer("10_1258208084.60641") +.sub "" :load :init :subid("post89") :outer("10_1258264412.38819") .annotate "line", 0 - .const 'Sub' $P12 = "10_1258208084.60641" + .const 'Sub' $P12 = "10_1258264412.38819" .local pmc block set block, $P12 $P245 = get_root_global ["parrot"], "P6metaclass" @@ -849,78 +849,78 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "_block13" :subid("11_1258208084.60641") :outer("10_1258208084.60641") +.sub "_block13" :subid("11_1258264412.38819") :outer("10_1258264412.38819") .annotate "line", 5 - .const 'Sub' $P235 = "87_1258208084.60641" + .const 'Sub' $P235 = "87_1258264412.38819" capture_lex $P235 - .const 'Sub' $P229 = "85_1258208084.60641" + .const 'Sub' $P229 = "85_1258264412.38819" capture_lex $P229 - .const 'Sub' $P217 = "82_1258208084.60641" + .const 'Sub' $P217 = "82_1258264412.38819" capture_lex $P217 - .const 'Sub' $P213 = "80_1258208084.60641" + .const 'Sub' $P213 = "80_1258264412.38819" capture_lex $P213 - .const 'Sub' $P208 = "78_1258208084.60641" + .const 'Sub' $P208 = "78_1258264412.38819" capture_lex $P208 - .const 'Sub' $P203 = "76_1258208084.60641" + .const 'Sub' $P203 = "76_1258264412.38819" capture_lex $P203 - .const 'Sub' $P199 = "74_1258208084.60641" + .const 'Sub' $P199 = "74_1258264412.38819" capture_lex $P199 - .const 'Sub' $P195 = "72_1258208084.60641" + .const 'Sub' $P195 = "72_1258264412.38819" capture_lex $P195 - .const 'Sub' $P191 = "70_1258208084.60641" + .const 'Sub' $P191 = "70_1258264412.38819" capture_lex $P191 - .const 'Sub' $P187 = "68_1258208084.60641" + .const 'Sub' $P187 = "68_1258264412.38819" capture_lex $P187 - .const 'Sub' $P183 = "66_1258208084.60641" + .const 'Sub' $P183 = "66_1258264412.38819" capture_lex $P183 - .const 'Sub' $P179 = "64_1258208084.60641" + .const 'Sub' $P179 = "64_1258264412.38819" capture_lex $P179 - .const 'Sub' $P169 = "60_1258208084.60641" + .const 'Sub' $P169 = "60_1258264412.38819" capture_lex $P169 - .const 'Sub' $P157 = "58_1258208084.60641" + .const 'Sub' $P157 = "58_1258264412.38819" capture_lex $P157 - .const 'Sub' $P146 = "56_1258208084.60641" + .const 'Sub' $P146 = "56_1258264412.38819" capture_lex $P146 - .const 'Sub' $P140 = "54_1258208084.60641" + .const 'Sub' $P140 = "54_1258264412.38819" capture_lex $P140 - .const 'Sub' $P132 = "52_1258208084.60641" + .const 'Sub' $P132 = "52_1258264412.38819" capture_lex $P132 - .const 'Sub' $P126 = "50_1258208084.60641" + .const 'Sub' $P126 = "50_1258264412.38819" capture_lex $P126 - .const 'Sub' $P118 = "48_1258208084.60641" + .const 'Sub' $P118 = "48_1258264412.38819" capture_lex $P118 - .const 'Sub' $P112 = "46_1258208084.60641" + .const 'Sub' $P112 = "46_1258264412.38819" capture_lex $P112 - .const 'Sub' $P104 = "44_1258208084.60641" + .const 'Sub' $P104 = "44_1258264412.38819" capture_lex $P104 - .const 'Sub' $P98 = "42_1258208084.60641" + .const 'Sub' $P98 = "42_1258264412.38819" capture_lex $P98 - .const 'Sub' $P92 = "40_1258208084.60641" + .const 'Sub' $P92 = "40_1258264412.38819" capture_lex $P92 - .const 'Sub' $P83 = "38_1258208084.60641" + .const 'Sub' $P83 = "38_1258264412.38819" capture_lex $P83 - .const 'Sub' $P76 = "36_1258208084.60641" + .const 'Sub' $P76 = "36_1258264412.38819" capture_lex $P76 - .const 'Sub' $P69 = "34_1258208084.60641" + .const 'Sub' $P69 = "34_1258264412.38819" capture_lex $P69 - .const 'Sub' $P64 = "32_1258208084.60641" + .const 'Sub' $P64 = "32_1258264412.38819" capture_lex $P64 - .const 'Sub' $P59 = "30_1258208084.60641" + .const 'Sub' $P59 = "30_1258264412.38819" capture_lex $P59 - .const 'Sub' $P54 = "28_1258208084.60641" + .const 'Sub' $P54 = "28_1258264412.38819" capture_lex $P54 - .const 'Sub' $P22 = "14_1258208084.60641" + .const 'Sub' $P22 = "14_1258264412.38819" capture_lex $P22 - .const 'Sub' $P15 = "12_1258208084.60641" + .const 'Sub' $P15 = "12_1258264412.38819" capture_lex $P15 - .const 'Sub' $P235 = "87_1258208084.60641" + .const 'Sub' $P235 = "87_1258264412.38819" capture_lex $P235 .return ($P235) .end .namespace ["HLL";"Grammar"] -.sub "ws" :subid("12_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "ws" :subid("12_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx16_tgt .local int rx16_pos @@ -992,7 +992,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__ws" :subid("13_1258208084.60641") :method +.sub "!PREFIX__ws" :subid("13_1258264412.38819") :method .annotate "line", 5 new $P18, "ResizablePMCArray" push $P18, "" @@ -1001,7 +1001,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "termish" :subid("14_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "termish" :subid("14_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx23_tgt .local int rx23_pos @@ -1011,7 +1011,7 @@ An operator precedence parser. .local pmc rx23_cur (rx23_cur, rx23_pos, rx23_tgt, $I10) = self."!cursor_start"() rx23_cur."!cursor_debug"("START ", "termish") - rx23_cur."!cursor_caparray"("postfixish", "prefixish") + rx23_cur."!cursor_caparray"("prefixish", "postfixish") .lex unicode:"$\x{a2}", rx23_cur .local pmc match .lex "$/", match @@ -1081,7 +1081,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__termish" :subid("15_1258208084.60641") :method +.sub "!PREFIX__termish" :subid("15_1258264412.38819") :method .annotate "line", 5 new $P25, "ResizablePMCArray" push $P25, "" @@ -1090,7 +1090,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "term" :subid("16_1258208084.60641") :method +.sub "term" :subid("16_1258264412.38819") :method .annotate "line", 13 $P31 = self."!protoregex"("term") .return ($P31) @@ -1098,7 +1098,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__term" :subid("17_1258208084.60641") :method +.sub "!PREFIX__term" :subid("17_1258264412.38819") :method .annotate "line", 13 $P33 = self."!PREFIX__!protoregex"("term") .return ($P33) @@ -1106,7 +1106,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "infix" :subid("18_1258208084.60641") :method +.sub "infix" :subid("18_1258264412.38819") :method .annotate "line", 14 $P35 = self."!protoregex"("infix") .return ($P35) @@ -1114,7 +1114,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__infix" :subid("19_1258208084.60641") :method +.sub "!PREFIX__infix" :subid("19_1258264412.38819") :method .annotate "line", 14 $P37 = self."!PREFIX__!protoregex"("infix") .return ($P37) @@ -1122,7 +1122,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "prefix" :subid("20_1258208084.60641") :method +.sub "prefix" :subid("20_1258264412.38819") :method .annotate "line", 15 $P39 = self."!protoregex"("prefix") .return ($P39) @@ -1130,7 +1130,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__prefix" :subid("21_1258208084.60641") :method +.sub "!PREFIX__prefix" :subid("21_1258264412.38819") :method .annotate "line", 15 $P41 = self."!PREFIX__!protoregex"("prefix") .return ($P41) @@ -1138,7 +1138,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "postfix" :subid("22_1258208084.60641") :method +.sub "postfix" :subid("22_1258264412.38819") :method .annotate "line", 16 $P43 = self."!protoregex"("postfix") .return ($P43) @@ -1146,7 +1146,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__postfix" :subid("23_1258208084.60641") :method +.sub "!PREFIX__postfix" :subid("23_1258264412.38819") :method .annotate "line", 16 $P45 = self."!PREFIX__!protoregex"("postfix") .return ($P45) @@ -1154,7 +1154,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "circumfix" :subid("24_1258208084.60641") :method +.sub "circumfix" :subid("24_1258264412.38819") :method .annotate "line", 17 $P47 = self."!protoregex"("circumfix") .return ($P47) @@ -1162,7 +1162,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__circumfix" :subid("25_1258208084.60641") :method +.sub "!PREFIX__circumfix" :subid("25_1258264412.38819") :method .annotate "line", 17 $P49 = self."!PREFIX__!protoregex"("circumfix") .return ($P49) @@ -1170,7 +1170,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "postcircumfix" :subid("26_1258208084.60641") :method +.sub "postcircumfix" :subid("26_1258264412.38819") :method .annotate "line", 18 $P51 = self."!protoregex"("postcircumfix") .return ($P51) @@ -1178,7 +1178,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__postcircumfix" :subid("27_1258208084.60641") :method +.sub "!PREFIX__postcircumfix" :subid("27_1258264412.38819") :method .annotate "line", 18 $P53 = self."!PREFIX__!protoregex"("postcircumfix") .return ($P53) @@ -1186,7 +1186,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "term:sym" :subid("28_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "term:sym" :subid("28_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx55_tgt .local int rx55_pos @@ -1232,7 +1232,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__term:sym" :subid("29_1258208084.60641") :method +.sub "!PREFIX__term:sym" :subid("29_1258264412.38819") :method .annotate "line", 5 $P57 = self."!PREFIX__!subrule"("circumfix", "") new $P58, "ResizablePMCArray" @@ -1242,7 +1242,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "infixish" :subid("30_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "infixish" :subid("30_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx60_tgt .local int rx60_pos @@ -1288,7 +1288,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__infixish" :subid("31_1258208084.60641") :method +.sub "!PREFIX__infixish" :subid("31_1258264412.38819") :method .annotate "line", 5 $P62 = self."!PREFIX__!subrule"("OPER=infix", "") new $P63, "ResizablePMCArray" @@ -1298,7 +1298,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "prefixish" :subid("32_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "prefixish" :subid("32_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx65_tgt .local int rx65_pos @@ -1349,7 +1349,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__prefixish" :subid("33_1258208084.60641") :method +.sub "!PREFIX__prefixish" :subid("33_1258264412.38819") :method .annotate "line", 5 $P67 = self."!PREFIX__!subrule"("OPER=prefix", "") new $P68, "ResizablePMCArray" @@ -1359,7 +1359,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "postfixish" :subid("34_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "postfixish" :subid("34_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx70_tgt .local int rx70_pos @@ -1421,7 +1421,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__postfixish" :subid("35_1258208084.60641") :method +.sub "!PREFIX__postfixish" :subid("35_1258264412.38819") :method .annotate "line", 5 $P72 = self."!PREFIX__!subrule"("OPER=postcircumfix", "") $P73 = self."!PREFIX__!subrule"("OPER=postfix", "") @@ -1433,7 +1433,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_delimited" :subid("36_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_delimited" :subid("36_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx77_tgt .local int rx77_pos @@ -1503,7 +1503,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_delimited" :subid("37_1258208084.60641") :method +.sub "!PREFIX__quote_delimited" :subid("37_1258264412.38819") :method .annotate "line", 5 $P79 = self."!PREFIX__!subrule"("starter", "") new $P80, "ResizablePMCArray" @@ -1513,7 +1513,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_atom" :subid("38_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_atom" :subid("38_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx84_tgt .local int rx84_pos @@ -1592,7 +1592,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_atom" :subid("39_1258208084.60641") :method +.sub "!PREFIX__quote_atom" :subid("39_1258264412.38819") :method .annotate "line", 5 new $P86, "ResizablePMCArray" push $P86, "" @@ -1601,7 +1601,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "decint" :subid("40_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "decint" :subid("40_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx93_tgt .local int rx93_pos @@ -1661,7 +1661,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__decint" :subid("41_1258208084.60641") :method +.sub "!PREFIX__decint" :subid("41_1258264412.38819") :method .annotate "line", 5 new $P95, "ResizablePMCArray" push $P95, "" @@ -1670,7 +1670,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "hexints" :subid("42_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "hexints" :subid("42_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx99_tgt .local int rx99_pos @@ -1742,7 +1742,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__hexints" :subid("43_1258208084.60641") :method +.sub "!PREFIX__hexints" :subid("43_1258264412.38819") :method .annotate "line", 5 new $P101, "ResizablePMCArray" push $P101, "" @@ -1751,7 +1751,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "hexint" :subid("44_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "hexint" :subid("44_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx105_tgt .local int rx105_pos @@ -1820,7 +1820,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__hexint" :subid("45_1258208084.60641") :method +.sub "!PREFIX__hexint" :subid("45_1258264412.38819") :method .annotate "line", 5 new $P107, "ResizablePMCArray" push $P107, "" @@ -1829,7 +1829,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "hexints" :subid("46_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "hexints" :subid("46_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx113_tgt .local int rx113_pos @@ -1901,7 +1901,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__hexints" :subid("47_1258208084.60641") :method +.sub "!PREFIX__hexints" :subid("47_1258264412.38819") :method .annotate "line", 5 new $P115, "ResizablePMCArray" push $P115, "" @@ -1910,7 +1910,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "octint" :subid("48_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "octint" :subid("48_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx119_tgt .local int rx119_pos @@ -1979,7 +1979,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__octint" :subid("49_1258208084.60641") :method +.sub "!PREFIX__octint" :subid("49_1258264412.38819") :method .annotate "line", 5 new $P121, "ResizablePMCArray" push $P121, "" @@ -1988,7 +1988,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "octints" :subid("50_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "octints" :subid("50_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx127_tgt .local int rx127_pos @@ -2060,7 +2060,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__octints" :subid("51_1258208084.60641") :method +.sub "!PREFIX__octints" :subid("51_1258264412.38819") :method .annotate "line", 5 new $P129, "ResizablePMCArray" push $P129, "" @@ -2069,7 +2069,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "binint" :subid("52_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "binint" :subid("52_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx133_tgt .local int rx133_pos @@ -2138,7 +2138,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__binint" :subid("53_1258208084.60641") :method +.sub "!PREFIX__binint" :subid("53_1258264412.38819") :method .annotate "line", 5 new $P135, "ResizablePMCArray" push $P135, "" @@ -2147,7 +2147,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "binints" :subid("54_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "binints" :subid("54_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx141_tgt .local int rx141_pos @@ -2219,7 +2219,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__binints" :subid("55_1258208084.60641") :method +.sub "!PREFIX__binints" :subid("55_1258264412.38819") :method .annotate "line", 5 new $P143, "ResizablePMCArray" push $P143, "" @@ -2228,7 +2228,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "integer" :subid("56_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "integer" :subid("56_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx147_tgt .local int rx147_pos @@ -2364,7 +2364,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__integer" :subid("57_1258208084.60641") :method +.sub "!PREFIX__integer" :subid("57_1258264412.38819") :method .annotate "line", 5 $P149 = self."!PREFIX__!subrule"("VALUE=decint", "") $P150 = self."!PREFIX__!subrule"("VALUE=decint", "0d") @@ -2382,7 +2382,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "dec_number" :subid("58_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "dec_number" :subid("58_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx158_tgt .local int rx158_pos @@ -2549,7 +2549,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__dec_number" :subid("59_1258208084.60641") :method +.sub "!PREFIX__dec_number" :subid("59_1258264412.38819") :method .annotate "line", 5 new $P160, "ResizablePMCArray" push $P160, "" @@ -2560,7 +2560,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "escale" :subid("60_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "escale" :subid("60_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx170_tgt .local int rx170_pos @@ -2625,7 +2625,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__escale" :subid("61_1258208084.60641") :method +.sub "!PREFIX__escale" :subid("61_1258264412.38819") :method .annotate "line", 5 new $P172, "ResizablePMCArray" push $P172, "e" @@ -2635,7 +2635,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape" :subid("62_1258208084.60641") :method +.sub "quote_escape" :subid("62_1258264412.38819") :method .annotate "line", 73 $P176 = self."!protoregex"("quote_escape") .return ($P176) @@ -2643,7 +2643,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape" :subid("63_1258208084.60641") :method +.sub "!PREFIX__quote_escape" :subid("63_1258264412.38819") :method .annotate "line", 73 $P178 = self."!PREFIX__!protoregex"("quote_escape") .return ($P178) @@ -2651,7 +2651,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("64_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("64_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx180_tgt .local int rx180_pos @@ -2701,7 +2701,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("65_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("65_1258264412.38819") :method .annotate "line", 5 new $P182, "ResizablePMCArray" push $P182, "\\\\" @@ -2710,7 +2710,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("66_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("66_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx184_tgt .local int rx184_pos @@ -2767,7 +2767,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("67_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("67_1258264412.38819") :method .annotate "line", 5 new $P186, "ResizablePMCArray" push $P186, "\\" @@ -2776,7 +2776,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("68_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("68_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx188_tgt .local int rx188_pos @@ -2826,7 +2826,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("69_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("69_1258264412.38819") :method .annotate "line", 5 new $P190, "ResizablePMCArray" push $P190, "\\b" @@ -2835,7 +2835,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("70_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("70_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx192_tgt .local int rx192_pos @@ -2885,7 +2885,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("71_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("71_1258264412.38819") :method .annotate "line", 5 new $P194, "ResizablePMCArray" push $P194, "\\n" @@ -2894,7 +2894,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("72_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("72_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx196_tgt .local int rx196_pos @@ -2944,7 +2944,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("73_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("73_1258264412.38819") :method .annotate "line", 5 new $P198, "ResizablePMCArray" push $P198, "\\r" @@ -2953,7 +2953,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("74_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("74_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx200_tgt .local int rx200_pos @@ -3003,7 +3003,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("75_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("75_1258264412.38819") :method .annotate "line", 5 new $P202, "ResizablePMCArray" push $P202, "\\t" @@ -3012,7 +3012,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("76_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("76_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx204_tgt .local int rx204_pos @@ -3098,7 +3098,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("77_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("77_1258264412.38819") :method .annotate "line", 5 new $P206, "ResizablePMCArray" push $P206, unicode:"\\x" @@ -3107,7 +3107,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("78_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("78_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx209_tgt .local int rx209_pos @@ -3193,7 +3193,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("79_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("79_1258264412.38819") :method .annotate "line", 5 new $P211, "ResizablePMCArray" push $P211, "\\o" @@ -3202,7 +3202,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "quote_escape:sym" :subid("80_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "quote_escape:sym" :subid("80_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx214_tgt .local int rx214_pos @@ -3259,7 +3259,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__quote_escape:sym" :subid("81_1258208084.60641") :method +.sub "!PREFIX__quote_escape:sym" :subid("81_1258264412.38819") :method .annotate "line", 5 new $P216, "ResizablePMCArray" push $P216, "\\c" @@ -3268,9 +3268,9 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "charname" :subid("82_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "charname" :subid("82_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 - .const 'Sub' $P226 = "84_1258208084.60641" + .const 'Sub' $P226 = "84_1258264412.38819" capture_lex $P226 .local string rx218_tgt .local int rx218_pos @@ -3336,7 +3336,7 @@ An operator precedence parser. .annotate "line", 94 # rx subrule "before" subtype=zerowidth negate= rx218_cur."!cursor_pos"(rx218_pos) - .const 'Sub' $P226 = "84_1258208084.60641" + .const 'Sub' $P226 = "84_1258264412.38819" capture_lex $P226 $P10 = rx218_cur."before"($P226) unless $P10, rx218_fail @@ -3361,7 +3361,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__charname" :subid("83_1258208084.60641") :method +.sub "!PREFIX__charname" :subid("83_1258264412.38819") :method .annotate "line", 5 $P220 = self."!PREFIX__!subrule"("integer", "") new $P221, "ResizablePMCArray" @@ -3423,7 +3423,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "_block225" :anon :subid("84_1258208084.60641") :method :outer("82_1258208084.60641") +.sub "_block225" :anon :subid("84_1258264412.38819") :method :outer("82_1258264412.38819") .annotate "line", 94 .local string rx227_tgt .local int rx227_pos @@ -3480,7 +3480,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "charnames" :subid("85_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "charnames" :subid("85_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx230_tgt .local int rx230_pos @@ -3552,7 +3552,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__charnames" :subid("86_1258208084.60641") :method +.sub "!PREFIX__charnames" :subid("86_1258264412.38819") :method .annotate "line", 5 new $P232, "ResizablePMCArray" push $P232, "" @@ -3561,7 +3561,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "charspec" :subid("87_1258208084.60641") :method :outer("11_1258208084.60641") +.sub "charspec" :subid("87_1258264412.38819") :method :outer("11_1258264412.38819") .annotate "line", 5 .local string rx236_tgt .local int rx236_pos @@ -3655,7 +3655,7 @@ An operator precedence parser. .annotate "line", 102 # rx subrule "panic" subtype=method negate= rx236_cur."!cursor_pos"(rx236_pos) - $P10 = rx236_cur."panic"("Unrecognized \\\\c character") + $P10 = rx236_cur."panic"("Unrecognized \\c character") unless $P10, rx236_fail rx236_pos = $P10."pos"() alt241_end: @@ -3679,7 +3679,7 @@ An operator precedence parser. .namespace ["HLL";"Grammar"] -.sub "!PREFIX__charspec" :subid("88_1258208084.60641") :method +.sub "!PREFIX__charspec" :subid("88_1258264412.38819") :method .annotate "line", 5 $P238 = self."!PREFIX__!subrule"("", "") $P239 = self."!PREFIX__!subrule"("charnames", "[") @@ -3721,89 +3721,87 @@ An operator precedence parser. ### .include 'gen/hllgrammar-actions.pir' .namespace [] -.sub "_block11" :anon :subid("10_1258208086.97044") +.sub "_block11" :anon :subid("10_1258264416.3253") .annotate "line", 0 get_hll_global $P14, ["HLL";"Actions"], "_block13" capture_lex $P14 .annotate "line", 3 get_hll_global $P14, ["HLL";"Actions"], "_block13" capture_lex $P14 - $P437 = $P14() + $P434 = $P14() .annotate "line", 1 - .return ($P437) + .return ($P434) .end .namespace [] -.sub "" :load :init :subid("post40") :outer("10_1258208086.97044") +.sub "" :load :init :subid("post39") :outer("10_1258264416.3253") .annotate "line", 0 - .const 'Sub' $P12 = "10_1258208086.97044" + .const 'Sub' $P12 = "10_1258264416.3253" .local pmc block set block, $P12 - $P438 = get_root_global ["parrot"], "P6metaclass" - $P438."new_class"("HLL::Actions") + $P435 = get_root_global ["parrot"], "P6metaclass" + $P435."new_class"("HLL::Actions") .end .namespace ["HLL";"Actions"] -.sub "_block13" :subid("11_1258208086.97044") :outer("10_1258208086.97044") +.sub "_block13" :subid("11_1258264416.3253") :outer("10_1258264416.3253") .annotate "line", 3 - .const 'Sub' $P420 = "39_1258208086.97044" - capture_lex $P420 - .const 'Sub' $P403 = "38_1258208086.97044" - capture_lex $P403 - .const 'Sub' $P396 = "37_1258208086.97044" - capture_lex $P396 - .const 'Sub' $P389 = "36_1258208086.97044" - capture_lex $P389 - .const 'Sub' $P382 = "35_1258208086.97044" - capture_lex $P382 - .const 'Sub' $P375 = "34_1258208086.97044" - capture_lex $P375 - .const 'Sub' $P365 = "33_1258208086.97044" - capture_lex $P365 - .const 'Sub' $P358 = "32_1258208086.97044" - capture_lex $P358 - .const 'Sub' $P342 = "31_1258208086.97044" - capture_lex $P342 - .const 'Sub' $P268 = "29_1258208086.97044" - capture_lex $P268 - .const 'Sub' $P209 = "26_1258208086.97044" - capture_lex $P209 - .const 'Sub' $P200 = "25_1258208086.97044" - capture_lex $P200 - .const 'Sub' $P191 = "24_1258208086.97044" - capture_lex $P191 - .const 'Sub' $P182 = "23_1258208086.97044" - capture_lex $P182 - .const 'Sub' $P173 = "22_1258208086.97044" - capture_lex $P173 - .const 'Sub' $P164 = "21_1258208086.97044" - capture_lex $P164 - .const 'Sub' $P154 = "20_1258208086.97044" - capture_lex $P154 - .const 'Sub' $P144 = "19_1258208086.97044" - capture_lex $P144 - .const 'Sub' $P134 = "18_1258208086.97044" - capture_lex $P134 - .const 'Sub' $P34 = "15_1258208086.97044" - capture_lex $P34 - .const 'Sub' $P28 = "14_1258208086.97044" + .const 'Sub' $P417 = "38_1258264416.3253" + capture_lex $P417 + .const 'Sub' $P400 = "37_1258264416.3253" + capture_lex $P400 + .const 'Sub' $P393 = "36_1258264416.3253" + capture_lex $P393 + .const 'Sub' $P386 = "35_1258264416.3253" + capture_lex $P386 + .const 'Sub' $P379 = "34_1258264416.3253" + capture_lex $P379 + .const 'Sub' $P372 = "33_1258264416.3253" + capture_lex $P372 + .const 'Sub' $P362 = "32_1258264416.3253" + capture_lex $P362 + .const 'Sub' $P355 = "31_1258264416.3253" + capture_lex $P355 + .const 'Sub' $P339 = "30_1258264416.3253" + capture_lex $P339 + .const 'Sub' $P264 = "28_1258264416.3253" + capture_lex $P264 + .const 'Sub' $P203 = "25_1258264416.3253" + capture_lex $P203 + .const 'Sub' $P194 = "24_1258264416.3253" + capture_lex $P194 + .const 'Sub' $P185 = "23_1258264416.3253" + capture_lex $P185 + .const 'Sub' $P176 = "22_1258264416.3253" + capture_lex $P176 + .const 'Sub' $P167 = "21_1258264416.3253" + capture_lex $P167 + .const 'Sub' $P158 = "20_1258264416.3253" + capture_lex $P158 + .const 'Sub' $P148 = "19_1258264416.3253" + capture_lex $P148 + .const 'Sub' $P138 = "18_1258264416.3253" + capture_lex $P138 + .const 'Sub' $P128 = "17_1258264416.3253" + capture_lex $P128 + .const 'Sub' $P28 = "14_1258264416.3253" capture_lex $P28 - .const 'Sub' $P22 = "13_1258208086.97044" + .const 'Sub' $P22 = "13_1258264416.3253" capture_lex $P22 - .const 'Sub' $P15 = "12_1258208086.97044" + .const 'Sub' $P15 = "12_1258264416.3253" capture_lex $P15 -.annotate "line", 170 - .const 'Sub' $P420 = "39_1258208086.97044" - capture_lex $P420 +.annotate "line", 163 + .const 'Sub' $P417 = "38_1258264416.3253" + capture_lex $P417 .annotate "line", 3 - .return ($P420) + .return ($P417) .end .namespace ["HLL";"Actions"] -.sub "string_to_int" :subid("12_1258208086.97044") :outer("11_1258208086.97044") +.sub "string_to_int" :subid("12_1258264416.3253") :outer("11_1258264416.3253") .param pmc param_18 .param pmc param_19 .annotate "line", 3 @@ -3857,7 +3855,7 @@ An operator precedence parser. .namespace ["HLL";"Actions"] -.sub "ints_to_string" :subid("13_1258208086.97044") :outer("11_1258208086.97044") +.sub "ints_to_string" :subid("13_1258264416.3253") :outer("11_1258264416.3253") .param pmc param_25 .annotate "line", 37 new $P24, 'ExceptionHandler' @@ -3899,1177 +3897,1154 @@ An operator precedence parser. .namespace ["HLL";"Actions"] -.sub "isaPAST" :subid("14_1258208086.97044") :outer("11_1258208086.97044") +.sub "EXPR" :subid("14_1258264416.3253") :method :outer("11_1258264416.3253") .param pmc param_31 -.annotate "line", 61 + .param pmc param_32 :optional + .param int has_param_32 :opt_flag +.annotate "line", 62 + .const 'Sub' $P111 = "16_1258264416.3253" + capture_lex $P111 + .const 'Sub' $P78 = "15_1258264416.3253" + capture_lex $P78 new $P30, 'ExceptionHandler' set_addr $P30, control_29 $P30."handle_types"(58) push_eh $P30 - .lex "$x", param_31 -.annotate "line", 62 - - $P0 = find_lex '$x' - $I0 = isa $P0, ['PAST';'Node'] - $P32 = box $I0 - -.annotate "line", 61 - .return ($P32) - control_29: - .local pmc exception - .get_results (exception) - getattribute $P33, exception, "payload" - .return ($P33) - rethrow exception -.end - - -.namespace ["HLL";"Actions"] -.sub "EXPR" :subid("15_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_37 - .param pmc param_38 :optional - .param int has_param_38 :opt_flag -.annotate "line", 69 - .const 'Sub' $P117 = "17_1258208086.97044" - capture_lex $P117 - .const 'Sub' $P84 = "16_1258208086.97044" - capture_lex $P84 - new $P36, 'ExceptionHandler' - set_addr $P36, control_35 - $P36."handle_types"(58) - push_eh $P36 .lex "self", self - .lex "$/", param_37 - if has_param_38, optparam_41 - new $P39, "Undef" - set param_38, $P39 - optparam_41: - .lex "$key", param_38 -.annotate "line", 71 - new $P40, "Undef" - .lex "$past", $P40 -.annotate "line", 70 - find_lex $P42, "$key" - if $P42, unless_41_end - new $P43, "Exception" - set $P43['type'], 58 - new $P44, "Integer" - assign $P44, 0 - setattribute $P43, 'payload', $P44 - throw $P43 - unless_41_end: -.annotate "line", 71 - find_lex $P46, "$/" - $P47 = $P46."peek_ast"() - set $P45, $P47 - defined $I49, $P45 - if $I49, default_48 - find_lex $P50, "$/" - unless_null $P50, vivify_42 - new $P50, "Hash" + .lex "$/", param_31 + if has_param_32, optparam_40 + new $P33, "Undef" + set param_32, $P33 + optparam_40: + .lex "$key", param_32 +.annotate "line", 64 + new $P34, "Undef" + .lex "$past", $P34 +.annotate "line", 63 + find_lex $P36, "$key" + if $P36, unless_35_end + new $P37, "Exception" + set $P37['type'], 58 + new $P38, "Integer" + assign $P38, 0 + setattribute $P37, 'payload', $P38 + throw $P37 + unless_35_end: +.annotate "line", 64 + find_lex $P40, "$/" + $P41 = $P40."peek_ast"() + set $P39, $P41 + defined $I43, $P39 + if $I43, default_42 + find_lex $P44, "$/" + unless_null $P44, vivify_41 + new $P44, "Hash" + vivify_41: + set $P45, $P44["OPER"] + unless_null $P45, vivify_42 + new $P45, "Undef" vivify_42: - set $P51, $P50["OPER"] - unless_null $P51, vivify_43 - new $P51, "Undef" + $P46 = $P45."peek_ast"() + set $P39, $P46 + default_42: + store_lex "$past", $P39 +.annotate "line", 65 + find_lex $P48, "$past" + if $P48, unless_47_end +.annotate "line", 66 + get_hll_global $P49, ["PAST"], "Op" + find_lex $P50, "$/" + $P51 = $P49."new"($P50 :named("node")) + store_lex "$past", $P51 +.annotate "line", 67 + find_lex $P53, "$/" + unless_null $P53, vivify_43 + new $P53, "Hash" vivify_43: - $P52 = $P51."peek_ast"() - set $P45, $P52 - default_48: - store_lex "$past", $P45 -.annotate "line", 72 - find_lex $P54, "$past" - if $P54, unless_53_end -.annotate "line", 73 - get_hll_global $P55, ["PAST"], "Op" - find_lex $P56, "$/" - $P57 = $P55."new"($P56 :named("node")) - store_lex "$past", $P57 -.annotate "line", 74 - find_lex $P59, "$/" - unless_null $P59, vivify_44 - new $P59, "Hash" + set $P54, $P53["OPER"] + unless_null $P54, vivify_44 + new $P54, "Hash" vivify_44: - set $P60, $P59["OPER"] - unless_null $P60, vivify_45 - new $P60, "Hash" + set $P55, $P54["O"] + unless_null $P55, vivify_45 + new $P55, "Hash" vivify_45: - set $P61, $P60["O"] - unless_null $P61, vivify_46 - new $P61, "Hash" + set $P56, $P55["pasttype"] + unless_null $P56, vivify_46 + new $P56, "Undef" vivify_46: - set $P62, $P61["pasttype"] - unless_null $P62, vivify_47 - new $P62, "Undef" + if $P56, if_52 +.annotate "line", 68 + find_lex $P64, "$/" + unless_null $P64, vivify_47 + new $P64, "Hash" vivify_47: - if $P62, if_58 -.annotate "line", 75 - find_lex $P70, "$/" - unless_null $P70, vivify_48 - new $P70, "Hash" + set $P65, $P64["OPER"] + unless_null $P65, vivify_48 + new $P65, "Hash" vivify_48: - set $P71, $P70["OPER"] - unless_null $P71, vivify_49 - new $P71, "Hash" + set $P66, $P65["O"] + unless_null $P66, vivify_49 + new $P66, "Hash" vivify_49: - set $P72, $P71["O"] - unless_null $P72, vivify_50 - new $P72, "Hash" + set $P67, $P66["pirop"] + unless_null $P67, vivify_50 + new $P67, "Undef" vivify_50: - set $P73, $P72["pirop"] - unless_null $P73, vivify_51 - new $P73, "Undef" + unless $P67, if_63_end + find_lex $P68, "$past" + find_lex $P69, "$/" + unless_null $P69, vivify_51 + new $P69, "Hash" vivify_51: - unless $P73, if_69_end - find_lex $P74, "$past" - find_lex $P75, "$/" - unless_null $P75, vivify_52 - new $P75, "Hash" + set $P70, $P69["OPER"] + unless_null $P70, vivify_52 + new $P70, "Hash" vivify_52: - set $P76, $P75["OPER"] - unless_null $P76, vivify_53 - new $P76, "Hash" + set $P71, $P70["O"] + unless_null $P71, vivify_53 + new $P71, "Hash" vivify_53: - set $P77, $P76["O"] - unless_null $P77, vivify_54 - new $P77, "Hash" + set $P72, $P71["pirop"] + unless_null $P72, vivify_54 + new $P72, "Undef" vivify_54: - set $P78, $P77["pirop"] - unless_null $P78, vivify_55 - new $P78, "Undef" + set $S73, $P72 + $P68."pirop"($S73) + if_63_end: + goto if_52_end + if_52: +.annotate "line", 67 + find_lex $P57, "$past" + find_lex $P58, "$/" + unless_null $P58, vivify_55 + new $P58, "Hash" vivify_55: - set $S79, $P78 - $P74."pirop"($S79) - if_69_end: - goto if_58_end - if_58: -.annotate "line", 74 - find_lex $P63, "$past" - find_lex $P64, "$/" - unless_null $P64, vivify_56 - new $P64, "Hash" + set $P59, $P58["OPER"] + unless_null $P59, vivify_56 + new $P59, "Hash" vivify_56: - set $P65, $P64["OPER"] - unless_null $P65, vivify_57 - new $P65, "Hash" + set $P60, $P59["O"] + unless_null $P60, vivify_57 + new $P60, "Hash" vivify_57: - set $P66, $P65["O"] - unless_null $P66, vivify_58 - new $P66, "Hash" + set $P61, $P60["pasttype"] + unless_null $P61, vivify_58 + new $P61, "Undef" vivify_58: - set $P67, $P66["pasttype"] - unless_null $P67, vivify_59 - new $P67, "Undef" - vivify_59: - set $S68, $P67 - $P63."pasttype"($S68) - if_58_end: -.annotate "line", 76 - find_lex $P81, "$past" - $P82 = $P81."name"() - if $P82, unless_80_end - .const 'Sub' $P84 = "16_1258208086.97044" - capture_lex $P84 - $P84() - unless_80_end: - unless_53_end: -.annotate "line", 87 - find_lex $P104, "$key" - set $S105, $P104 - iseq $I106, $S105, "POSTFIX" - if $I106, if_103 -.annotate "line", 89 - find_lex $P112, "$/" - $P113 = $P112."list"() - defined $I114, $P113 - unless $I114, for_undef_63 - iter $P111, $P113 - new $P128, 'ExceptionHandler' - set_addr $P128, loop127_handler - $P128."handle_types"(65, 67, 66) - push_eh $P128 - loop127_test: - unless $P111, loop127_done - shift $P115, $P111 - loop127_redo: - .const 'Sub' $P117 = "17_1258208086.97044" - capture_lex $P117 - $P117($P115) - loop127_next: - goto loop127_test - loop127_handler: + set $S62, $P61 + $P57."pasttype"($S62) + if_52_end: +.annotate "line", 69 + find_lex $P75, "$past" + $P76 = $P75."name"() + if $P76, unless_74_end + .const 'Sub' $P78 = "15_1258264416.3253" + capture_lex $P78 + $P78() + unless_74_end: + unless_47_end: +.annotate "line", 80 + find_lex $P98, "$key" + set $S99, $P98 + iseq $I100, $S99, "POSTFIX" + if $I100, if_97 +.annotate "line", 82 + find_lex $P106, "$/" + $P107 = $P106."list"() + defined $I108, $P107 + unless $I108, for_undef_62 + iter $P105, $P107 + new $P122, 'ExceptionHandler' + set_addr $P122, loop121_handler + $P122."handle_types"(65, 67, 66) + push_eh $P122 + loop121_test: + unless $P105, loop121_done + shift $P109, $P105 + loop121_redo: + .const 'Sub' $P111 = "16_1258264416.3253" + capture_lex $P111 + $P111($P109) + loop121_next: + goto loop121_test + loop121_handler: .local pmc exception .get_results (exception) - getattribute $P129, exception, 'type' - eq $P129, 65, loop127_next - eq $P129, 67, loop127_redo - loop127_done: + getattribute $P123, exception, 'type' + eq $P123, 65, loop121_next + eq $P123, 67, loop121_redo + loop121_done: pop_eh - for_undef_63: -.annotate "line", 88 - goto if_103_end - if_103: -.annotate "line", 87 - find_lex $P107, "$past" - find_lex $P108, "$/" - unless_null $P108, vivify_64 - new $P108, "ResizablePMCArray" + for_undef_62: +.annotate "line", 81 + goto if_97_end + if_97: +.annotate "line", 80 + find_lex $P101, "$past" + find_lex $P102, "$/" + unless_null $P102, vivify_63 + new $P102, "ResizablePMCArray" + vivify_63: + set $P103, $P102[0] + unless_null $P103, vivify_64 + new $P103, "Undef" vivify_64: - set $P109, $P108[0] - unless_null $P109, vivify_65 - new $P109, "Undef" - vivify_65: - $P110 = $P109."ast"() - $P107."unshift"($P110) - if_103_end: -.annotate "line", 91 - find_lex $P130, "$/" - find_lex $P131, "$past" - $P132 = $P130."!make"($P131) -.annotate "line", 69 - .return ($P132) - control_35: + $P104 = $P103."ast"() + $P101."unshift"($P104) + if_97_end: +.annotate "line", 84 + find_lex $P124, "$/" + find_lex $P125, "$past" + $P126 = $P124."!make"($P125) +.annotate "line", 62 + .return ($P126) + control_29: .local pmc exception .get_results (exception) - getattribute $P133, exception, "payload" - .return ($P133) + getattribute $P127, exception, "payload" + .return ($P127) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "_block83" :anon :subid("16_1258208086.97044") :outer("15_1258208086.97044") -.annotate "line", 78 - new $P85, "Undef" - .lex "$name", $P85 -.annotate "line", 77 - find_lex $P87, "$key" - set $S88, $P87 - iseq $I89, $S88, "LIST" - unless $I89, if_86_end - new $P90, "String" - assign $P90, "infix" - store_lex "$key", $P90 - if_86_end: -.annotate "line", 78 +.sub "_block77" :anon :subid("15_1258264416.3253") :outer("14_1258264416.3253") +.annotate "line", 71 + new $P79, "Undef" + .lex "$name", $P79 +.annotate "line", 70 + find_lex $P81, "$key" + set $S82, $P81 + iseq $I83, $S82, "LIST" + unless $I83, if_80_end + new $P84, "String" + assign $P84, "infix" + store_lex "$key", $P84 + if_80_end: +.annotate "line", 71 $P0 = find_lex '$key' $S0 = $P0 $S0 = downcase $S0 - $P91 = box $S0 + $P85 = box $S0 - concat $P92, $P91, ":<" -.annotate "line", 83 - find_lex $P93, "$/" - unless_null $P93, vivify_60 - new $P93, "Hash" + concat $P86, $P85, ":<" +.annotate "line", 76 + find_lex $P87, "$/" + unless_null $P87, vivify_59 + new $P87, "Hash" + vivify_59: + set $P88, $P87["OPER"] + unless_null $P88, vivify_60 + new $P88, "Hash" vivify_60: - set $P94, $P93["OPER"] - unless_null $P94, vivify_61 - new $P94, "Hash" + set $P89, $P88["sym"] + unless_null $P89, vivify_61 + new $P89, "Undef" vivify_61: - set $P95, $P94["sym"] - unless_null $P95, vivify_62 - new $P95, "Undef" - vivify_62: - concat $P96, $P92, $P95 - concat $P97, $P96, ">" - store_lex "$name", $P97 -.annotate "line", 84 - find_lex $P98, "$past" - new $P99, "String" - assign $P99, "&" - find_lex $P100, "$name" - concat $P101, $P99, $P100 - $P102 = $P98."name"($P101) -.annotate "line", 76 - .return ($P102) + concat $P90, $P86, $P89 + concat $P91, $P90, ">" + store_lex "$name", $P91 +.annotate "line", 77 + find_lex $P92, "$past" + new $P93, "String" + assign $P93, "&" + find_lex $P94, "$name" + concat $P95, $P93, $P94 + $P96 = $P92."name"($P95) +.annotate "line", 69 + .return ($P96) .end .namespace ["HLL";"Actions"] -.sub "_block116" :anon :subid("17_1258208086.97044") :outer("15_1258208086.97044") - .param pmc param_118 -.annotate "line", 89 - .lex "$_", param_118 - find_lex $P121, "$_" - $P122 = $P121."ast"() - if $P122, if_120 - set $P119, $P122 - goto if_120_end - if_120: - find_lex $P123, "$past" - find_lex $P124, "$_" - $P125 = $P124."ast"() - $P126 = $P123."push"($P125) - set $P119, $P126 - if_120_end: - .return ($P119) +.sub "_block110" :anon :subid("16_1258264416.3253") :outer("14_1258264416.3253") + .param pmc param_112 +.annotate "line", 82 + .lex "$_", param_112 + find_lex $P115, "$_" + $P116 = $P115."ast"() + if $P116, if_114 + set $P113, $P116 + goto if_114_end + if_114: + find_lex $P117, "$past" + find_lex $P118, "$_" + $P119 = $P118."ast"() + $P120 = $P117."push"($P119) + set $P113, $P120 + if_114_end: + .return ($P113) .end .namespace ["HLL";"Actions"] -.sub "termish" :subid("18_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_137 -.annotate "line", 94 - new $P136, 'ExceptionHandler' - set_addr $P136, control_135 - $P136."handle_types"(58) - push_eh $P136 +.sub "termish" :subid("17_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_131 +.annotate "line", 87 + new $P130, 'ExceptionHandler' + set_addr $P130, control_129 + $P130."handle_types"(58) + push_eh $P130 .lex "self", self - .lex "$/", param_137 -.annotate "line", 95 - find_lex $P138, "$/" - find_lex $P139, "$/" - unless_null $P139, vivify_66 - new $P139, "Hash" + .lex "$/", param_131 +.annotate "line", 88 + find_lex $P132, "$/" + find_lex $P133, "$/" + unless_null $P133, vivify_65 + new $P133, "Hash" + vivify_65: + set $P134, $P133["term"] + unless_null $P134, vivify_66 + new $P134, "Undef" vivify_66: - set $P140, $P139["term"] - unless_null $P140, vivify_67 - new $P140, "Undef" - vivify_67: - $P141 = $P140."ast"() - $P142 = $P138."!make"($P141) -.annotate "line", 94 - .return ($P142) - control_135: + $P135 = $P134."ast"() + $P136 = $P132."!make"($P135) +.annotate "line", 87 + .return ($P136) + control_129: .local pmc exception .get_results (exception) - getattribute $P143, exception, "payload" - .return ($P143) + getattribute $P137, exception, "payload" + .return ($P137) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "term:sym" :subid("19_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_147 -.annotate "line", 98 - new $P146, 'ExceptionHandler' - set_addr $P146, control_145 - $P146."handle_types"(58) - push_eh $P146 +.sub "term:sym" :subid("18_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_141 +.annotate "line", 91 + new $P140, 'ExceptionHandler' + set_addr $P140, control_139 + $P140."handle_types"(58) + push_eh $P140 .lex "self", self - .lex "$/", param_147 - find_lex $P148, "$/" - find_lex $P149, "$/" - unless_null $P149, vivify_68 - new $P149, "Hash" + .lex "$/", param_141 + find_lex $P142, "$/" + find_lex $P143, "$/" + unless_null $P143, vivify_67 + new $P143, "Hash" + vivify_67: + set $P144, $P143["circumfix"] + unless_null $P144, vivify_68 + new $P144, "Undef" vivify_68: - set $P150, $P149["circumfix"] - unless_null $P150, vivify_69 - new $P150, "Undef" - vivify_69: - $P151 = $P150."ast"() - $P152 = $P148."!make"($P151) - .return ($P152) - control_145: + $P145 = $P144."ast"() + $P146 = $P142."!make"($P145) + .return ($P146) + control_139: .local pmc exception .get_results (exception) - getattribute $P153, exception, "payload" - .return ($P153) + getattribute $P147, exception, "payload" + .return ($P147) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "integer" :subid("20_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_157 -.annotate "line", 100 - new $P156, 'ExceptionHandler' - set_addr $P156, control_155 - $P156."handle_types"(58) - push_eh $P156 +.sub "integer" :subid("19_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_151 +.annotate "line", 93 + new $P150, 'ExceptionHandler' + set_addr $P150, control_149 + $P150."handle_types"(58) + push_eh $P150 .lex "self", self - .lex "$/", param_157 - find_lex $P158, "$/" - find_lex $P159, "$/" - unless_null $P159, vivify_70 - new $P159, "Hash" + .lex "$/", param_151 + find_lex $P152, "$/" + find_lex $P153, "$/" + unless_null $P153, vivify_69 + new $P153, "Hash" + vivify_69: + set $P154, $P153["VALUE"] + unless_null $P154, vivify_70 + new $P154, "Undef" vivify_70: - set $P160, $P159["VALUE"] - unless_null $P160, vivify_71 - new $P160, "Undef" - vivify_71: - $P161 = $P160."ast"() - $P162 = $P158."!make"($P161) - .return ($P162) - control_155: + $P155 = $P154."ast"() + $P156 = $P152."!make"($P155) + .return ($P156) + control_149: .local pmc exception .get_results (exception) - getattribute $P163, exception, "payload" - .return ($P163) + getattribute $P157, exception, "payload" + .return ($P157) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "dec_number" :subid("21_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_167 -.annotate "line", 102 - new $P166, 'ExceptionHandler' - set_addr $P166, control_165 - $P166."handle_types"(58) - push_eh $P166 +.sub "dec_number" :subid("20_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_161 +.annotate "line", 95 + new $P160, 'ExceptionHandler' + set_addr $P160, control_159 + $P160."handle_types"(58) + push_eh $P160 .lex "self", self - .lex "$/", param_167 - find_lex $P168, "$/" - find_lex $P169, "$/" - set $N170, $P169 - $P171 = $P168."!make"($N170) - .return ($P171) - control_165: + .lex "$/", param_161 + find_lex $P162, "$/" + find_lex $P163, "$/" + set $N164, $P163 + $P165 = $P162."!make"($N164) + .return ($P165) + control_159: .local pmc exception .get_results (exception) - getattribute $P172, exception, "payload" - .return ($P172) + getattribute $P166, exception, "payload" + .return ($P166) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "decint" :subid("22_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_176 -.annotate "line", 104 - new $P175, 'ExceptionHandler' - set_addr $P175, control_174 - $P175."handle_types"(58) - push_eh $P175 +.sub "decint" :subid("21_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_170 +.annotate "line", 97 + new $P169, 'ExceptionHandler' + set_addr $P169, control_168 + $P169."handle_types"(58) + push_eh $P169 .lex "self", self - .lex "$/", param_176 - find_lex $P177, "$/" - find_lex $P178, "$/" - $P179 = "string_to_int"($P178, 10) - $P180 = $P177."!make"($P179) - .return ($P180) - control_174: + .lex "$/", param_170 + find_lex $P171, "$/" + find_lex $P172, "$/" + $P173 = "string_to_int"($P172, 10) + $P174 = $P171."!make"($P173) + .return ($P174) + control_168: .local pmc exception .get_results (exception) - getattribute $P181, exception, "payload" - .return ($P181) + getattribute $P175, exception, "payload" + .return ($P175) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "hexint" :subid("23_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_185 -.annotate "line", 105 - new $P184, 'ExceptionHandler' - set_addr $P184, control_183 - $P184."handle_types"(58) - push_eh $P184 +.sub "hexint" :subid("22_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_179 +.annotate "line", 98 + new $P178, 'ExceptionHandler' + set_addr $P178, control_177 + $P178."handle_types"(58) + push_eh $P178 .lex "self", self - .lex "$/", param_185 - find_lex $P186, "$/" - find_lex $P187, "$/" - $P188 = "string_to_int"($P187, 16) - $P189 = $P186."!make"($P188) - .return ($P189) - control_183: + .lex "$/", param_179 + find_lex $P180, "$/" + find_lex $P181, "$/" + $P182 = "string_to_int"($P181, 16) + $P183 = $P180."!make"($P182) + .return ($P183) + control_177: .local pmc exception .get_results (exception) - getattribute $P190, exception, "payload" - .return ($P190) + getattribute $P184, exception, "payload" + .return ($P184) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "octint" :subid("24_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_194 -.annotate "line", 106 - new $P193, 'ExceptionHandler' - set_addr $P193, control_192 - $P193."handle_types"(58) - push_eh $P193 +.sub "octint" :subid("23_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_188 +.annotate "line", 99 + new $P187, 'ExceptionHandler' + set_addr $P187, control_186 + $P187."handle_types"(58) + push_eh $P187 .lex "self", self - .lex "$/", param_194 - find_lex $P195, "$/" - find_lex $P196, "$/" - $P197 = "string_to_int"($P196, 8) - $P198 = $P195."!make"($P197) - .return ($P198) - control_192: + .lex "$/", param_188 + find_lex $P189, "$/" + find_lex $P190, "$/" + $P191 = "string_to_int"($P190, 8) + $P192 = $P189."!make"($P191) + .return ($P192) + control_186: .local pmc exception .get_results (exception) - getattribute $P199, exception, "payload" - .return ($P199) + getattribute $P193, exception, "payload" + .return ($P193) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "binint" :subid("25_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_203 -.annotate "line", 107 - new $P202, 'ExceptionHandler' - set_addr $P202, control_201 - $P202."handle_types"(58) - push_eh $P202 +.sub "binint" :subid("24_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_197 +.annotate "line", 100 + new $P196, 'ExceptionHandler' + set_addr $P196, control_195 + $P196."handle_types"(58) + push_eh $P196 .lex "self", self - .lex "$/", param_203 - find_lex $P204, "$/" - find_lex $P205, "$/" - $P206 = "string_to_int"($P205, 2) - $P207 = $P204."!make"($P206) - .return ($P207) - control_201: + .lex "$/", param_197 + find_lex $P198, "$/" + find_lex $P199, "$/" + $P200 = "string_to_int"($P199, 2) + $P201 = $P198."!make"($P200) + .return ($P201) + control_195: .local pmc exception .get_results (exception) - getattribute $P208, exception, "payload" - .return ($P208) + getattribute $P202, exception, "payload" + .return ($P202) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_EXPR" :subid("26_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_212 -.annotate "line", 109 - .const 'Sub' $P227 = "27_1258208086.97044" - capture_lex $P227 - new $P211, 'ExceptionHandler' - set_addr $P211, control_210 - $P211."handle_types"(58) - push_eh $P211 +.sub "quote_EXPR" :subid("25_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_206 +.annotate "line", 102 + .const 'Sub' $P222 = "26_1258264416.3253" + capture_lex $P222 + new $P205, 'ExceptionHandler' + set_addr $P205, control_204 + $P205."handle_types"(58) + push_eh $P205 .lex "self", self - .lex "$/", param_212 -.annotate "line", 110 - new $P213, "Undef" - .lex "$past", $P213 - find_lex $P214, "$/" - unless_null $P214, vivify_72 - new $P214, "Hash" + .lex "$/", param_206 +.annotate "line", 103 + new $P207, "Undef" + .lex "$past", $P207 + find_lex $P208, "$/" + unless_null $P208, vivify_71 + new $P208, "Hash" + vivify_71: + set $P209, $P208["quote_delimited"] + unless_null $P209, vivify_72 + new $P209, "Undef" vivify_72: - set $P215, $P214["quote_delimited"] - unless_null $P215, vivify_73 - new $P215, "Undef" - vivify_73: - $P216 = $P215."ast"() - store_lex "$past", $P216 -.annotate "line", 111 - get_hll_global $P218, ["HLL";"Grammar"], "quotemod_check" + $P210 = $P209."ast"() + store_lex "$past", $P210 +.annotate "line", 104 + get_hll_global $P212, ["HLL";"Grammar"], "quotemod_check" + find_lex $P213, "$/" + $P214 = $P212($P213, "w") + unless $P214, if_211_end +.annotate "line", 105 + get_hll_global $P216, ["PAST"], "Node" + find_lex $P217, "$past" + $P218 = $P216."ACCEPTS"($P217) + if $P218, if_215 +.annotate "line", 108 + .const 'Sub' $P222 = "26_1258264416.3253" + capture_lex $P222 + $P222() + goto if_215_end + if_215: +.annotate "line", 106 find_lex $P219, "$/" - $P220 = $P218($P219, "w") - unless $P220, if_217_end -.annotate "line", 112 - find_lex $P222, "$past" - $P223 = "isaPAST"($P222) - if $P223, if_221 -.annotate "line", 115 - .const 'Sub' $P227 = "27_1258208086.97044" - capture_lex $P227 - $P227() - goto if_221_end - if_221: -.annotate "line", 113 - find_lex $P224, "$/" - $P225 = $P224."CURSOR"() - $P225."panic"("Can't form :w list from non-constant strings (yet)") - if_221_end: - if_217_end: -.annotate "line", 123 + $P220 = $P219."CURSOR"() + $P220."panic"("Can't form :w list from non-constant strings (yet)") + if_215_end: + if_211_end: +.annotate "line", 116 + get_hll_global $P252, ["PAST"], "Node" + find_lex $P253, "$past" + $P254 = $P252."ACCEPTS"($P253) + isfalse $I255, $P254 + unless $I255, if_251_end +.annotate "line", 117 + get_hll_global $P256, ["PAST"], "Val" find_lex $P257, "$past" - $P258 = "isaPAST"($P257) - isfalse $I259, $P258 - unless $I259, if_256_end -.annotate "line", 124 - get_hll_global $P260, ["PAST"], "Val" + set $S258, $P257 + $P259 = $P256."new"($S258 :named("value")) + store_lex "$past", $P259 + if_251_end: +.annotate "line", 119 + find_lex $P260, "$/" find_lex $P261, "$past" - set $S262, $P261 - $P263 = $P260."new"($S262 :named("value")) - store_lex "$past", $P263 - if_256_end: -.annotate "line", 126 - find_lex $P264, "$/" - find_lex $P265, "$past" - $P266 = $P264."!make"($P265) -.annotate "line", 109 - .return ($P266) - control_210: + $P262 = $P260."!make"($P261) +.annotate "line", 102 + .return ($P262) + control_204: .local pmc exception .get_results (exception) - getattribute $P267, exception, "payload" - .return ($P267) + getattribute $P263, exception, "payload" + .return ($P263) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "_block226" :anon :subid("27_1258208086.97044") :outer("26_1258208086.97044") -.annotate "line", 115 - .const 'Sub' $P248 = "28_1258208086.97044" - capture_lex $P248 -.annotate "line", 116 - new $P228, "ResizablePMCArray" - .lex "@words", $P228 - get_hll_global $P229, ["HLL";"Grammar"], "split_words" - find_lex $P230, "$/" - find_lex $P231, "$past" - $P232 = $P229($P230, $P231) - store_lex "@words", $P232 -.annotate "line", 117 - find_lex $P235, "@words" - set $N236, $P235 - new $P237, "Integer" - assign $P237, 1 - set $N238, $P237 - isgt $I239, $N236, $N238 - if $I239, if_234 - new $P233, 'Integer' - set $P233, $I239 - goto if_234_end - if_234: -.annotate "line", 118 - get_hll_global $P240, ["PAST"], "Op" - find_lex $P241, "$/" - $P242 = $P240."new"("list" :named("pasttype"), $P241 :named("node")) - store_lex "$past", $P242 -.annotate "line", 119 - find_lex $P244, "@words" - defined $I245, $P244 - unless $I245, for_undef_74 - iter $P243, $P244 - new $P254, 'ExceptionHandler' - set_addr $P254, loop253_handler - $P254."handle_types"(65, 67, 66) - push_eh $P254 - loop253_test: - unless $P243, loop253_done - shift $P246, $P243 - loop253_redo: - .const 'Sub' $P248 = "28_1258208086.97044" - capture_lex $P248 - $P248($P246) - loop253_next: - goto loop253_test - loop253_handler: +.sub "_block221" :anon :subid("26_1258264416.3253") :outer("25_1258264416.3253") +.annotate "line", 108 + .const 'Sub' $P243 = "27_1258264416.3253" + capture_lex $P243 +.annotate "line", 109 + new $P223, "ResizablePMCArray" + .lex "@words", $P223 + get_hll_global $P224, ["HLL";"Grammar"], "split_words" + find_lex $P225, "$/" + find_lex $P226, "$past" + $P227 = $P224($P225, $P226) + store_lex "@words", $P227 +.annotate "line", 110 + find_lex $P230, "@words" + set $N231, $P230 + new $P232, "Integer" + assign $P232, 1 + set $N233, $P232 + isgt $I234, $N231, $N233 + if $I234, if_229 + new $P228, 'Integer' + set $P228, $I234 + goto if_229_end + if_229: +.annotate "line", 111 + get_hll_global $P235, ["PAST"], "Op" + find_lex $P236, "$/" + $P237 = $P235."new"("list" :named("pasttype"), $P236 :named("node")) + store_lex "$past", $P237 +.annotate "line", 112 + find_lex $P239, "@words" + defined $I240, $P239 + unless $I240, for_undef_73 + iter $P238, $P239 + new $P249, 'ExceptionHandler' + set_addr $P249, loop248_handler + $P249."handle_types"(65, 67, 66) + push_eh $P249 + loop248_test: + unless $P238, loop248_done + shift $P241, $P238 + loop248_redo: + .const 'Sub' $P243 = "27_1258264416.3253" + capture_lex $P243 + $P243($P241) + loop248_next: + goto loop248_test + loop248_handler: .local pmc exception .get_results (exception) - getattribute $P255, exception, 'type' - eq $P255, 65, loop253_next - eq $P255, 67, loop253_redo - loop253_done: + getattribute $P250, exception, 'type' + eq $P250, 65, loop248_next + eq $P250, 67, loop248_redo + loop248_done: pop_eh - for_undef_74: -.annotate "line", 117 - set $P233, $P243 - if_234_end: -.annotate "line", 115 - .return ($P233) + for_undef_73: +.annotate "line", 110 + set $P228, $P238 + if_229_end: +.annotate "line", 108 + .return ($P228) .end .namespace ["HLL";"Actions"] -.sub "_block247" :anon :subid("28_1258208086.97044") :outer("27_1258208086.97044") - .param pmc param_249 -.annotate "line", 119 - .lex "$_", param_249 - find_lex $P250, "$past" - find_lex $P251, "$_" - $P252 = $P250."push"($P251) - .return ($P252) +.sub "_block242" :anon :subid("27_1258264416.3253") :outer("26_1258264416.3253") + .param pmc param_244 +.annotate "line", 112 + .lex "$_", param_244 + find_lex $P245, "$past" + find_lex $P246, "$_" + $P247 = $P245."push"($P246) + .return ($P247) .end .namespace ["HLL";"Actions"] -.sub "quote_delimited" :subid("29_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_271 -.annotate "line", 129 - .const 'Sub' $P283 = "30_1258208086.97044" - capture_lex $P283 - new $P270, 'ExceptionHandler' - set_addr $P270, control_269 - $P270."handle_types"(58) - push_eh $P270 +.sub "quote_delimited" :subid("28_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_267 +.annotate "line", 122 + .const 'Sub' $P279 = "29_1258264416.3253" + capture_lex $P279 + new $P266, 'ExceptionHandler' + set_addr $P266, control_265 + $P266."handle_types"(58) + push_eh $P266 .lex "self", self - .lex "$/", param_271 -.annotate "line", 130 - new $P272, "ResizablePMCArray" - .lex "@parts", $P272 -.annotate "line", 131 - new $P273, "Undef" - .lex "$lastlit", $P273 -.annotate "line", 147 - new $P274, "Undef" - .lex "$past", $P274 -.annotate "line", 129 - find_lex $P275, "@parts" -.annotate "line", 131 - new $P276, "String" - assign $P276, "" - store_lex "$lastlit", $P276 -.annotate "line", 132 - find_lex $P278, "$/" - unless_null $P278, vivify_75 - new $P278, "Hash" + .lex "$/", param_267 +.annotate "line", 123 + new $P268, "ResizablePMCArray" + .lex "@parts", $P268 +.annotate "line", 124 + new $P269, "Undef" + .lex "$lastlit", $P269 +.annotate "line", 140 + new $P270, "Undef" + .lex "$past", $P270 +.annotate "line", 122 + find_lex $P271, "@parts" +.annotate "line", 124 + new $P272, "String" + assign $P272, "" + store_lex "$lastlit", $P272 +.annotate "line", 125 + find_lex $P274, "$/" + unless_null $P274, vivify_74 + new $P274, "Hash" + vivify_74: + set $P275, $P274["quote_atom"] + unless_null $P275, vivify_75 + new $P275, "Undef" vivify_75: - set $P279, $P278["quote_atom"] - unless_null $P279, vivify_76 - new $P279, "Undef" - vivify_76: - defined $I280, $P279 - unless $I280, for_undef_77 - iter $P277, $P279 - new $P315, 'ExceptionHandler' - set_addr $P315, loop314_handler - $P315."handle_types"(65, 67, 66) - push_eh $P315 - loop314_test: - unless $P277, loop314_done - shift $P281, $P277 - loop314_redo: - .const 'Sub' $P283 = "30_1258208086.97044" - capture_lex $P283 - $P283($P281) - loop314_next: - goto loop314_test - loop314_handler: + defined $I276, $P275 + unless $I276, for_undef_76 + iter $P273, $P275 + new $P312, 'ExceptionHandler' + set_addr $P312, loop311_handler + $P312."handle_types"(65, 67, 66) + push_eh $P312 + loop311_test: + unless $P273, loop311_done + shift $P277, $P273 + loop311_redo: + .const 'Sub' $P279 = "29_1258264416.3253" + capture_lex $P279 + $P279($P277) + loop311_next: + goto loop311_test + loop311_handler: .local pmc exception .get_results (exception) - getattribute $P316, exception, 'type' - eq $P316, 65, loop314_next - eq $P316, 67, loop314_redo - loop314_done: + getattribute $P313, exception, 'type' + eq $P313, 65, loop311_next + eq $P313, 67, loop311_redo + loop311_done: pop_eh - for_undef_77: -.annotate "line", 146 - find_lex $P318, "$lastlit" - set $S319, $P318 - isgt $I320, $S319, "" - unless $I320, if_317_end - find_lex $P321, "@parts" - find_lex $P322, "$lastlit" - $P321."push"($P322) - if_317_end: -.annotate "line", 147 - find_lex $P325, "@parts" - if $P325, if_324 - new $P328, "String" - assign $P328, "" - set $P323, $P328 - goto if_324_end - if_324: + for_undef_76: +.annotate "line", 139 + find_lex $P315, "$lastlit" + set $S316, $P315 + isgt $I317, $S316, "" + unless $I317, if_314_end + find_lex $P318, "@parts" + find_lex $P319, "$lastlit" + $P318."push"($P319) + if_314_end: +.annotate "line", 140 + find_lex $P322, "@parts" + if $P322, if_321 + new $P325, "String" + assign $P325, "" + set $P320, $P325 + goto if_321_end + if_321: + find_lex $P323, "@parts" + $P324 = $P323."shift"() + set $P320, $P324 + if_321_end: + store_lex "$past", $P320 +.annotate "line", 141 + new $P333, 'ExceptionHandler' + set_addr $P333, loop332_handler + $P333."handle_types"(65, 67, 66) + push_eh $P333 + loop332_test: find_lex $P326, "@parts" - $P327 = $P326."shift"() - set $P323, $P327 - if_324_end: - store_lex "$past", $P323 -.annotate "line", 148 - new $P336, 'ExceptionHandler' - set_addr $P336, loop335_handler - $P336."handle_types"(65, 67, 66) - push_eh $P336 - loop335_test: + unless $P326, loop332_done + loop332_redo: +.annotate "line", 142 + get_hll_global $P327, ["PAST"], "Op" + find_lex $P328, "$past" find_lex $P329, "@parts" - unless $P329, loop335_done - loop335_redo: -.annotate "line", 149 - get_hll_global $P330, ["PAST"], "Op" - find_lex $P331, "$past" - find_lex $P332, "@parts" - $P333 = $P332."shift"() - $P334 = $P330."new"($P331, $P333, "concat" :named("pirop")) - store_lex "$past", $P334 - loop335_next: -.annotate "line", 148 - goto loop335_test - loop335_handler: + $P330 = $P329."shift"() + $P331 = $P327."new"($P328, $P330, "concat" :named("pirop")) + store_lex "$past", $P331 + loop332_next: +.annotate "line", 141 + goto loop332_test + loop332_handler: .local pmc exception .get_results (exception) - getattribute $P337, exception, 'type' - eq $P337, 65, loop335_next - eq $P337, 67, loop335_redo - loop335_done: + getattribute $P334, exception, 'type' + eq $P334, 65, loop332_next + eq $P334, 67, loop332_redo + loop332_done: pop_eh -.annotate "line", 151 - find_lex $P338, "$/" - find_lex $P339, "$past" - $P340 = $P338."!make"($P339) -.annotate "line", 129 - .return ($P340) - control_269: +.annotate "line", 144 + find_lex $P335, "$/" + find_lex $P336, "$past" + $P337 = $P335."!make"($P336) +.annotate "line", 122 + .return ($P337) + control_265: .local pmc exception .get_results (exception) - getattribute $P341, exception, "payload" - .return ($P341) + getattribute $P338, exception, "payload" + .return ($P338) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "_block282" :anon :subid("30_1258208086.97044") :outer("29_1258208086.97044") - .param pmc param_285 -.annotate "line", 133 - new $P284, "Undef" - .lex "$ast", $P284 - .lex "$_", param_285 - find_lex $P286, "$_" - $P287 = $P286."ast"() - store_lex "$ast", $P287 -.annotate "line", 134 - find_lex $P290, "$ast" - $P291 = "isaPAST"($P290) - isfalse $I292, $P291 - if $I292, if_289 -.annotate "line", 137 - find_lex $P298, "$ast" - get_hll_global $P299, ["PAST"], "Val" - $P300 = $P298."isa"($P299) - if $P300, if_297 -.annotate "line", 141 - find_lex $P306, "$lastlit" - set $S307, $P306 - isgt $I308, $S307, "" - unless $I308, if_305_end - find_lex $P309, "@parts" - find_lex $P310, "$lastlit" - $P309."push"($P310) - if_305_end: -.annotate "line", 142 - find_lex $P311, "@parts" - find_lex $P312, "$ast" - $P311."push"($P312) -.annotate "line", 143 - new $P313, "String" - assign $P313, "" - store_lex "$lastlit", $P313 -.annotate "line", 140 - set $P296, $P313 -.annotate "line", 137 - goto if_297_end - if_297: -.annotate "line", 138 - find_lex $P301, "$lastlit" - find_lex $P302, "$ast" - $S303 = $P302."value"() - concat $P304, $P301, $S303 - store_lex "$lastlit", $P304 -.annotate "line", 137 - set $P296, $P304 - if_297_end: - set $P288, $P296 +.sub "_block278" :anon :subid("29_1258264416.3253") :outer("28_1258264416.3253") + .param pmc param_281 +.annotate "line", 126 + new $P280, "Undef" + .lex "$ast", $P280 + .lex "$_", param_281 + find_lex $P282, "$_" + $P283 = $P282."ast"() + store_lex "$ast", $P283 +.annotate "line", 127 + get_hll_global $P286, ["PAST"], "Node" + find_lex $P287, "$ast" + $P288 = $P286."ACCEPTS"($P287) + isfalse $I289, $P288 + if $I289, if_285 +.annotate "line", 130 + find_lex $P295, "$ast" + get_hll_global $P296, ["PAST"], "Val" + $P297 = $P295."isa"($P296) + if $P297, if_294 .annotate "line", 134 - goto if_289_end - if_289: + find_lex $P303, "$lastlit" + set $S304, $P303 + isgt $I305, $S304, "" + unless $I305, if_302_end + find_lex $P306, "@parts" + find_lex $P307, "$lastlit" + $P306."push"($P307) + if_302_end: .annotate "line", 135 - find_lex $P293, "$lastlit" - find_lex $P294, "$ast" - concat $P295, $P293, $P294 - store_lex "$lastlit", $P295 -.annotate "line", 134 - set $P288, $P295 - if_289_end: -.annotate "line", 132 - .return ($P288) + find_lex $P308, "@parts" + find_lex $P309, "$ast" + $P308."push"($P309) +.annotate "line", 136 + new $P310, "String" + assign $P310, "" + store_lex "$lastlit", $P310 +.annotate "line", 133 + set $P293, $P310 +.annotate "line", 130 + goto if_294_end + if_294: +.annotate "line", 131 + find_lex $P298, "$lastlit" + find_lex $P299, "$ast" + $S300 = $P299."value"() + concat $P301, $P298, $S300 + store_lex "$lastlit", $P301 +.annotate "line", 130 + set $P293, $P301 + if_294_end: + set $P284, $P293 +.annotate "line", 127 + goto if_285_end + if_285: +.annotate "line", 128 + find_lex $P290, "$lastlit" + find_lex $P291, "$ast" + concat $P292, $P290, $P291 + store_lex "$lastlit", $P292 +.annotate "line", 127 + set $P284, $P292 + if_285_end: +.annotate "line", 125 + .return ($P284) .end .namespace ["HLL";"Actions"] -.sub "quote_atom" :subid("31_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_345 -.annotate "line", 154 - new $P344, 'ExceptionHandler' - set_addr $P344, control_343 - $P344."handle_types"(58) - push_eh $P344 +.sub "quote_atom" :subid("30_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_342 +.annotate "line", 147 + new $P341, 'ExceptionHandler' + set_addr $P341, control_340 + $P341."handle_types"(58) + push_eh $P341 .lex "self", self - .lex "$/", param_345 -.annotate "line", 155 + .lex "$/", param_342 +.annotate "line", 148 + find_lex $P343, "$/" find_lex $P346, "$/" - find_lex $P349, "$/" - unless_null $P349, vivify_78 - new $P349, "Hash" + unless_null $P346, vivify_77 + new $P346, "Hash" + vivify_77: + set $P347, $P346["quote_escape"] + unless_null $P347, vivify_78 + new $P347, "Undef" vivify_78: - set $P350, $P349["quote_escape"] - unless_null $P350, vivify_79 - new $P350, "Undef" - vivify_79: - if $P350, if_348 - find_lex $P354, "$/" - set $S355, $P354 - new $P347, 'String' - set $P347, $S355 - goto if_348_end - if_348: + if $P347, if_345 find_lex $P351, "$/" - unless_null $P351, vivify_80 - new $P351, "Hash" + set $S352, $P351 + new $P344, 'String' + set $P344, $S352 + goto if_345_end + if_345: + find_lex $P348, "$/" + unless_null $P348, vivify_79 + new $P348, "Hash" + vivify_79: + set $P349, $P348["quote_escape"] + unless_null $P349, vivify_80 + new $P349, "Undef" vivify_80: - set $P352, $P351["quote_escape"] - unless_null $P352, vivify_81 - new $P352, "Undef" - vivify_81: - $P353 = $P352."ast"() - set $P347, $P353 - if_348_end: - $P356 = $P346."!make"($P347) -.annotate "line", 154 - .return ($P356) - control_343: + $P350 = $P349."ast"() + set $P344, $P350 + if_345_end: + $P353 = $P343."!make"($P344) +.annotate "line", 147 + .return ($P353) + control_340: .local pmc exception .get_results (exception) - getattribute $P357, exception, "payload" - .return ($P357) + getattribute $P354, exception, "payload" + .return ($P354) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_escape:sym" :subid("32_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_361 -.annotate "line", 158 - new $P360, 'ExceptionHandler' - set_addr $P360, control_359 - $P360."handle_types"(58) - push_eh $P360 +.sub "quote_escape:sym" :subid("31_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_358 +.annotate "line", 151 + new $P357, 'ExceptionHandler' + set_addr $P357, control_356 + $P357."handle_types"(58) + push_eh $P357 .lex "self", self - .lex "$/", param_361 - find_lex $P362, "$/" - $P363 = $P362."!make"("\\") - .return ($P363) - control_359: + .lex "$/", param_358 + find_lex $P359, "$/" + $P360 = $P359."!make"("\\") + .return ($P360) + control_356: .local pmc exception .get_results (exception) - getattribute $P364, exception, "payload" - .return ($P364) + getattribute $P361, exception, "payload" + .return ($P361) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_escape:sym" :subid("33_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_368 -.annotate "line", 159 - new $P367, 'ExceptionHandler' - set_addr $P367, control_366 - $P367."handle_types"(58) - push_eh $P367 +.sub "quote_escape:sym" :subid("32_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_365 +.annotate "line", 152 + new $P364, 'ExceptionHandler' + set_addr $P364, control_363 + $P364."handle_types"(58) + push_eh $P364 .lex "self", self - .lex "$/", param_368 - find_lex $P369, "$/" - find_lex $P370, "$/" - unless_null $P370, vivify_82 - new $P370, "Hash" + .lex "$/", param_365 + find_lex $P366, "$/" + find_lex $P367, "$/" + unless_null $P367, vivify_81 + new $P367, "Hash" + vivify_81: + set $P368, $P367["stopper"] + unless_null $P368, vivify_82 + new $P368, "Undef" vivify_82: - set $P371, $P370["stopper"] - unless_null $P371, vivify_83 - new $P371, "Undef" - vivify_83: - set $S372, $P371 - $P373 = $P369."!make"($S372) - .return ($P373) - control_366: + set $S369, $P368 + $P370 = $P366."!make"($S369) + .return ($P370) + control_363: .local pmc exception .get_results (exception) - getattribute $P374, exception, "payload" - .return ($P374) + getattribute $P371, exception, "payload" + .return ($P371) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_escape:sym" :subid("34_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_378 -.annotate "line", 161 - new $P377, 'ExceptionHandler' - set_addr $P377, control_376 - $P377."handle_types"(58) - push_eh $P377 +.sub "quote_escape:sym" :subid("33_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_375 +.annotate "line", 154 + new $P374, 'ExceptionHandler' + set_addr $P374, control_373 + $P374."handle_types"(58) + push_eh $P374 .lex "self", self - .lex "$/", param_378 - find_lex $P379, "$/" - $P380 = $P379."!make"("\b") - .return ($P380) - control_376: + .lex "$/", param_375 + find_lex $P376, "$/" + $P377 = $P376."!make"("\b") + .return ($P377) + control_373: .local pmc exception .get_results (exception) - getattribute $P381, exception, "payload" - .return ($P381) + getattribute $P378, exception, "payload" + .return ($P378) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_escape:sym" :subid("35_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_385 -.annotate "line", 162 - new $P384, 'ExceptionHandler' - set_addr $P384, control_383 - $P384."handle_types"(58) - push_eh $P384 +.sub "quote_escape:sym" :subid("34_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_382 +.annotate "line", 155 + new $P381, 'ExceptionHandler' + set_addr $P381, control_380 + $P381."handle_types"(58) + push_eh $P381 .lex "self", self - .lex "$/", param_385 - find_lex $P386, "$/" - $P387 = $P386."!make"("\n") - .return ($P387) - control_383: + .lex "$/", param_382 + find_lex $P383, "$/" + $P384 = $P383."!make"("\n") + .return ($P384) + control_380: .local pmc exception .get_results (exception) - getattribute $P388, exception, "payload" - .return ($P388) + getattribute $P385, exception, "payload" + .return ($P385) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_escape:sym" :subid("36_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_392 -.annotate "line", 163 - new $P391, 'ExceptionHandler' - set_addr $P391, control_390 - $P391."handle_types"(58) - push_eh $P391 +.sub "quote_escape:sym" :subid("35_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_389 +.annotate "line", 156 + new $P388, 'ExceptionHandler' + set_addr $P388, control_387 + $P388."handle_types"(58) + push_eh $P388 .lex "self", self - .lex "$/", param_392 - find_lex $P393, "$/" - $P394 = $P393."!make"("\r") - .return ($P394) - control_390: + .lex "$/", param_389 + find_lex $P390, "$/" + $P391 = $P390."!make"("\r") + .return ($P391) + control_387: .local pmc exception .get_results (exception) - getattribute $P395, exception, "payload" - .return ($P395) + getattribute $P392, exception, "payload" + .return ($P392) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_escape:sym" :subid("37_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_399 -.annotate "line", 164 - new $P398, 'ExceptionHandler' - set_addr $P398, control_397 - $P398."handle_types"(58) - push_eh $P398 +.sub "quote_escape:sym" :subid("36_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_396 +.annotate "line", 157 + new $P395, 'ExceptionHandler' + set_addr $P395, control_394 + $P395."handle_types"(58) + push_eh $P395 .lex "self", self - .lex "$/", param_399 - find_lex $P400, "$/" - $P401 = $P400."!make"("\t") - .return ($P401) - control_397: + .lex "$/", param_396 + find_lex $P397, "$/" + $P398 = $P397."!make"("\t") + .return ($P398) + control_394: .local pmc exception .get_results (exception) - getattribute $P402, exception, "payload" - .return ($P402) + getattribute $P399, exception, "payload" + .return ($P399) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_escape:sym" :subid("38_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_406 -.annotate "line", 166 - new $P405, 'ExceptionHandler' - set_addr $P405, control_404 - $P405."handle_types"(58) - push_eh $P405 +.sub "quote_escape:sym" :subid("37_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_403 +.annotate "line", 159 + new $P402, 'ExceptionHandler' + set_addr $P402, control_401 + $P402."handle_types"(58) + push_eh $P402 .lex "self", self - .lex "$/", param_406 -.annotate "line", 167 + .lex "$/", param_403 +.annotate "line", 160 + find_lex $P404, "$/" find_lex $P407, "$/" - find_lex $P410, "$/" - unless_null $P410, vivify_84 - new $P410, "Hash" + unless_null $P407, vivify_83 + new $P407, "Hash" + vivify_83: + set $P408, $P407["hexint"] + unless_null $P408, vivify_84 + new $P408, "Undef" vivify_84: - set $P411, $P410["hexint"] + if $P408, if_406 + find_lex $P411, "$/" unless_null $P411, vivify_85 - new $P411, "Undef" + new $P411, "Hash" vivify_85: - if $P411, if_409 - find_lex $P414, "$/" - unless_null $P414, vivify_86 - new $P414, "Hash" + set $P412, $P411["hexints"] + unless_null $P412, vivify_86 + new $P412, "Hash" vivify_86: - set $P415, $P414["hexints"] - unless_null $P415, vivify_87 - new $P415, "Hash" + set $P413, $P412["hexint"] + unless_null $P413, vivify_87 + new $P413, "Undef" vivify_87: - set $P416, $P415["hexint"] - unless_null $P416, vivify_88 - new $P416, "Undef" + set $P405, $P413 + goto if_406_end + if_406: + find_lex $P409, "$/" + unless_null $P409, vivify_88 + new $P409, "Hash" vivify_88: - set $P408, $P416 - goto if_409_end - if_409: - find_lex $P412, "$/" - unless_null $P412, vivify_89 - new $P412, "Hash" + set $P410, $P409["hexint"] + unless_null $P410, vivify_89 + new $P410, "Undef" vivify_89: - set $P413, $P412["hexint"] - unless_null $P413, vivify_90 - new $P413, "Undef" - vivify_90: - set $P408, $P413 - if_409_end: - $P417 = "ints_to_string"($P408) - $P418 = $P407."!make"($P417) -.annotate "line", 166 - .return ($P418) - control_404: + set $P405, $P410 + if_406_end: + $P414 = "ints_to_string"($P405) + $P415 = $P404."!make"($P414) +.annotate "line", 159 + .return ($P415) + control_401: .local pmc exception .get_results (exception) - getattribute $P419, exception, "payload" - .return ($P419) + getattribute $P416, exception, "payload" + .return ($P416) rethrow exception .end .namespace ["HLL";"Actions"] -.sub "quote_escape:sym" :subid("39_1258208086.97044") :method :outer("11_1258208086.97044") - .param pmc param_423 -.annotate "line", 170 - new $P422, 'ExceptionHandler' - set_addr $P422, control_421 - $P422."handle_types"(58) - push_eh $P422 +.sub "quote_escape:sym" :subid("38_1258264416.3253") :method :outer("11_1258264416.3253") + .param pmc param_420 +.annotate "line", 163 + new $P419, 'ExceptionHandler' + set_addr $P419, control_418 + $P419."handle_types"(58) + push_eh $P419 .lex "self", self - .lex "$/", param_423 -.annotate "line", 171 + .lex "$/", param_420 +.annotate "line", 164 + find_lex $P421, "$/" find_lex $P424, "$/" - find_lex $P427, "$/" - unless_null $P427, vivify_91 - new $P427, "Hash" + unless_null $P424, vivify_90 + new $P424, "Hash" + vivify_90: + set $P425, $P424["octint"] + unless_null $P425, vivify_91 + new $P425, "Undef" vivify_91: - set $P428, $P427["octint"] + if $P425, if_423 + find_lex $P428, "$/" unless_null $P428, vivify_92 - new $P428, "Undef" + new $P428, "Hash" vivify_92: - if $P428, if_426 - find_lex $P431, "$/" - unless_null $P431, vivify_93 - new $P431, "Hash" + set $P429, $P428["octints"] + unless_null $P429, vivify_93 + new $P429, "Hash" vivify_93: - set $P432, $P431["octints"] - unless_null $P432, vivify_94 - new $P432, "Hash" + set $P430, $P429["octint"] + unless_null $P430, vivify_94 + new $P430, "Undef" vivify_94: - set $P433, $P432["octint"] - unless_null $P433, vivify_95 - new $P433, "Undef" + set $P422, $P430 + goto if_423_end + if_423: + find_lex $P426, "$/" + unless_null $P426, vivify_95 + new $P426, "Hash" vivify_95: - set $P425, $P433 - goto if_426_end - if_426: - find_lex $P429, "$/" - unless_null $P429, vivify_96 - new $P429, "Hash" + set $P427, $P426["octint"] + unless_null $P427, vivify_96 + new $P427, "Undef" vivify_96: - set $P430, $P429["octint"] - unless_null $P430, vivify_97 - new $P430, "Undef" - vivify_97: - set $P425, $P430 - if_426_end: - $P434 = "ints_to_string"($P425) - $P435 = $P424."!make"($P434) -.annotate "line", 170 - .return ($P435) - control_421: + set $P422, $P427 + if_423_end: + $P431 = "ints_to_string"($P422) + $P432 = $P421."!make"($P431) +.annotate "line", 163 + .return ($P432) + control_418: .local pmc exception .get_results (exception) - getattribute $P436, exception, "payload" - .return ($P436) + getattribute $P433, exception, "payload" + .return ($P433) rethrow exception .end diff --git a/src/stage0/NQP-s0.pir b/src/stage0/NQP-s0.pir index a9847ad..eb96431 100644 --- a/src/stage0/NQP-s0.pir +++ b/src/stage0/NQP-s0.pir @@ -15,7 +15,7 @@ NQP::Compiler - NQP compiler ### .include 'gen/nqp-grammar.pir' .namespace [] -.sub "_block11" :anon :subid("10_1258208104.50682") +.sub "_block11" :anon :subid("10_1258264446.59978") .annotate "line", 0 get_hll_global $P14, ["NQP";"Grammar"], "_block13" capture_lex $P14 @@ -29,9 +29,9 @@ NQP::Compiler - NQP compiler .namespace [] -.sub "" :load :init :subid("post311") :outer("10_1258208104.50682") +.sub "" :load :init :subid("post311") :outer("10_1258264446.59978") .annotate "line", 0 - .const 'Sub' $P12 = "10_1258208104.50682" + .const 'Sub' $P12 = "10_1258264446.59978" .local pmc block set block, $P12 $P1065 = get_root_global ["parrot"], "P6metaclass" @@ -40,273 +40,273 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "_block13" :subid("11_1258208104.50682") :outer("10_1258208104.50682") +.sub "_block13" :subid("11_1258264446.59978") :outer("10_1258264446.59978") .annotate "line", 4 get_hll_global $P1013, ["NQP";"Regex"], "_block1012" capture_lex $P1013 - .const 'Sub' $P1007 = "296_1258208104.50682" + .const 'Sub' $P1007 = "296_1258264446.59978" capture_lex $P1007 - .const 'Sub' $P1002 = "294_1258208104.50682" + .const 'Sub' $P1002 = "294_1258264446.59978" capture_lex $P1002 - .const 'Sub' $P996 = "292_1258208104.50682" + .const 'Sub' $P996 = "292_1258264446.59978" capture_lex $P996 - .const 'Sub' $P990 = "290_1258208104.50682" + .const 'Sub' $P990 = "290_1258264446.59978" capture_lex $P990 - .const 'Sub' $P984 = "288_1258208104.50682" + .const 'Sub' $P984 = "288_1258264446.59978" capture_lex $P984 - .const 'Sub' $P978 = "286_1258208104.50682" + .const 'Sub' $P978 = "286_1258264446.59978" capture_lex $P978 - .const 'Sub' $P973 = "284_1258208104.50682" + .const 'Sub' $P973 = "284_1258264446.59978" capture_lex $P973 - .const 'Sub' $P967 = "282_1258208104.50682" + .const 'Sub' $P967 = "282_1258264446.59978" capture_lex $P967 - .const 'Sub' $P961 = "280_1258208104.50682" + .const 'Sub' $P961 = "280_1258264446.59978" capture_lex $P961 - .const 'Sub' $P955 = "278_1258208104.50682" + .const 'Sub' $P955 = "278_1258264446.59978" capture_lex $P955 - .const 'Sub' $P949 = "276_1258208104.50682" + .const 'Sub' $P949 = "276_1258264446.59978" capture_lex $P949 - .const 'Sub' $P943 = "274_1258208104.50682" + .const 'Sub' $P943 = "274_1258264446.59978" capture_lex $P943 - .const 'Sub' $P937 = "272_1258208104.50682" + .const 'Sub' $P937 = "272_1258264446.59978" capture_lex $P937 - .const 'Sub' $P931 = "270_1258208104.50682" + .const 'Sub' $P931 = "270_1258264446.59978" capture_lex $P931 - .const 'Sub' $P925 = "268_1258208104.50682" + .const 'Sub' $P925 = "268_1258264446.59978" capture_lex $P925 - .const 'Sub' $P919 = "266_1258208104.50682" + .const 'Sub' $P919 = "266_1258264446.59978" capture_lex $P919 - .const 'Sub' $P913 = "264_1258208104.50682" + .const 'Sub' $P913 = "264_1258264446.59978" capture_lex $P913 - .const 'Sub' $P907 = "262_1258208104.50682" + .const 'Sub' $P907 = "262_1258264446.59978" capture_lex $P907 - .const 'Sub' $P901 = "260_1258208104.50682" + .const 'Sub' $P901 = "260_1258264446.59978" capture_lex $P901 - .const 'Sub' $P895 = "258_1258208104.50682" + .const 'Sub' $P895 = "258_1258264446.59978" capture_lex $P895 - .const 'Sub' $P889 = "256_1258208104.50682" + .const 'Sub' $P889 = "256_1258264446.59978" capture_lex $P889 - .const 'Sub' $P883 = "254_1258208104.50682" + .const 'Sub' $P883 = "254_1258264446.59978" capture_lex $P883 - .const 'Sub' $P877 = "252_1258208104.50682" + .const 'Sub' $P877 = "252_1258264446.59978" capture_lex $P877 - .const 'Sub' $P871 = "250_1258208104.50682" + .const 'Sub' $P871 = "250_1258264446.59978" capture_lex $P871 - .const 'Sub' $P865 = "248_1258208104.50682" + .const 'Sub' $P865 = "248_1258264446.59978" capture_lex $P865 - .const 'Sub' $P859 = "246_1258208104.50682" + .const 'Sub' $P859 = "246_1258264446.59978" capture_lex $P859 - .const 'Sub' $P853 = "244_1258208104.50682" + .const 'Sub' $P853 = "244_1258264446.59978" capture_lex $P853 - .const 'Sub' $P847 = "242_1258208104.50682" + .const 'Sub' $P847 = "242_1258264446.59978" capture_lex $P847 - .const 'Sub' $P841 = "240_1258208104.50682" + .const 'Sub' $P841 = "240_1258264446.59978" capture_lex $P841 - .const 'Sub' $P835 = "238_1258208104.50682" + .const 'Sub' $P835 = "238_1258264446.59978" capture_lex $P835 - .const 'Sub' $P829 = "236_1258208104.50682" + .const 'Sub' $P829 = "236_1258264446.59978" capture_lex $P829 - .const 'Sub' $P823 = "234_1258208104.50682" + .const 'Sub' $P823 = "234_1258264446.59978" capture_lex $P823 - .const 'Sub' $P817 = "232_1258208104.50682" + .const 'Sub' $P817 = "232_1258264446.59978" capture_lex $P817 - .const 'Sub' $P811 = "230_1258208104.50682" + .const 'Sub' $P811 = "230_1258264446.59978" capture_lex $P811 - .const 'Sub' $P805 = "228_1258208104.50682" + .const 'Sub' $P805 = "228_1258264446.59978" capture_lex $P805 - .const 'Sub' $P799 = "226_1258208104.50682" + .const 'Sub' $P799 = "226_1258264446.59978" capture_lex $P799 - .const 'Sub' $P793 = "224_1258208104.50682" + .const 'Sub' $P793 = "224_1258264446.59978" capture_lex $P793 - .const 'Sub' $P787 = "222_1258208104.50682" + .const 'Sub' $P787 = "222_1258264446.59978" capture_lex $P787 - .const 'Sub' $P781 = "220_1258208104.50682" + .const 'Sub' $P781 = "220_1258264446.59978" capture_lex $P781 - .const 'Sub' $P775 = "218_1258208104.50682" + .const 'Sub' $P775 = "218_1258264446.59978" capture_lex $P775 - .const 'Sub' $P770 = "216_1258208104.50682" + .const 'Sub' $P770 = "216_1258264446.59978" capture_lex $P770 - .const 'Sub' $P765 = "214_1258208104.50682" + .const 'Sub' $P765 = "214_1258264446.59978" capture_lex $P765 - .const 'Sub' $P761 = "212_1258208104.50682" + .const 'Sub' $P761 = "212_1258264446.59978" capture_lex $P761 - .const 'Sub' $P756 = "210_1258208104.50682" + .const 'Sub' $P756 = "210_1258264446.59978" capture_lex $P756 - .const 'Sub' $P751 = "208_1258208104.50682" + .const 'Sub' $P751 = "208_1258264446.59978" capture_lex $P751 - .const 'Sub' $P747 = "206_1258208104.50682" + .const 'Sub' $P747 = "206_1258264446.59978" capture_lex $P747 - .const 'Sub' $P743 = "204_1258208104.50682" + .const 'Sub' $P743 = "204_1258264446.59978" capture_lex $P743 - .const 'Sub' $P737 = "202_1258208104.50682" + .const 'Sub' $P737 = "202_1258264446.59978" capture_lex $P737 - .const 'Sub' $P731 = "200_1258208104.50682" + .const 'Sub' $P731 = "200_1258264446.59978" capture_lex $P731 - .const 'Sub' $P724 = "198_1258208104.50682" + .const 'Sub' $P724 = "198_1258264446.59978" capture_lex $P724 - .const 'Sub' $P720 = "196_1258208104.50682" + .const 'Sub' $P720 = "196_1258264446.59978" capture_lex $P720 - .const 'Sub' $P716 = "194_1258208104.50682" + .const 'Sub' $P716 = "194_1258264446.59978" capture_lex $P716 - .const 'Sub' $P709 = "192_1258208104.50682" + .const 'Sub' $P709 = "192_1258264446.59978" capture_lex $P709 - .const 'Sub' $P702 = "190_1258208104.50682" + .const 'Sub' $P702 = "190_1258264446.59978" capture_lex $P702 - .const 'Sub' $P698 = "188_1258208104.50682" + .const 'Sub' $P698 = "188_1258264446.59978" capture_lex $P698 - .const 'Sub' $P694 = "186_1258208104.50682" + .const 'Sub' $P694 = "186_1258264446.59978" capture_lex $P694 - .const 'Sub' $P689 = "184_1258208104.50682" + .const 'Sub' $P689 = "184_1258264446.59978" capture_lex $P689 - .const 'Sub' $P684 = "182_1258208104.50682" + .const 'Sub' $P684 = "182_1258264446.59978" capture_lex $P684 - .const 'Sub' $P679 = "180_1258208104.50682" + .const 'Sub' $P679 = "180_1258264446.59978" capture_lex $P679 - .const 'Sub' $P674 = "178_1258208104.50682" + .const 'Sub' $P674 = "178_1258264446.59978" capture_lex $P674 - .const 'Sub' $P670 = "176_1258208104.50682" + .const 'Sub' $P670 = "176_1258264446.59978" capture_lex $P670 - .const 'Sub' $P666 = "174_1258208104.50682" + .const 'Sub' $P666 = "174_1258264446.59978" capture_lex $P666 - .const 'Sub' $P654 = "170_1258208104.50682" + .const 'Sub' $P654 = "170_1258264446.59978" capture_lex $P654 - .const 'Sub' $P649 = "168_1258208104.50682" + .const 'Sub' $P649 = "168_1258264446.59978" capture_lex $P649 - .const 'Sub' $P643 = "166_1258208104.50682" + .const 'Sub' $P643 = "166_1258264446.59978" capture_lex $P643 - .const 'Sub' $P638 = "164_1258208104.50682" + .const 'Sub' $P638 = "164_1258264446.59978" capture_lex $P638 - .const 'Sub' $P631 = "162_1258208104.50682" + .const 'Sub' $P631 = "162_1258264446.59978" capture_lex $P631 - .const 'Sub' $P624 = "160_1258208104.50682" + .const 'Sub' $P624 = "160_1258264446.59978" capture_lex $P624 - .const 'Sub' $P619 = "158_1258208104.50682" + .const 'Sub' $P619 = "158_1258264446.59978" capture_lex $P619 - .const 'Sub' $P614 = "156_1258208104.50682" + .const 'Sub' $P614 = "156_1258264446.59978" capture_lex $P614 - .const 'Sub' $P602 = "152_1258208104.50682" + .const 'Sub' $P602 = "152_1258264446.59978" capture_lex $P602 - .const 'Sub' $P571 = "150_1258208104.50682" + .const 'Sub' $P571 = "150_1258264446.59978" capture_lex $P571 - .const 'Sub' $P564 = "148_1258208104.50682" + .const 'Sub' $P564 = "148_1258264446.59978" capture_lex $P564 - .const 'Sub' $P559 = "146_1258208104.50682" + .const 'Sub' $P559 = "146_1258264446.59978" capture_lex $P559 - .const 'Sub' $P550 = "144_1258208104.50682" + .const 'Sub' $P550 = "144_1258264446.59978" capture_lex $P550 - .const 'Sub' $P536 = "142_1258208104.50682" + .const 'Sub' $P536 = "142_1258264446.59978" capture_lex $P536 - .const 'Sub' $P528 = "140_1258208104.50682" + .const 'Sub' $P528 = "140_1258264446.59978" capture_lex $P528 - .const 'Sub' $P510 = "138_1258208104.50682" + .const 'Sub' $P510 = "138_1258264446.59978" capture_lex $P510 - .const 'Sub' $P492 = "136_1258208104.50682" + .const 'Sub' $P492 = "136_1258264446.59978" capture_lex $P492 - .const 'Sub' $P486 = "134_1258208104.50682" + .const 'Sub' $P486 = "134_1258264446.59978" capture_lex $P486 - .const 'Sub' $P480 = "132_1258208104.50682" + .const 'Sub' $P480 = "132_1258264446.59978" capture_lex $P480 - .const 'Sub' $P471 = "128_1258208104.50682" + .const 'Sub' $P471 = "128_1258264446.59978" capture_lex $P471 - .const 'Sub' $P461 = "126_1258208104.50682" + .const 'Sub' $P461 = "126_1258264446.59978" capture_lex $P461 - .const 'Sub' $P455 = "124_1258208104.50682" + .const 'Sub' $P455 = "124_1258264446.59978" capture_lex $P455 - .const 'Sub' $P449 = "122_1258208104.50682" + .const 'Sub' $P449 = "122_1258264446.59978" capture_lex $P449 - .const 'Sub' $P443 = "120_1258208104.50682" + .const 'Sub' $P443 = "120_1258264446.59978" capture_lex $P443 - .const 'Sub' $P417 = "116_1258208104.50682" + .const 'Sub' $P417 = "116_1258264446.59978" capture_lex $P417 - .const 'Sub' $P409 = "114_1258208104.50682" + .const 'Sub' $P409 = "114_1258264446.59978" capture_lex $P409 - .const 'Sub' $P403 = "112_1258208104.50682" + .const 'Sub' $P403 = "112_1258264446.59978" capture_lex $P403 - .const 'Sub' $P395 = "108_1258208104.50682" + .const 'Sub' $P395 = "108_1258264446.59978" capture_lex $P395 - .const 'Sub' $P391 = "106_1258208104.50682" + .const 'Sub' $P391 = "106_1258264446.59978" capture_lex $P391 - .const 'Sub' $P380 = "104_1258208104.50682" + .const 'Sub' $P380 = "104_1258264446.59978" capture_lex $P380 - .const 'Sub' $P370 = "102_1258208104.50682" + .const 'Sub' $P370 = "102_1258264446.59978" capture_lex $P370 - .const 'Sub' $P366 = "100_1258208104.50682" + .const 'Sub' $P366 = "100_1258264446.59978" capture_lex $P366 - .const 'Sub' $P361 = "98_1258208104.50682" + .const 'Sub' $P361 = "98_1258264446.59978" capture_lex $P361 - .const 'Sub' $P356 = "96_1258208104.50682" + .const 'Sub' $P356 = "96_1258264446.59978" capture_lex $P356 - .const 'Sub' $P351 = "94_1258208104.50682" + .const 'Sub' $P351 = "94_1258264446.59978" capture_lex $P351 - .const 'Sub' $P346 = "92_1258208104.50682" + .const 'Sub' $P346 = "92_1258264446.59978" capture_lex $P346 - .const 'Sub' $P341 = "90_1258208104.50682" + .const 'Sub' $P341 = "90_1258264446.59978" capture_lex $P341 - .const 'Sub' $P336 = "88_1258208104.50682" + .const 'Sub' $P336 = "88_1258264446.59978" capture_lex $P336 - .const 'Sub' $P331 = "86_1258208104.50682" + .const 'Sub' $P331 = "86_1258264446.59978" capture_lex $P331 - .const 'Sub' $P324 = "84_1258208104.50682" + .const 'Sub' $P324 = "84_1258264446.59978" capture_lex $P324 - .const 'Sub' $P317 = "82_1258208104.50682" + .const 'Sub' $P317 = "82_1258264446.59978" capture_lex $P317 - .const 'Sub' $P306 = "78_1258208104.50682" + .const 'Sub' $P306 = "78_1258264446.59978" capture_lex $P306 - .const 'Sub' $P299 = "76_1258208104.50682" + .const 'Sub' $P299 = "76_1258264446.59978" capture_lex $P299 - .const 'Sub' $P290 = "72_1258208104.50682" + .const 'Sub' $P290 = "72_1258264446.59978" capture_lex $P290 - .const 'Sub' $P284 = "70_1258208104.50682" + .const 'Sub' $P284 = "70_1258264446.59978" capture_lex $P284 - .const 'Sub' $P273 = "66_1258208104.50682" + .const 'Sub' $P273 = "66_1258264446.59978" capture_lex $P273 - .const 'Sub' $P254 = "64_1258208104.50682" + .const 'Sub' $P254 = "64_1258264446.59978" capture_lex $P254 - .const 'Sub' $P246 = "62_1258208104.50682" + .const 'Sub' $P246 = "62_1258264446.59978" capture_lex $P246 - .const 'Sub' $P229 = "59_1258208104.50682" + .const 'Sub' $P229 = "59_1258264446.59978" capture_lex $P229 - .const 'Sub' $P210 = "57_1258208104.50682" + .const 'Sub' $P210 = "57_1258264446.59978" capture_lex $P210 - .const 'Sub' $P202 = "53_1258208104.50682" + .const 'Sub' $P202 = "53_1258264446.59978" capture_lex $P202 - .const 'Sub' $P198 = "51_1258208104.50682" + .const 'Sub' $P198 = "51_1258264446.59978" capture_lex $P198 - .const 'Sub' $P190 = "47_1258208104.50682" + .const 'Sub' $P190 = "47_1258264446.59978" capture_lex $P190 - .const 'Sub' $P186 = "45_1258208104.50682" + .const 'Sub' $P186 = "45_1258264446.59978" capture_lex $P186 - .const 'Sub' $P179 = "43_1258208104.50682" + .const 'Sub' $P179 = "43_1258264446.59978" capture_lex $P179 - .const 'Sub' $P173 = "41_1258208104.50682" + .const 'Sub' $P173 = "41_1258264446.59978" capture_lex $P173 - .const 'Sub' $P168 = "39_1258208104.50682" + .const 'Sub' $P168 = "39_1258264446.59978" capture_lex $P168 - .const 'Sub' $P161 = "37_1258208104.50682" + .const 'Sub' $P161 = "37_1258264446.59978" capture_lex $P161 - .const 'Sub' $P156 = "35_1258208104.50682" + .const 'Sub' $P156 = "35_1258264446.59978" capture_lex $P156 - .const 'Sub' $P151 = "33_1258208104.50682" + .const 'Sub' $P151 = "33_1258264446.59978" capture_lex $P151 - .const 'Sub' $P136 = "30_1258208104.50682" + .const 'Sub' $P136 = "30_1258264446.59978" capture_lex $P136 - .const 'Sub' $P124 = "28_1258208104.50682" + .const 'Sub' $P124 = "28_1258264446.59978" capture_lex $P124 - .const 'Sub' $P118 = "26_1258208104.50682" + .const 'Sub' $P118 = "26_1258264446.59978" capture_lex $P118 - .const 'Sub' $P76 = "23_1258208104.50682" + .const 'Sub' $P76 = "23_1258264446.59978" capture_lex $P76 - .const 'Sub' $P67 = "21_1258208104.50682" + .const 'Sub' $P67 = "21_1258264446.59978" capture_lex $P67 - .const 'Sub' $P58 = "19_1258208104.50682" + .const 'Sub' $P58 = "19_1258264446.59978" capture_lex $P58 - .const 'Sub' $P44 = "17_1258208104.50682" + .const 'Sub' $P44 = "17_1258264446.59978" capture_lex $P44 - .const 'Sub' $P38 = "15_1258208104.50682" + .const 'Sub' $P38 = "15_1258264446.59978" capture_lex $P38 - .const 'Sub' $P33 = "13_1258208104.50682" + .const 'Sub' $P33 = "13_1258264446.59978" capture_lex $P33 - .const 'Sub' $P15 = "12_1258208104.50682" + .const 'Sub' $P15 = "12_1258264446.59978" capture_lex $P15 .annotate "line", 477 get_hll_global $P1013, ["NQP";"Regex"], "_block1012" @@ -318,7 +318,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "" :load :init :subid("post312") :outer("11_1258208104.50682") +.sub "" :load :init :subid("post312") :outer("11_1258264446.59978") .annotate "line", 4 get_hll_global $P14, ["NQP";"Grammar"], "_block13" .local pmc block @@ -375,7 +375,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "TOP" :subid("12_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "TOP" :subid("12_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 new $P17, 'ExceptionHandler' set_addr $P17, control_16 @@ -444,7 +444,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "identifier" :subid("13_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "identifier" :subid("13_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx34_tgt .local int rx34_pos @@ -490,7 +490,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__identifier" :subid("14_1258208104.50682") :method +.sub "!PREFIX__identifier" :subid("14_1258264446.59978") :method .annotate "line", 4 $P36 = self."!PREFIX__!subrule"("ident", "") new $P37, "ResizablePMCArray" @@ -500,7 +500,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "name" :subid("15_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "name" :subid("15_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx39_tgt .local int rx39_pos @@ -562,7 +562,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__name" :subid("16_1258208104.50682") :method +.sub "!PREFIX__name" :subid("16_1258264446.59978") :method .annotate "line", 4 new $P41, "ResizablePMCArray" push $P41, "" @@ -571,7 +571,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "deflongname" :subid("17_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "deflongname" :subid("17_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx45_tgt .local int rx45_pos @@ -718,7 +718,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__deflongname" :subid("18_1258208104.50682") :method +.sub "!PREFIX__deflongname" :subid("18_1258264446.59978") :method .annotate "line", 4 $P47 = self."!PREFIX__!subrule"("identifier", "") new $P48, "ResizablePMCArray" @@ -728,7 +728,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "ENDSTMT" :subid("19_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "ENDSTMT" :subid("19_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx59_tgt .local int rx59_pos @@ -808,7 +808,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__ENDSTMT" :subid("20_1258208104.50682") :method +.sub "!PREFIX__ENDSTMT" :subid("20_1258264446.59978") :method .annotate "line", 4 new $P61, "ResizablePMCArray" push $P61, "" @@ -817,7 +817,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "ws" :subid("21_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "ws" :subid("21_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx68_tgt .local int rx68_pos @@ -931,7 +931,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__ws" :subid("22_1258208104.50682") :method +.sub "!PREFIX__ws" :subid("22_1258264446.59978") :method .annotate "line", 4 new $P70, "ResizablePMCArray" push $P70, "" @@ -941,9 +941,9 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "pod_comment" :subid("23_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "pod_comment" :subid("23_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 - .const 'Sub' $P110 = "25_1258208104.50682" + .const 'Sub' $P110 = "25_1258264446.59978" capture_lex $P110 .local string rx77_tgt .local int rx77_pos @@ -1363,7 +1363,7 @@ NQP::Compiler - NQP compiler .annotate "line", 56 # rx subrule "before" subtype=zerowidth negate= rx77_cur."!cursor_pos"(rx77_pos) - .const 'Sub' $P110 = "25_1258208104.50682" + .const 'Sub' $P110 = "25_1258264446.59978" capture_lex $P110 $P10 = rx77_cur."before"($P110) unless $P10, rx77_fail @@ -1430,7 +1430,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__pod_comment" :subid("24_1258208104.50682") :method +.sub "!PREFIX__pod_comment" :subid("24_1258264446.59978") :method .annotate "line", 4 new $P79, "ResizablePMCArray" push $P79, "" @@ -1439,7 +1439,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "_block109" :anon :subid("25_1258208104.50682") :method :outer("23_1258208104.50682") +.sub "_block109" :anon :subid("25_1258264446.59978") :method :outer("23_1258264446.59978") .annotate "line", 56 .local string rx111_tgt .local int rx111_pos @@ -1519,7 +1519,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "comp_unit" :subid("26_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "comp_unit" :subid("26_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx119_tgt .local int rx119_pos @@ -1586,7 +1586,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__comp_unit" :subid("27_1258208104.50682") :method +.sub "!PREFIX__comp_unit" :subid("27_1258264446.59978") :method .annotate "line", 4 $P121 = self."!PREFIX__!subrule"("", "") new $P122, "ResizablePMCArray" @@ -1596,7 +1596,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statementlist" :subid("28_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statementlist" :subid("28_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx125_tgt .local int rx125_pos @@ -1692,7 +1692,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statementlist" :subid("29_1258208104.50682") :method +.sub "!PREFIX__statementlist" :subid("29_1258264446.59978") :method .annotate "line", 4 new $P127, "ResizablePMCArray" push $P127, "" @@ -1702,9 +1702,9 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement" :subid("30_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement" :subid("30_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 - .const 'Sub' $P141 = "32_1258208104.50682" + .const 'Sub' $P141 = "32_1258264446.59978" capture_lex $P141 .local string rx137_tgt .local int rx137_pos @@ -1727,7 +1727,7 @@ NQP::Compiler - NQP compiler .annotate "line", 78 # rx subrule "before" subtype=zerowidth negate=1 rx137_cur."!cursor_pos"(rx137_pos) - .const 'Sub' $P141 = "32_1258208104.50682" + .const 'Sub' $P141 = "32_1258264446.59978" capture_lex $P141 $P10 = rx137_cur."before"($P141) if $P10, rx137_fail @@ -1823,7 +1823,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement" :subid("31_1258208104.50682") :method +.sub "!PREFIX__statement" :subid("31_1258264446.59978") :method .annotate "line", 4 new $P139, "ResizablePMCArray" push $P139, "" @@ -1832,7 +1832,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "_block140" :anon :subid("32_1258208104.50682") :method :outer("30_1258208104.50682") +.sub "_block140" :anon :subid("32_1258264446.59978") :method :outer("30_1258264446.59978") .annotate "line", 78 .local string rx142_tgt .local int rx142_pos @@ -1893,7 +1893,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "eat_terminator" :subid("33_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "eat_terminator" :subid("33_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx152_tgt .local int rx152_pos @@ -1968,7 +1968,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__eat_terminator" :subid("34_1258208104.50682") :method +.sub "!PREFIX__eat_terminator" :subid("34_1258264446.59978") :method .annotate "line", 4 new $P154, "ResizablePMCArray" push $P154, "" @@ -1980,7 +1980,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "xblock" :subid("35_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "xblock" :subid("35_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx157_tgt .local int rx157_pos @@ -2039,7 +2039,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__xblock" :subid("36_1258208104.50682") :method +.sub "!PREFIX__xblock" :subid("36_1258264446.59978") :method .annotate "line", 4 $P159 = self."!PREFIX__!subrule"("EXPR", "") new $P160, "ResizablePMCArray" @@ -2049,7 +2049,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "pblock" :subid("37_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "pblock" :subid("37_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx162_tgt .local int rx162_pos @@ -2156,7 +2156,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__pblock" :subid("38_1258208104.50682") :method +.sub "!PREFIX__pblock" :subid("38_1258264446.59978") :method .annotate "line", 4 $P164 = self."!PREFIX__!subrule"("", "") $P165 = self."!PREFIX__!subrule"("", "") @@ -2169,7 +2169,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "lambda" :subid("39_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "lambda" :subid("39_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx169_tgt .local int rx169_pos @@ -2228,7 +2228,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__lambda" :subid("40_1258208104.50682") :method +.sub "!PREFIX__lambda" :subid("40_1258264446.59978") :method .annotate "line", 4 new $P171, "ResizablePMCArray" push $P171, "<->" @@ -2238,7 +2238,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "block" :subid("41_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "block" :subid("41_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx174_tgt .local int rx174_pos @@ -2309,7 +2309,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__block" :subid("42_1258208104.50682") :method +.sub "!PREFIX__block" :subid("42_1258264446.59978") :method .annotate "line", 4 $P176 = self."!PREFIX__!subrule"("", "") new $P177, "ResizablePMCArray" @@ -2320,7 +2320,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "blockoid" :subid("43_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "blockoid" :subid("43_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx180_tgt .local int rx180_pos @@ -2403,7 +2403,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__blockoid" :subid("44_1258208104.50682") :method +.sub "!PREFIX__blockoid" :subid("44_1258264446.59978") :method .annotate "line", 4 $P182 = self."!PREFIX__!subrule"("", "") new $P183, "ResizablePMCArray" @@ -2413,7 +2413,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "newpad" :subid("45_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "newpad" :subid("45_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx187_tgt .local int rx187_pos @@ -2452,7 +2452,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__newpad" :subid("46_1258208104.50682") :method +.sub "!PREFIX__newpad" :subid("46_1258264446.59978") :method .annotate "line", 4 new $P189, "ResizablePMCArray" push $P189, "" @@ -2461,7 +2461,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "finishpad" :subid("47_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "finishpad" :subid("47_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx191_tgt .local int rx191_pos @@ -2500,7 +2500,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__finishpad" :subid("48_1258208104.50682") :method +.sub "!PREFIX__finishpad" :subid("48_1258264446.59978") :method .annotate "line", 4 new $P193, "ResizablePMCArray" push $P193, "" @@ -2509,7 +2509,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "terminator" :subid("49_1258208104.50682") :method +.sub "terminator" :subid("49_1258264446.59978") :method .annotate "line", 128 $P195 = self."!protoregex"("terminator") .return ($P195) @@ -2517,7 +2517,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__terminator" :subid("50_1258208104.50682") :method +.sub "!PREFIX__terminator" :subid("50_1258264446.59978") :method .annotate "line", 128 $P197 = self."!PREFIX__!protoregex"("terminator") .return ($P197) @@ -2525,7 +2525,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "terminator:sym<;>" :subid("51_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "terminator:sym<;>" :subid("51_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx199_tgt .local int rx199_pos @@ -2570,7 +2570,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__terminator:sym<;>" :subid("52_1258208104.50682") :method +.sub "!PREFIX__terminator:sym<;>" :subid("52_1258264446.59978") :method .annotate "line", 4 new $P201, "ResizablePMCArray" push $P201, ";" @@ -2579,7 +2579,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "terminator:sym<}>" :subid("53_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "terminator:sym<}>" :subid("53_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx203_tgt .local int rx203_pos @@ -2624,7 +2624,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__terminator:sym<}>" :subid("54_1258208104.50682") :method +.sub "!PREFIX__terminator:sym<}>" :subid("54_1258264446.59978") :method .annotate "line", 4 new $P205, "ResizablePMCArray" push $P205, "}" @@ -2633,7 +2633,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_control" :subid("55_1258208104.50682") :method +.sub "statement_control" :subid("55_1258264446.59978") :method .annotate "line", 135 $P207 = self."!protoregex"("statement_control") .return ($P207) @@ -2641,7 +2641,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_control" :subid("56_1258208104.50682") :method +.sub "!PREFIX__statement_control" :subid("56_1258264446.59978") :method .annotate "line", 135 $P209 = self."!PREFIX__!protoregex"("statement_control") .return ($P209) @@ -2649,7 +2649,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_control:sym" :subid("57_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_control:sym" :subid("57_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx211_tgt .local int rx211_pos @@ -2659,7 +2659,7 @@ NQP::Compiler - NQP compiler .local pmc rx211_cur (rx211_cur, rx211_pos, rx211_tgt, $I10) = self."!cursor_start"() rx211_cur."!cursor_debug"("START ", "statement_control:sym") - rx211_cur."!cursor_caparray"("else", "xblock") + rx211_cur."!cursor_caparray"("xblock", "else") .lex unicode:"$\x{a2}", rx211_cur .local pmc match .lex "$/", match @@ -2825,7 +2825,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_control:sym" :subid("58_1258208104.50682") :method +.sub "!PREFIX__statement_control:sym" :subid("58_1258264446.59978") :method .annotate "line", 4 new $P213, "ResizablePMCArray" push $P213, "if" @@ -2834,9 +2834,9 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_control:sym" :subid("59_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_control:sym" :subid("59_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 - .const 'Sub' $P239 = "61_1258208104.50682" + .const 'Sub' $P239 = "61_1258264446.59978" capture_lex $P239 .local string rx230_tgt .local int rx230_pos @@ -2906,7 +2906,7 @@ NQP::Compiler - NQP compiler rx230_pos = $P10."pos"() # rx subrule "before" subtype=zerowidth negate=1 rx230_cur."!cursor_pos"(rx230_pos) - .const 'Sub' $P239 = "61_1258208104.50682" + .const 'Sub' $P239 = "61_1258264446.59978" capture_lex $P239 $P10 = rx230_cur."before"($P239) if $P10, rx230_fail @@ -2958,7 +2958,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_control:sym" :subid("60_1258208104.50682") :method +.sub "!PREFIX__statement_control:sym" :subid("60_1258264446.59978") :method .annotate "line", 4 new $P232, "ResizablePMCArray" push $P232, "unless" @@ -2967,7 +2967,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "_block238" :anon :subid("61_1258208104.50682") :method :outer("59_1258208104.50682") +.sub "_block238" :anon :subid("61_1258264446.59978") :method :outer("59_1258264446.59978") .annotate "line", 147 .local string rx240_tgt .local int rx240_pos @@ -3020,7 +3020,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_control:sym" :subid("62_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_control:sym" :subid("62_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx247_tgt .local int rx247_pos @@ -3112,7 +3112,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_control:sym" :subid("63_1258208104.50682") :method +.sub "!PREFIX__statement_control:sym" :subid("63_1258264446.59978") :method .annotate "line", 4 new $P249, "ResizablePMCArray" push $P249, "until" @@ -3122,7 +3122,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_control:sym" :subid("64_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_control:sym" :subid("64_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx255_tgt .local int rx255_pos @@ -3339,7 +3339,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_control:sym" :subid("65_1258208104.50682") :method +.sub "!PREFIX__statement_control:sym" :subid("65_1258264446.59978") :method .annotate "line", 4 new $P257, "ResizablePMCArray" push $P257, "repeat" @@ -3348,7 +3348,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_control:sym" :subid("66_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_control:sym" :subid("66_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx274_tgt .local int rx274_pos @@ -3427,7 +3427,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_control:sym" :subid("67_1258208104.50682") :method +.sub "!PREFIX__statement_control:sym" :subid("67_1258264446.59978") :method .annotate "line", 4 new $P276, "ResizablePMCArray" push $P276, "for" @@ -3436,7 +3436,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_prefix" :subid("68_1258208104.50682") :method +.sub "statement_prefix" :subid("68_1258264446.59978") :method .annotate "line", 168 $P281 = self."!protoregex"("statement_prefix") .return ($P281) @@ -3444,7 +3444,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_prefix" :subid("69_1258208104.50682") :method +.sub "!PREFIX__statement_prefix" :subid("69_1258264446.59978") :method .annotate "line", 168 $P283 = self."!PREFIX__!protoregex"("statement_prefix") .return ($P283) @@ -3452,7 +3452,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_prefix:sym" :subid("70_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_prefix:sym" :subid("70_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx285_tgt .local int rx285_pos @@ -3519,7 +3519,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_prefix:sym" :subid("71_1258208104.50682") :method +.sub "!PREFIX__statement_prefix:sym" :subid("71_1258264446.59978") :method .annotate "line", 4 $P287 = self."!PREFIX__!subrule"("blorst", "INIT") new $P288, "ResizablePMCArray" @@ -3529,7 +3529,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "blorst" :subid("72_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "blorst" :subid("72_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx291_tgt .local int rx291_pos @@ -3606,7 +3606,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__blorst" :subid("73_1258208104.50682") :method +.sub "!PREFIX__blorst" :subid("73_1258264446.59978") :method .annotate "line", 4 new $P293, "ResizablePMCArray" push $P293, "" @@ -3615,7 +3615,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_mod_cond" :subid("74_1258208104.50682") :method +.sub "statement_mod_cond" :subid("74_1258264446.59978") :method .annotate "line", 177 $P296 = self."!protoregex"("statement_mod_cond") .return ($P296) @@ -3623,7 +3623,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_mod_cond" :subid("75_1258208104.50682") :method +.sub "!PREFIX__statement_mod_cond" :subid("75_1258264446.59978") :method .annotate "line", 177 $P298 = self."!PREFIX__!protoregex"("statement_mod_cond") .return ($P298) @@ -3631,7 +3631,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_mod_cond:sym" :subid("76_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_mod_cond:sym" :subid("76_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx300_tgt .local int rx300_pos @@ -3708,7 +3708,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_mod_cond:sym" :subid("77_1258208104.50682") :method +.sub "!PREFIX__statement_mod_cond:sym" :subid("77_1258264446.59978") :method .annotate "line", 4 new $P302, "ResizablePMCArray" push $P302, "if" @@ -3717,7 +3717,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_mod_cond:sym" :subid("78_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_mod_cond:sym" :subid("78_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx307_tgt .local int rx307_pos @@ -3794,7 +3794,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_mod_cond:sym" :subid("79_1258208104.50682") :method +.sub "!PREFIX__statement_mod_cond:sym" :subid("79_1258264446.59978") :method .annotate "line", 4 new $P309, "ResizablePMCArray" push $P309, "unless" @@ -3803,7 +3803,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_mod_loop" :subid("80_1258208104.50682") :method +.sub "statement_mod_loop" :subid("80_1258264446.59978") :method .annotate "line", 182 $P314 = self."!protoregex"("statement_mod_loop") .return ($P314) @@ -3811,7 +3811,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_mod_loop" :subid("81_1258208104.50682") :method +.sub "!PREFIX__statement_mod_loop" :subid("81_1258264446.59978") :method .annotate "line", 182 $P316 = self."!PREFIX__!protoregex"("statement_mod_loop") .return ($P316) @@ -3819,7 +3819,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_mod_loop:sym" :subid("82_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_mod_loop:sym" :subid("82_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx318_tgt .local int rx318_pos @@ -3896,7 +3896,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_mod_loop:sym" :subid("83_1258208104.50682") :method +.sub "!PREFIX__statement_mod_loop:sym" :subid("83_1258264446.59978") :method .annotate "line", 4 new $P320, "ResizablePMCArray" push $P320, "while" @@ -3905,7 +3905,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "statement_mod_loop:sym" :subid("84_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "statement_mod_loop:sym" :subid("84_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx325_tgt .local int rx325_pos @@ -3982,7 +3982,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__statement_mod_loop:sym" :subid("85_1258208104.50682") :method +.sub "!PREFIX__statement_mod_loop:sym" :subid("85_1258264446.59978") :method .annotate "line", 4 new $P327, "ResizablePMCArray" push $P327, "until" @@ -3991,7 +3991,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("86_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("86_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx332_tgt .local int rx332_pos @@ -4037,7 +4037,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("87_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("87_1258264446.59978") :method .annotate "line", 4 $P334 = self."!PREFIX__!subrule"("colonpair", "") new $P335, "ResizablePMCArray" @@ -4047,7 +4047,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("88_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("88_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx337_tgt .local int rx337_pos @@ -4093,7 +4093,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("89_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("89_1258264446.59978") :method .annotate "line", 4 $P339 = self."!PREFIX__!subrule"("variable", "") new $P340, "ResizablePMCArray" @@ -4103,7 +4103,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("90_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("90_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx342_tgt .local int rx342_pos @@ -4149,7 +4149,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("91_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("91_1258264446.59978") :method .annotate "line", 4 $P344 = self."!PREFIX__!subrule"("package_declarator", "") new $P345, "ResizablePMCArray" @@ -4159,7 +4159,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("92_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("92_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx347_tgt .local int rx347_pos @@ -4205,7 +4205,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("93_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("93_1258264446.59978") :method .annotate "line", 4 $P349 = self."!PREFIX__!subrule"("scope_declarator", "") new $P350, "ResizablePMCArray" @@ -4215,7 +4215,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("94_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("94_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx352_tgt .local int rx352_pos @@ -4261,7 +4261,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("95_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("95_1258264446.59978") :method .annotate "line", 4 $P354 = self."!PREFIX__!subrule"("routine_declarator", "") new $P355, "ResizablePMCArray" @@ -4271,7 +4271,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("96_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("96_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx357_tgt .local int rx357_pos @@ -4317,7 +4317,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("97_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("97_1258264446.59978") :method .annotate "line", 4 $P359 = self."!PREFIX__!subrule"("regex_declarator", "") new $P360, "ResizablePMCArray" @@ -4327,7 +4327,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("98_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("98_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx362_tgt .local int rx362_pos @@ -4373,7 +4373,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("99_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("99_1258264446.59978") :method .annotate "line", 4 $P364 = self."!PREFIX__!subrule"("statement_prefix", "") new $P365, "ResizablePMCArray" @@ -4383,7 +4383,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("100_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("100_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx367_tgt .local int rx367_pos @@ -4433,7 +4433,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("101_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("101_1258264446.59978") :method .annotate "line", 4 new $P369, "ResizablePMCArray" push $P369, "" @@ -4442,7 +4442,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "colonpair" :subid("102_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "colonpair" :subid("102_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx371_tgt .local int rx371_pos @@ -4547,7 +4547,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__colonpair" :subid("103_1258208104.50682") :method +.sub "!PREFIX__colonpair" :subid("103_1258264446.59978") :method .annotate "line", 4 $P373 = self."!PREFIX__!subrule"("identifier", ":") $P374 = self."!PREFIX__!subrule"("identifier", ":!") @@ -4559,7 +4559,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "variable" :subid("104_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "variable" :subid("104_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx381_tgt .local int rx381_pos @@ -4702,7 +4702,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__variable" :subid("105_1258208104.50682") :method +.sub "!PREFIX__variable" :subid("105_1258264446.59978") :method .annotate "line", 4 $P383 = self."!PREFIX__!subrule"("sigil", "") $P384 = self."!PREFIX__!subrule"("sigil", "") @@ -4717,7 +4717,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "sigil" :subid("106_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "sigil" :subid("106_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx392_tgt .local int rx392_pos @@ -4763,7 +4763,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__sigil" :subid("107_1258208104.50682") :method +.sub "!PREFIX__sigil" :subid("107_1258264446.59978") :method .annotate "line", 4 new $P394, "ResizablePMCArray" push $P394, "&" @@ -4775,7 +4775,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "twigil" :subid("108_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "twigil" :subid("108_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx396_tgt .local int rx396_pos @@ -4821,7 +4821,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__twigil" :subid("109_1258208104.50682") :method +.sub "!PREFIX__twigil" :subid("109_1258264446.59978") :method .annotate "line", 4 new $P398, "ResizablePMCArray" push $P398, "?" @@ -4832,7 +4832,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "package_declarator" :subid("110_1258208104.50682") :method +.sub "package_declarator" :subid("110_1258264446.59978") :method .annotate "line", 216 $P400 = self."!protoregex"("package_declarator") .return ($P400) @@ -4840,7 +4840,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__package_declarator" :subid("111_1258208104.50682") :method +.sub "!PREFIX__package_declarator" :subid("111_1258264446.59978") :method .annotate "line", 216 $P402 = self."!PREFIX__!protoregex"("package_declarator") .return ($P402) @@ -4848,7 +4848,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "package_declarator:sym" :subid("112_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "package_declarator:sym" :subid("112_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx404_tgt .local int rx404_pos @@ -4915,7 +4915,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__package_declarator:sym" :subid("113_1258208104.50682") :method +.sub "!PREFIX__package_declarator:sym" :subid("113_1258264446.59978") :method .annotate "line", 4 $P406 = self."!PREFIX__!subrule"("package_def", "module") new $P407, "ResizablePMCArray" @@ -4925,7 +4925,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "package_declarator:sym" :subid("114_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "package_declarator:sym" :subid("114_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx410_tgt .local int rx410_pos @@ -5005,7 +5005,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__package_declarator:sym" :subid("115_1258208104.50682") :method +.sub "!PREFIX__package_declarator:sym" :subid("115_1258264446.59978") :method .annotate "line", 4 $P412 = self."!PREFIX__!subrule"("package_def", "grammar") $P413 = self."!PREFIX__!subrule"("package_def", "class") @@ -5017,7 +5017,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "package_def" :subid("116_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "package_def" :subid("116_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx418_tgt .local int rx418_pos @@ -5209,7 +5209,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__package_def" :subid("117_1258208104.50682") :method +.sub "!PREFIX__package_def" :subid("117_1258264446.59978") :method .annotate "line", 4 new $P420, "ResizablePMCArray" push $P420, "" @@ -5218,7 +5218,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "scope_declarator" :subid("118_1258208104.50682") :method +.sub "scope_declarator" :subid("118_1258264446.59978") :method .annotate "line", 230 $P440 = self."!protoregex"("scope_declarator") .return ($P440) @@ -5226,7 +5226,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__scope_declarator" :subid("119_1258208104.50682") :method +.sub "!PREFIX__scope_declarator" :subid("119_1258264446.59978") :method .annotate "line", 230 $P442 = self."!PREFIX__!protoregex"("scope_declarator") .return ($P442) @@ -5234,7 +5234,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "scope_declarator:sym" :subid("120_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "scope_declarator:sym" :subid("120_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx444_tgt .local int rx444_pos @@ -5301,7 +5301,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__scope_declarator:sym" :subid("121_1258208104.50682") :method +.sub "!PREFIX__scope_declarator:sym" :subid("121_1258264446.59978") :method .annotate "line", 4 $P446 = self."!PREFIX__!subrule"("scoped", "my") new $P447, "ResizablePMCArray" @@ -5311,7 +5311,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "scope_declarator:sym" :subid("122_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "scope_declarator:sym" :subid("122_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx450_tgt .local int rx450_pos @@ -5378,7 +5378,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__scope_declarator:sym" :subid("123_1258208104.50682") :method +.sub "!PREFIX__scope_declarator:sym" :subid("123_1258264446.59978") :method .annotate "line", 4 $P452 = self."!PREFIX__!subrule"("scoped", "our") new $P453, "ResizablePMCArray" @@ -5388,7 +5388,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "scope_declarator:sym" :subid("124_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "scope_declarator:sym" :subid("124_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx456_tgt .local int rx456_pos @@ -5455,7 +5455,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__scope_declarator:sym" :subid("125_1258208104.50682") :method +.sub "!PREFIX__scope_declarator:sym" :subid("125_1258264446.59978") :method .annotate "line", 4 $P458 = self."!PREFIX__!subrule"("scoped", "has") new $P459, "ResizablePMCArray" @@ -5465,7 +5465,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "scoped" :subid("126_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "scoped" :subid("126_1258264446.59978") :method :outer("11_1258264446.59978") .param pmc param_462 .annotate "line", 235 .lex "$*SCOPE", param_462 @@ -5550,7 +5550,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__scoped" :subid("127_1258208104.50682") :method +.sub "!PREFIX__scoped" :subid("127_1258264446.59978") :method .annotate "line", 4 new $P465, "ResizablePMCArray" push $P465, "" @@ -5560,7 +5560,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "variable_declarator" :subid("128_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "variable_declarator" :subid("128_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx472_tgt .local int rx472_pos @@ -5606,7 +5606,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__variable_declarator" :subid("129_1258208104.50682") :method +.sub "!PREFIX__variable_declarator" :subid("129_1258264446.59978") :method .annotate "line", 4 $P474 = self."!PREFIX__!subrule"("variable", "") new $P475, "ResizablePMCArray" @@ -5616,7 +5616,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "routine_declarator" :subid("130_1258208104.50682") :method +.sub "routine_declarator" :subid("130_1258264446.59978") :method .annotate "line", 242 $P477 = self."!protoregex"("routine_declarator") .return ($P477) @@ -5624,7 +5624,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__routine_declarator" :subid("131_1258208104.50682") :method +.sub "!PREFIX__routine_declarator" :subid("131_1258264446.59978") :method .annotate "line", 242 $P479 = self."!PREFIX__!protoregex"("routine_declarator") .return ($P479) @@ -5632,7 +5632,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "routine_declarator:sym" :subid("132_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "routine_declarator:sym" :subid("132_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx481_tgt .local int rx481_pos @@ -5699,7 +5699,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__routine_declarator:sym" :subid("133_1258208104.50682") :method +.sub "!PREFIX__routine_declarator:sym" :subid("133_1258264446.59978") :method .annotate "line", 4 $P483 = self."!PREFIX__!subrule"("routine_def", "sub") new $P484, "ResizablePMCArray" @@ -5709,7 +5709,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "routine_declarator:sym" :subid("134_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "routine_declarator:sym" :subid("134_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx487_tgt .local int rx487_pos @@ -5776,7 +5776,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__routine_declarator:sym" :subid("135_1258208104.50682") :method +.sub "!PREFIX__routine_declarator:sym" :subid("135_1258264446.59978") :method .annotate "line", 4 $P489 = self."!PREFIX__!subrule"("method_def", "method") new $P490, "ResizablePMCArray" @@ -5786,7 +5786,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "routine_def" :subid("136_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "routine_def" :subid("136_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx493_tgt .local int rx493_pos @@ -5944,7 +5944,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__routine_def" :subid("137_1258208104.50682") :method +.sub "!PREFIX__routine_def" :subid("137_1258264446.59978") :method .annotate "line", 4 new $P495, "ResizablePMCArray" push $P495, "" @@ -5953,7 +5953,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "method_def" :subid("138_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "method_def" :subid("138_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx511_tgt .local int rx511_pos @@ -6111,7 +6111,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__method_def" :subid("139_1258208104.50682") :method +.sub "!PREFIX__method_def" :subid("139_1258264446.59978") :method .annotate "line", 4 new $P513, "ResizablePMCArray" push $P513, "" @@ -6120,7 +6120,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "signature" :subid("140_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "signature" :subid("140_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx529_tgt .local int rx529_pos @@ -6198,7 +6198,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__signature" :subid("141_1258208104.50682") :method +.sub "!PREFIX__signature" :subid("141_1258264446.59978") :method .annotate "line", 4 new $P531, "ResizablePMCArray" push $P531, "" @@ -6207,7 +6207,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "parameter" :subid("142_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "parameter" :subid("142_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx537_tgt .local int rx537_pos @@ -6356,7 +6356,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__parameter" :subid("143_1258208104.50682") :method +.sub "!PREFIX__parameter" :subid("143_1258264446.59978") :method .annotate "line", 4 $P539 = self."!PREFIX__!subrule"("named_param", "") $P540 = self."!PREFIX__!subrule"("param_var", "") @@ -6370,7 +6370,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "param_var" :subid("144_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "param_var" :subid("144_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx551_tgt .local int rx551_pos @@ -6466,7 +6466,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__param_var" :subid("145_1258208104.50682") :method +.sub "!PREFIX__param_var" :subid("145_1258264446.59978") :method .annotate "line", 4 $P553 = self."!PREFIX__!subrule"("sigil", "") new $P554, "ResizablePMCArray" @@ -6476,7 +6476,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "named_param" :subid("146_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "named_param" :subid("146_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx560_tgt .local int rx560_pos @@ -6530,7 +6530,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__named_param" :subid("147_1258208104.50682") :method +.sub "!PREFIX__named_param" :subid("147_1258264446.59978") :method .annotate "line", 4 $P562 = self."!PREFIX__!subrule"("param_var", ":") new $P563, "ResizablePMCArray" @@ -6540,7 +6540,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "default_value" :subid("148_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "default_value" :subid("148_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx565_tgt .local int rx565_pos @@ -6608,7 +6608,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__default_value" :subid("149_1258208104.50682") :method +.sub "!PREFIX__default_value" :subid("149_1258264446.59978") :method .annotate "line", 4 new $P567, "ResizablePMCArray" push $P567, "" @@ -6617,7 +6617,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "regex_declarator" :subid("150_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "regex_declarator" :subid("150_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx572_tgt .local int rx572_pos @@ -6972,7 +6972,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__regex_declarator" :subid("151_1258208104.50682") :method +.sub "!PREFIX__regex_declarator" :subid("151_1258264446.59978") :method .annotate "line", 4 new $P574, "ResizablePMCArray" push $P574, "" @@ -6981,7 +6981,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "dotty" :subid("152_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "dotty" :subid("152_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx603_tgt .local int rx603_pos @@ -7086,7 +7086,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__dotty" :subid("153_1258208104.50682") :method +.sub "!PREFIX__dotty" :subid("153_1258264446.59978") :method .annotate "line", 4 $P605 = self."!PREFIX__!subrule"("identifier", ".") new $P606, "ResizablePMCArray" @@ -7096,7 +7096,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term" :subid("154_1258208104.50682") :method +.sub "term" :subid("154_1258264446.59978") :method .annotate "line", 306 $P611 = self."!protoregex"("term") .return ($P611) @@ -7104,7 +7104,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term" :subid("155_1258208104.50682") :method +.sub "!PREFIX__term" :subid("155_1258264446.59978") :method .annotate "line", 306 $P613 = self."!PREFIX__!protoregex"("term") .return ($P613) @@ -7112,7 +7112,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("156_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("156_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx615_tgt .local int rx615_pos @@ -7180,7 +7180,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("157_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("157_1258264446.59978") :method .annotate "line", 4 new $P617, "ResizablePMCArray" push $P617, "self" @@ -7189,7 +7189,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("158_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("158_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx620_tgt .local int rx620_pos @@ -7249,7 +7249,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("159_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("159_1258264446.59978") :method .annotate "line", 4 $P622 = self."!PREFIX__!subrule"("identifier", "") new $P623, "ResizablePMCArray" @@ -7259,7 +7259,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("160_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("160_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx625_tgt .local int rx625_pos @@ -7320,7 +7320,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("161_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("161_1258264446.59978") :method .annotate "line", 4 $P627 = self."!PREFIX__!subrule"("name", "") new $P628, "ResizablePMCArray" @@ -7330,7 +7330,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("162_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("162_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx632_tgt .local int rx632_pos @@ -7411,7 +7411,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("163_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("163_1258264446.59978") :method .annotate "line", 4 new $P634, "ResizablePMCArray" push $P634, "pir::" @@ -7420,7 +7420,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "args" :subid("164_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "args" :subid("164_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx639_tgt .local int rx639_pos @@ -7480,7 +7480,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__args" :subid("165_1258208104.50682") :method +.sub "!PREFIX__args" :subid("165_1258264446.59978") :method .annotate "line", 4 $P641 = self."!PREFIX__!subrule"("arglist", "(") new $P642, "ResizablePMCArray" @@ -7490,7 +7490,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "arglist" :subid("166_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "arglist" :subid("166_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx644_tgt .local int rx644_pos @@ -7550,7 +7550,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__arglist" :subid("167_1258208104.50682") :method +.sub "!PREFIX__arglist" :subid("167_1258264446.59978") :method .annotate "line", 4 $P646 = self."!PREFIX__!subrule"("", "") new $P647, "ResizablePMCArray" @@ -7560,7 +7560,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "term:sym" :subid("168_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "term:sym" :subid("168_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx650_tgt .local int rx650_pos @@ -7606,7 +7606,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__term:sym" :subid("169_1258208104.50682") :method +.sub "!PREFIX__term:sym" :subid("169_1258264446.59978") :method .annotate "line", 4 $P652 = self."!PREFIX__!subrule"("value", "") new $P653, "ResizablePMCArray" @@ -7616,7 +7616,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "value" :subid("170_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "value" :subid("170_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx655_tgt .local int rx655_pos @@ -7690,7 +7690,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__value" :subid("171_1258208104.50682") :method +.sub "!PREFIX__value" :subid("171_1258264446.59978") :method .annotate "line", 4 $P657 = self."!PREFIX__!subrule"("integer", "") $P658 = self."!PREFIX__!subrule"("quote", "") @@ -7704,7 +7704,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote" :subid("172_1258208104.50682") :method +.sub "quote" :subid("172_1258264446.59978") :method .annotate "line", 343 $P663 = self."!protoregex"("quote") .return ($P663) @@ -7712,7 +7712,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote" :subid("173_1258208104.50682") :method +.sub "!PREFIX__quote" :subid("173_1258264446.59978") :method .annotate "line", 343 $P665 = self."!PREFIX__!protoregex"("quote") .return ($P665) @@ -7720,7 +7720,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote:sym" :subid("174_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "quote:sym" :subid("174_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx667_tgt .local int rx667_pos @@ -7772,7 +7772,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote:sym" :subid("175_1258208104.50682") :method +.sub "!PREFIX__quote:sym" :subid("175_1258264446.59978") :method .annotate "line", 4 new $P669, "ResizablePMCArray" push $P669, "'" @@ -7781,7 +7781,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote:sym" :subid("176_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "quote:sym" :subid("176_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx671_tgt .local int rx671_pos @@ -7833,7 +7833,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote:sym" :subid("177_1258208104.50682") :method +.sub "!PREFIX__quote:sym" :subid("177_1258264446.59978") :method .annotate "line", 4 new $P673, "ResizablePMCArray" push $P673, "\"" @@ -7842,7 +7842,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote:sym" :subid("178_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "quote:sym" :subid("178_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx675_tgt .local int rx675_pos @@ -7906,7 +7906,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote:sym" :subid("179_1258208104.50682") :method +.sub "!PREFIX__quote:sym" :subid("179_1258264446.59978") :method .annotate "line", 4 $P677 = self."!PREFIX__!subrule"("", "q") new $P678, "ResizablePMCArray" @@ -7916,7 +7916,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote:sym" :subid("180_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "quote:sym" :subid("180_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx680_tgt .local int rx680_pos @@ -7980,7 +7980,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote:sym" :subid("181_1258208104.50682") :method +.sub "!PREFIX__quote:sym" :subid("181_1258264446.59978") :method .annotate "line", 4 $P682 = self."!PREFIX__!subrule"("", "qq") new $P683, "ResizablePMCArray" @@ -7990,7 +7990,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote:sym" :subid("182_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "quote:sym" :subid("182_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx685_tgt .local int rx685_pos @@ -8054,7 +8054,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote:sym" :subid("183_1258208104.50682") :method +.sub "!PREFIX__quote:sym" :subid("183_1258264446.59978") :method .annotate "line", 4 $P687 = self."!PREFIX__!subrule"("", "Q") new $P688, "ResizablePMCArray" @@ -8064,7 +8064,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote:sym" :subid("184_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "quote:sym" :subid("184_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx690_tgt .local int rx690_pos @@ -8122,7 +8122,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote:sym" :subid("185_1258208104.50682") :method +.sub "!PREFIX__quote:sym" :subid("185_1258264446.59978") :method .annotate "line", 4 $P692 = self."!PREFIX__!subrule"("", "Q:PIR") new $P693, "ResizablePMCArray" @@ -8132,7 +8132,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote_escape:sym<$>" :subid("186_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "quote_escape:sym<$>" :subid("186_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx695_tgt .local int rx695_pos @@ -8188,7 +8188,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote_escape:sym<$>" :subid("187_1258208104.50682") :method +.sub "!PREFIX__quote_escape:sym<$>" :subid("187_1258264446.59978") :method .annotate "line", 4 new $P697, "ResizablePMCArray" push $P697, "$" @@ -8197,7 +8197,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "quote_escape:sym<{ }>" :subid("188_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "quote_escape:sym<{ }>" :subid("188_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx699_tgt .local int rx699_pos @@ -8253,7 +8253,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__quote_escape:sym<{ }>" :subid("189_1258208104.50682") :method +.sub "!PREFIX__quote_escape:sym<{ }>" :subid("189_1258264446.59978") :method .annotate "line", 4 new $P701, "ResizablePMCArray" push $P701, "{" @@ -8262,7 +8262,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "circumfix:sym<( )>" :subid("190_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "circumfix:sym<( )>" :subid("190_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx703_tgt .local int rx703_pos @@ -8334,7 +8334,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__circumfix:sym<( )>" :subid("191_1258208104.50682") :method +.sub "!PREFIX__circumfix:sym<( )>" :subid("191_1258264446.59978") :method .annotate "line", 4 $P705 = self."!PREFIX__!subrule"("", "(") new $P706, "ResizablePMCArray" @@ -8344,7 +8344,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "circumfix:sym<[ ]>" :subid("192_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "circumfix:sym<[ ]>" :subid("192_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx710_tgt .local int rx710_pos @@ -8416,7 +8416,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__circumfix:sym<[ ]>" :subid("193_1258208104.50682") :method +.sub "!PREFIX__circumfix:sym<[ ]>" :subid("193_1258264446.59978") :method .annotate "line", 4 $P712 = self."!PREFIX__!subrule"("", "[") new $P713, "ResizablePMCArray" @@ -8426,7 +8426,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "circumfix:sym" :subid("194_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "circumfix:sym" :subid("194_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx717_tgt .local int rx717_pos @@ -8478,7 +8478,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__circumfix:sym" :subid("195_1258208104.50682") :method +.sub "!PREFIX__circumfix:sym" :subid("195_1258264446.59978") :method .annotate "line", 4 new $P719, "ResizablePMCArray" push $P719, "<" @@ -8487,7 +8487,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "circumfix:sym<{ }>" :subid("196_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "circumfix:sym<{ }>" :subid("196_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx721_tgt .local int rx721_pos @@ -8539,7 +8539,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__circumfix:sym<{ }>" :subid("197_1258208104.50682") :method +.sub "!PREFIX__circumfix:sym<{ }>" :subid("197_1258264446.59978") :method .annotate "line", 4 new $P723, "ResizablePMCArray" push $P723, "{" @@ -8548,7 +8548,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "circumfix:sym" :subid("198_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "circumfix:sym" :subid("198_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx725_tgt .local int rx725_pos @@ -8626,7 +8626,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__circumfix:sym" :subid("199_1258208104.50682") :method +.sub "!PREFIX__circumfix:sym" :subid("199_1258264446.59978") :method .annotate "line", 4 $P727 = self."!PREFIX__!subrule"("sigil", "") new $P728, "ResizablePMCArray" @@ -8636,7 +8636,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "semilist" :subid("200_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "semilist" :subid("200_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 4 .local string rx732_tgt .local int rx732_pos @@ -8692,7 +8692,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__semilist" :subid("201_1258208104.50682") :method +.sub "!PREFIX__semilist" :subid("201_1258264446.59978") :method .annotate "line", 4 new $P734, "ResizablePMCArray" push $P734, "" @@ -8701,7 +8701,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "nulltermish" :subid("202_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "nulltermish" :subid("202_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx738_tgt .local int rx738_pos @@ -8755,7 +8755,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__nulltermish" :subid("203_1258208104.50682") :method +.sub "!PREFIX__nulltermish" :subid("203_1258264446.59978") :method .annotate "line", 364 $P740 = self."!PREFIX__!subrule"("OPER=term", "") new $P741, "ResizablePMCArray" @@ -8766,7 +8766,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infixish" :subid("204_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infixish" :subid("204_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx744_tgt .local int rx744_pos @@ -8816,7 +8816,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infixish" :subid("205_1258208104.50682") :method +.sub "!PREFIX__infixish" :subid("205_1258264446.59978") :method .annotate "line", 364 new $P746, "ResizablePMCArray" push $P746, "" @@ -8825,7 +8825,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infixstopper" :subid("206_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infixstopper" :subid("206_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx748_tgt .local int rx748_pos @@ -8868,7 +8868,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infixstopper" :subid("207_1258208104.50682") :method +.sub "!PREFIX__infixstopper" :subid("207_1258264446.59978") :method .annotate "line", 364 new $P750, "ResizablePMCArray" push $P750, "" @@ -8877,7 +8877,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "postcircumfix:sym<[ ]>" :subid("208_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "postcircumfix:sym<[ ]>" :subid("208_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx752_tgt .local int rx752_pos @@ -8951,7 +8951,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__postcircumfix:sym<[ ]>" :subid("209_1258208104.50682") :method +.sub "!PREFIX__postcircumfix:sym<[ ]>" :subid("209_1258264446.59978") :method .annotate "line", 364 $P754 = self."!PREFIX__!subrule"("", "[") new $P755, "ResizablePMCArray" @@ -8961,7 +8961,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "postcircumfix:sym<{ }>" :subid("210_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "postcircumfix:sym<{ }>" :subid("210_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx757_tgt .local int rx757_pos @@ -9035,7 +9035,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__postcircumfix:sym<{ }>" :subid("211_1258208104.50682") :method +.sub "!PREFIX__postcircumfix:sym<{ }>" :subid("211_1258264446.59978") :method .annotate "line", 364 $P759 = self."!PREFIX__!subrule"("", "{") new $P760, "ResizablePMCArray" @@ -9045,7 +9045,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "postcircumfix:sym" :subid("212_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "postcircumfix:sym" :subid("212_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx762_tgt .local int rx762_pos @@ -9106,7 +9106,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__postcircumfix:sym" :subid("213_1258208104.50682") :method +.sub "!PREFIX__postcircumfix:sym" :subid("213_1258264446.59978") :method .annotate "line", 364 new $P764, "ResizablePMCArray" push $P764, "<" @@ -9115,7 +9115,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "postcircumfix:sym<( )>" :subid("214_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "postcircumfix:sym<( )>" :subid("214_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx766_tgt .local int rx766_pos @@ -9189,7 +9189,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__postcircumfix:sym<( )>" :subid("215_1258208104.50682") :method +.sub "!PREFIX__postcircumfix:sym<( )>" :subid("215_1258264446.59978") :method .annotate "line", 364 $P768 = self."!PREFIX__!subrule"("", "(") new $P769, "ResizablePMCArray" @@ -9199,7 +9199,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "postfix:sym<.>" :subid("216_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "postfix:sym<.>" :subid("216_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx771_tgt .local int rx771_pos @@ -9252,7 +9252,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__postfix:sym<.>" :subid("217_1258208104.50682") :method +.sub "!PREFIX__postfix:sym<.>" :subid("217_1258264446.59978") :method .annotate "line", 364 $P773 = self."!PREFIX__!subrule"("dotty", "") new $P774, "ResizablePMCArray" @@ -9262,7 +9262,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym<++>" :subid("218_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym<++>" :subid("218_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx776_tgt .local int rx776_pos @@ -9329,7 +9329,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym<++>" :subid("219_1258208104.50682") :method +.sub "!PREFIX__prefix:sym<++>" :subid("219_1258264446.59978") :method .annotate "line", 364 $P778 = self."!PREFIX__!subrule"("O", "++") new $P779, "ResizablePMCArray" @@ -9339,7 +9339,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym<-->" :subid("220_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym<-->" :subid("220_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx782_tgt .local int rx782_pos @@ -9406,7 +9406,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym<-->" :subid("221_1258208104.50682") :method +.sub "!PREFIX__prefix:sym<-->" :subid("221_1258264446.59978") :method .annotate "line", 364 $P784 = self."!PREFIX__!subrule"("O", "--") new $P785, "ResizablePMCArray" @@ -9416,7 +9416,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "postfix:sym<++>" :subid("222_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "postfix:sym<++>" :subid("222_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx788_tgt .local int rx788_pos @@ -9483,7 +9483,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__postfix:sym<++>" :subid("223_1258208104.50682") :method +.sub "!PREFIX__postfix:sym<++>" :subid("223_1258264446.59978") :method .annotate "line", 364 $P790 = self."!PREFIX__!subrule"("O", "++") new $P791, "ResizablePMCArray" @@ -9493,7 +9493,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "postfix:sym<-->" :subid("224_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "postfix:sym<-->" :subid("224_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx794_tgt .local int rx794_pos @@ -9560,7 +9560,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__postfix:sym<-->" :subid("225_1258208104.50682") :method +.sub "!PREFIX__postfix:sym<-->" :subid("225_1258264446.59978") :method .annotate "line", 364 $P796 = self."!PREFIX__!subrule"("O", "--") new $P797, "ResizablePMCArray" @@ -9570,7 +9570,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<**>" :subid("226_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<**>" :subid("226_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx800_tgt .local int rx800_pos @@ -9637,7 +9637,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<**>" :subid("227_1258208104.50682") :method +.sub "!PREFIX__infix:sym<**>" :subid("227_1258264446.59978") :method .annotate "line", 364 $P802 = self."!PREFIX__!subrule"("O", "**") new $P803, "ResizablePMCArray" @@ -9647,7 +9647,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym<+>" :subid("228_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym<+>" :subid("228_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx806_tgt .local int rx806_pos @@ -9714,7 +9714,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym<+>" :subid("229_1258208104.50682") :method +.sub "!PREFIX__prefix:sym<+>" :subid("229_1258264446.59978") :method .annotate "line", 364 $P808 = self."!PREFIX__!subrule"("O", "+") new $P809, "ResizablePMCArray" @@ -9724,7 +9724,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym<~>" :subid("230_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym<~>" :subid("230_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx812_tgt .local int rx812_pos @@ -9791,7 +9791,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym<~>" :subid("231_1258208104.50682") :method +.sub "!PREFIX__prefix:sym<~>" :subid("231_1258264446.59978") :method .annotate "line", 364 $P814 = self."!PREFIX__!subrule"("O", "~") new $P815, "ResizablePMCArray" @@ -9801,7 +9801,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym<->" :subid("232_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym<->" :subid("232_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx818_tgt .local int rx818_pos @@ -9874,7 +9874,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym<->" :subid("233_1258208104.50682") :method +.sub "!PREFIX__prefix:sym<->" :subid("233_1258264446.59978") :method .annotate "line", 364 $P820 = self."!PREFIX__!subrule"("O", "-") new $P821, "ResizablePMCArray" @@ -9884,7 +9884,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym" :subid("234_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym" :subid("234_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx824_tgt .local int rx824_pos @@ -9951,7 +9951,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym" :subid("235_1258208104.50682") :method +.sub "!PREFIX__prefix:sym" :subid("235_1258264446.59978") :method .annotate "line", 364 $P826 = self."!PREFIX__!subrule"("O", "?") new $P827, "ResizablePMCArray" @@ -9961,7 +9961,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym" :subid("236_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym" :subid("236_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx830_tgt .local int rx830_pos @@ -10028,7 +10028,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym" :subid("237_1258208104.50682") :method +.sub "!PREFIX__prefix:sym" :subid("237_1258264446.59978") :method .annotate "line", 364 $P832 = self."!PREFIX__!subrule"("O", "!") new $P833, "ResizablePMCArray" @@ -10038,7 +10038,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym<|>" :subid("238_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym<|>" :subid("238_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx836_tgt .local int rx836_pos @@ -10105,7 +10105,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym<|>" :subid("239_1258208104.50682") :method +.sub "!PREFIX__prefix:sym<|>" :subid("239_1258264446.59978") :method .annotate "line", 364 $P838 = self."!PREFIX__!subrule"("O", "|") new $P839, "ResizablePMCArray" @@ -10115,7 +10115,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<*>" :subid("240_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<*>" :subid("240_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx842_tgt .local int rx842_pos @@ -10182,7 +10182,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<*>" :subid("241_1258208104.50682") :method +.sub "!PREFIX__infix:sym<*>" :subid("241_1258264446.59978") :method .annotate "line", 364 $P844 = self."!PREFIX__!subrule"("O", "*") new $P845, "ResizablePMCArray" @@ -10192,7 +10192,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("242_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("242_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx848_tgt .local int rx848_pos @@ -10259,7 +10259,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("243_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("243_1258264446.59978") :method .annotate "line", 364 $P850 = self."!PREFIX__!subrule"("O", "/") new $P851, "ResizablePMCArray" @@ -10269,7 +10269,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<%>" :subid("244_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<%>" :subid("244_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx854_tgt .local int rx854_pos @@ -10336,7 +10336,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<%>" :subid("245_1258208104.50682") :method +.sub "!PREFIX__infix:sym<%>" :subid("245_1258264446.59978") :method .annotate "line", 364 $P856 = self."!PREFIX__!subrule"("O", "%") new $P857, "ResizablePMCArray" @@ -10346,7 +10346,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<+>" :subid("246_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<+>" :subid("246_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx860_tgt .local int rx860_pos @@ -10413,7 +10413,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<+>" :subid("247_1258208104.50682") :method +.sub "!PREFIX__infix:sym<+>" :subid("247_1258264446.59978") :method .annotate "line", 364 $P862 = self."!PREFIX__!subrule"("O", "+") new $P863, "ResizablePMCArray" @@ -10423,7 +10423,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<->" :subid("248_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<->" :subid("248_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx866_tgt .local int rx866_pos @@ -10490,7 +10490,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<->" :subid("249_1258208104.50682") :method +.sub "!PREFIX__infix:sym<->" :subid("249_1258264446.59978") :method .annotate "line", 364 $P868 = self."!PREFIX__!subrule"("O", "-") new $P869, "ResizablePMCArray" @@ -10500,7 +10500,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<~>" :subid("250_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<~>" :subid("250_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx872_tgt .local int rx872_pos @@ -10567,7 +10567,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<~>" :subid("251_1258208104.50682") :method +.sub "!PREFIX__infix:sym<~>" :subid("251_1258264446.59978") :method .annotate "line", 364 $P874 = self."!PREFIX__!subrule"("O", "~") new $P875, "ResizablePMCArray" @@ -10577,7 +10577,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<==>" :subid("252_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<==>" :subid("252_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx878_tgt .local int rx878_pos @@ -10644,7 +10644,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<==>" :subid("253_1258208104.50682") :method +.sub "!PREFIX__infix:sym<==>" :subid("253_1258264446.59978") :method .annotate "line", 364 $P880 = self."!PREFIX__!subrule"("O", "==") new $P881, "ResizablePMCArray" @@ -10654,7 +10654,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("254_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("254_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx884_tgt .local int rx884_pos @@ -10721,7 +10721,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("255_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("255_1258264446.59978") :method .annotate "line", 364 $P886 = self."!PREFIX__!subrule"("O", "!=") new $P887, "ResizablePMCArray" @@ -10731,7 +10731,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<<=>" :subid("256_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<<=>" :subid("256_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx890_tgt .local int rx890_pos @@ -10798,7 +10798,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<<=>" :subid("257_1258208104.50682") :method +.sub "!PREFIX__infix:sym<<=>" :subid("257_1258264446.59978") :method .annotate "line", 364 $P892 = self."!PREFIX__!subrule"("O", "<=") new $P893, "ResizablePMCArray" @@ -10808,7 +10808,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<>=>" :subid("258_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<>=>" :subid("258_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx896_tgt .local int rx896_pos @@ -10875,7 +10875,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<>=>" :subid("259_1258208104.50682") :method +.sub "!PREFIX__infix:sym<>=>" :subid("259_1258264446.59978") :method .annotate "line", 364 $P898 = self."!PREFIX__!subrule"("O", ">=") new $P899, "ResizablePMCArray" @@ -10885,7 +10885,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<<>" :subid("260_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<<>" :subid("260_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx902_tgt .local int rx902_pos @@ -10952,7 +10952,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<<>" :subid("261_1258208104.50682") :method +.sub "!PREFIX__infix:sym<<>" :subid("261_1258264446.59978") :method .annotate "line", 364 $P904 = self."!PREFIX__!subrule"("O", "<") new $P905, "ResizablePMCArray" @@ -10962,7 +10962,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<>>" :subid("262_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<>>" :subid("262_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx908_tgt .local int rx908_pos @@ -11029,7 +11029,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<>>" :subid("263_1258208104.50682") :method +.sub "!PREFIX__infix:sym<>>" :subid("263_1258264446.59978") :method .annotate "line", 364 $P910 = self."!PREFIX__!subrule"("O", ">") new $P911, "ResizablePMCArray" @@ -11039,7 +11039,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("264_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("264_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx914_tgt .local int rx914_pos @@ -11106,7 +11106,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("265_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("265_1258264446.59978") :method .annotate "line", 364 $P916 = self."!PREFIX__!subrule"("O", "eq") new $P917, "ResizablePMCArray" @@ -11116,7 +11116,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("266_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("266_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx920_tgt .local int rx920_pos @@ -11183,7 +11183,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("267_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("267_1258264446.59978") :method .annotate "line", 364 $P922 = self."!PREFIX__!subrule"("O", "ne") new $P923, "ResizablePMCArray" @@ -11193,7 +11193,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("268_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("268_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx926_tgt .local int rx926_pos @@ -11260,7 +11260,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("269_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("269_1258264446.59978") :method .annotate "line", 364 $P928 = self."!PREFIX__!subrule"("O", "le") new $P929, "ResizablePMCArray" @@ -11270,7 +11270,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("270_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("270_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx932_tgt .local int rx932_pos @@ -11337,7 +11337,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("271_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("271_1258264446.59978") :method .annotate "line", 364 $P934 = self."!PREFIX__!subrule"("O", "ge") new $P935, "ResizablePMCArray" @@ -11347,7 +11347,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("272_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("272_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx938_tgt .local int rx938_pos @@ -11414,7 +11414,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("273_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("273_1258264446.59978") :method .annotate "line", 364 $P940 = self."!PREFIX__!subrule"("O", "lt") new $P941, "ResizablePMCArray" @@ -11424,7 +11424,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("274_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("274_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx944_tgt .local int rx944_pos @@ -11491,7 +11491,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("275_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("275_1258264446.59978") :method .annotate "line", 364 $P946 = self."!PREFIX__!subrule"("O", "gt") new $P947, "ResizablePMCArray" @@ -11501,7 +11501,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<=:=>" :subid("276_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<=:=>" :subid("276_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx950_tgt .local int rx950_pos @@ -11568,7 +11568,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<=:=>" :subid("277_1258208104.50682") :method +.sub "!PREFIX__infix:sym<=:=>" :subid("277_1258264446.59978") :method .annotate "line", 364 $P952 = self."!PREFIX__!subrule"("O", "=:=") new $P953, "ResizablePMCArray" @@ -11578,7 +11578,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<&&>" :subid("278_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<&&>" :subid("278_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx956_tgt .local int rx956_pos @@ -11645,7 +11645,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<&&>" :subid("279_1258208104.50682") :method +.sub "!PREFIX__infix:sym<&&>" :subid("279_1258264446.59978") :method .annotate "line", 364 $P958 = self."!PREFIX__!subrule"("O", "&&") new $P959, "ResizablePMCArray" @@ -11655,7 +11655,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<||>" :subid("280_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<||>" :subid("280_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx962_tgt .local int rx962_pos @@ -11722,7 +11722,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<||>" :subid("281_1258208104.50682") :method +.sub "!PREFIX__infix:sym<||>" :subid("281_1258264446.59978") :method .annotate "line", 364 $P964 = self."!PREFIX__!subrule"("O", "||") new $P965, "ResizablePMCArray" @@ -11732,7 +11732,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("282_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("282_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx968_tgt .local int rx968_pos @@ -11799,7 +11799,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("283_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("283_1258264446.59978") :method .annotate "line", 364 $P970 = self."!PREFIX__!subrule"("O", "//") new $P971, "ResizablePMCArray" @@ -11809,7 +11809,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym" :subid("284_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym" :subid("284_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx974_tgt .local int rx974_pos @@ -11886,7 +11886,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym" :subid("285_1258208104.50682") :method +.sub "!PREFIX__infix:sym" :subid("285_1258264446.59978") :method .annotate "line", 364 $P976 = self."!PREFIX__!subrule"("", "??") new $P977, "ResizablePMCArray" @@ -11896,7 +11896,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<=>" :subid("286_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<=>" :subid("286_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx979_tgt .local int rx979_pos @@ -11962,7 +11962,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<=>" :subid("287_1258208104.50682") :method +.sub "!PREFIX__infix:sym<=>" :subid("287_1258264446.59978") :method .annotate "line", 364 $P981 = self."!PREFIX__!subrule"("", "=") new $P982, "ResizablePMCArray" @@ -11972,7 +11972,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<:=>" :subid("288_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<:=>" :subid("288_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx985_tgt .local int rx985_pos @@ -12039,7 +12039,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<:=>" :subid("289_1258208104.50682") :method +.sub "!PREFIX__infix:sym<:=>" :subid("289_1258264446.59978") :method .annotate "line", 364 $P987 = self."!PREFIX__!subrule"("O", ":=") new $P988, "ResizablePMCArray" @@ -12049,7 +12049,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<::=>" :subid("290_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<::=>" :subid("290_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx991_tgt .local int rx991_pos @@ -12116,7 +12116,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<::=>" :subid("291_1258208104.50682") :method +.sub "!PREFIX__infix:sym<::=>" :subid("291_1258264446.59978") :method .annotate "line", 364 $P993 = self."!PREFIX__!subrule"("O", "::=") new $P994, "ResizablePMCArray" @@ -12126,7 +12126,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "infix:sym<,>" :subid("292_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "infix:sym<,>" :subid("292_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx997_tgt .local int rx997_pos @@ -12193,7 +12193,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__infix:sym<,>" :subid("293_1258208104.50682") :method +.sub "!PREFIX__infix:sym<,>" :subid("293_1258264446.59978") :method .annotate "line", 364 $P999 = self."!PREFIX__!subrule"("O", ",") new $P1000, "ResizablePMCArray" @@ -12203,7 +12203,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym" :subid("294_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym" :subid("294_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx1003_tgt .local int rx1003_pos @@ -12276,7 +12276,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym" :subid("295_1258208104.50682") :method +.sub "!PREFIX__prefix:sym" :subid("295_1258264446.59978") :method .annotate "line", 364 new $P1005, "ResizablePMCArray" push $P1005, "return" @@ -12285,7 +12285,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "prefix:sym" :subid("296_1258208104.50682") :method :outer("11_1258208104.50682") +.sub "prefix:sym" :subid("296_1258264446.59978") :method :outer("11_1258264446.59978") .annotate "line", 364 .local string rx1008_tgt .local int rx1008_pos @@ -12358,7 +12358,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Grammar"] -.sub "!PREFIX__prefix:sym" :subid("297_1258208104.50682") :method +.sub "!PREFIX__prefix:sym" :subid("297_1258264446.59978") :method .annotate "line", 364 new $P1010, "ResizablePMCArray" push $P1010, "make" @@ -12367,28 +12367,28 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "_block1012" :subid("298_1258208104.50682") :outer("11_1258208104.50682") +.sub "_block1012" :subid("298_1258264446.59978") :outer("11_1258264446.59978") .annotate "line", 477 - .const 'Sub' $P1042 = "309_1258208104.50682" + .const 'Sub' $P1042 = "309_1258264446.59978" capture_lex $P1042 - .const 'Sub' $P1030 = "306_1258208104.50682" + .const 'Sub' $P1030 = "306_1258264446.59978" capture_lex $P1030 - .const 'Sub' $P1026 = "304_1258208104.50682" + .const 'Sub' $P1026 = "304_1258264446.59978" capture_lex $P1026 - .const 'Sub' $P1022 = "302_1258208104.50682" + .const 'Sub' $P1022 = "302_1258264446.59978" capture_lex $P1022 - .const 'Sub' $P1014 = "299_1258208104.50682" + .const 'Sub' $P1014 = "299_1258264446.59978" capture_lex $P1014 - .const 'Sub' $P1042 = "309_1258208104.50682" + .const 'Sub' $P1042 = "309_1258264446.59978" capture_lex $P1042 .return ($P1042) .end .namespace ["NQP";"Regex"] -.sub "metachar:sym<:my>" :subid("299_1258208104.50682") :method :outer("298_1258208104.50682") +.sub "metachar:sym<:my>" :subid("299_1258264446.59978") :method :outer("298_1258264446.59978") .annotate "line", 477 - .const 'Sub' $P1019 = "301_1258208104.50682" + .const 'Sub' $P1019 = "301_1258264446.59978" capture_lex $P1019 .local string rx1015_tgt .local int rx1015_pos @@ -12417,7 +12417,7 @@ NQP::Compiler - NQP compiler add rx1015_pos, 1 # rx subrule "before" subtype=zerowidth negate= rx1015_cur."!cursor_pos"(rx1015_pos) - .const 'Sub' $P1019 = "301_1258208104.50682" + .const 'Sub' $P1019 = "301_1258264446.59978" capture_lex $P1019 $P10 = rx1015_cur."before"($P1019) unless $P10, rx1015_fail @@ -12460,7 +12460,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "!PREFIX__metachar:sym<:my>" :subid("300_1258208104.50682") :method +.sub "!PREFIX__metachar:sym<:my>" :subid("300_1258264446.59978") :method .annotate "line", 477 new $P1017, "ResizablePMCArray" push $P1017, ":" @@ -12469,7 +12469,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "_block1018" :anon :subid("301_1258208104.50682") :method :outer("299_1258208104.50682") +.sub "_block1018" :anon :subid("301_1258264446.59978") :method :outer("299_1258264446.59978") .annotate "line", 479 .local string rx1020_tgt .local int rx1020_pos @@ -12522,7 +12522,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "metachar:sym<{ }>" :subid("302_1258208104.50682") :method :outer("298_1258208104.50682") +.sub "metachar:sym<{ }>" :subid("302_1258264446.59978") :method :outer("298_1258264446.59978") .annotate "line", 477 .local string rx1023_tgt .local int rx1023_pos @@ -12575,7 +12575,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "!PREFIX__metachar:sym<{ }>" :subid("303_1258208104.50682") :method +.sub "!PREFIX__metachar:sym<{ }>" :subid("303_1258264446.59978") :method .annotate "line", 477 new $P1025, "ResizablePMCArray" push $P1025, "{" @@ -12584,7 +12584,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "assertion:sym<{ }>" :subid("304_1258208104.50682") :method :outer("298_1258208104.50682") +.sub "assertion:sym<{ }>" :subid("304_1258264446.59978") :method :outer("298_1258264446.59978") .annotate "line", 477 .local string rx1027_tgt .local int rx1027_pos @@ -12637,7 +12637,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "!PREFIX__assertion:sym<{ }>" :subid("305_1258208104.50682") :method +.sub "!PREFIX__assertion:sym<{ }>" :subid("305_1258264446.59978") :method .annotate "line", 477 new $P1029, "ResizablePMCArray" push $P1029, "{" @@ -12646,9 +12646,9 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "assertion:sym" :subid("306_1258208104.50682") :method :outer("298_1258208104.50682") +.sub "assertion:sym" :subid("306_1258264446.59978") :method :outer("298_1258264446.59978") .annotate "line", 477 - .const 'Sub' $P1038 = "308_1258208104.50682" + .const 'Sub' $P1038 = "308_1258264446.59978" capture_lex $P1038 .local string rx1031_tgt .local int rx1031_pos @@ -12701,7 +12701,7 @@ NQP::Compiler - NQP compiler .annotate "line", 493 # rx subrule "before" subtype=zerowidth negate= rx1031_cur."!cursor_pos"(rx1031_pos) - .const 'Sub' $P1038 = "308_1258208104.50682" + .const 'Sub' $P1038 = "308_1258264446.59978" capture_lex $P1038 $P10 = rx1031_cur."before"($P1038) unless $P10, rx1031_fail @@ -12808,7 +12808,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "!PREFIX__assertion:sym" :subid("307_1258208104.50682") :method +.sub "!PREFIX__assertion:sym" :subid("307_1258264446.59978") :method .annotate "line", 477 new $P1033, "ResizablePMCArray" push $P1033, "" @@ -12817,7 +12817,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "_block1037" :anon :subid("308_1258208104.50682") :method :outer("306_1258208104.50682") +.sub "_block1037" :anon :subid("308_1258264446.59978") :method :outer("306_1258264446.59978") .annotate "line", 493 .local string rx1039_tgt .local int rx1039_pos @@ -12870,7 +12870,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "codeblock" :subid("309_1258208104.50682") :method :outer("298_1258208104.50682") +.sub "codeblock" :subid("309_1258264446.59978") :method :outer("298_1258264446.59978") .annotate "line", 477 .local string rx1043_tgt .local int rx1043_pos @@ -12917,7 +12917,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Regex"] -.sub "!PREFIX__codeblock" :subid("310_1258208104.50682") :method +.sub "!PREFIX__codeblock" :subid("310_1258264446.59978") :method .annotate "line", 477 $P1045 = self."!PREFIX__!subrule"("block", "") new $P1046, "ResizablePMCArray" @@ -12928,7 +12928,7 @@ NQP::Compiler - NQP compiler ### .include 'gen/nqp-actions.pir' .namespace [] -.sub "_block11" :anon :subid("10_1258208116.06691") +.sub "_block11" :anon :subid("10_1258264465.36631") .annotate "line", 0 get_hll_global $P14, ["NQP";"Actions"], "_block13" capture_lex $P14 @@ -12942,9 +12942,9 @@ NQP::Compiler - NQP compiler .namespace [] -.sub "" :load :init :subid("post115") :outer("10_1258208116.06691") +.sub "" :load :init :subid("post115") :outer("10_1258264465.36631") .annotate "line", 0 - .const 'Sub' $P12 = "10_1258208116.06691" + .const 'Sub' $P12 = "10_1258264465.36631" .local pmc block set block, $P12 $P1886 = get_root_global ["parrot"], "P6metaclass" @@ -12953,179 +12953,179 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block13" :subid("11_1258208116.06691") :outer("10_1258208116.06691") +.sub "_block13" :subid("11_1258264465.36631") :outer("10_1258264465.36631") .annotate "line", 3 - .const 'Sub' $P1881 = "114_1258208116.06691" + .const 'Sub' $P1881 = "114_1258264465.36631" capture_lex $P1881 get_hll_global $P1817, ["NQP";"RegexActions"], "_block1816" capture_lex $P1817 - .const 'Sub' $P1804 = "108_1258208116.06691" + .const 'Sub' $P1804 = "108_1258264465.36631" capture_lex $P1804 - .const 'Sub' $P1794 = "107_1258208116.06691" + .const 'Sub' $P1794 = "107_1258264465.36631" capture_lex $P1794 - .const 'Sub' $P1784 = "106_1258208116.06691" + .const 'Sub' $P1784 = "106_1258264465.36631" capture_lex $P1784 - .const 'Sub' $P1774 = "105_1258208116.06691" + .const 'Sub' $P1774 = "105_1258264465.36631" capture_lex $P1774 - .const 'Sub' $P1759 = "104_1258208116.06691" + .const 'Sub' $P1759 = "104_1258264465.36631" capture_lex $P1759 - .const 'Sub' $P1745 = "103_1258208116.06691" + .const 'Sub' $P1745 = "103_1258264465.36631" capture_lex $P1745 - .const 'Sub' $P1735 = "102_1258208116.06691" + .const 'Sub' $P1735 = "102_1258264465.36631" capture_lex $P1735 - .const 'Sub' $P1721 = "101_1258208116.06691" + .const 'Sub' $P1721 = "101_1258264465.36631" capture_lex $P1721 - .const 'Sub' $P1711 = "100_1258208116.06691" + .const 'Sub' $P1711 = "100_1258264465.36631" capture_lex $P1711 - .const 'Sub' $P1701 = "99_1258208116.06691" + .const 'Sub' $P1701 = "99_1258264465.36631" capture_lex $P1701 - .const 'Sub' $P1691 = "98_1258208116.06691" + .const 'Sub' $P1691 = "98_1258264465.36631" capture_lex $P1691 - .const 'Sub' $P1681 = "97_1258208116.06691" + .const 'Sub' $P1681 = "97_1258264465.36631" capture_lex $P1681 - .const 'Sub' $P1671 = "96_1258208116.06691" + .const 'Sub' $P1671 = "96_1258264465.36631" capture_lex $P1671 - .const 'Sub' $P1643 = "95_1258208116.06691" + .const 'Sub' $P1643 = "95_1258264465.36631" capture_lex $P1643 - .const 'Sub' $P1633 = "94_1258208116.06691" + .const 'Sub' $P1633 = "94_1258264465.36631" capture_lex $P1633 - .const 'Sub' $P1621 = "93_1258208116.06691" + .const 'Sub' $P1621 = "93_1258264465.36631" capture_lex $P1621 - .const 'Sub' $P1609 = "92_1258208116.06691" + .const 'Sub' $P1609 = "92_1258264465.36631" capture_lex $P1609 - .const 'Sub' $P1597 = "91_1258208116.06691" + .const 'Sub' $P1597 = "91_1258264465.36631" capture_lex $P1597 - .const 'Sub' $P1587 = "90_1258208116.06691" + .const 'Sub' $P1587 = "90_1258264465.36631" capture_lex $P1587 - .const 'Sub' $P1558 = "89_1258208116.06691" + .const 'Sub' $P1558 = "89_1258264465.36631" capture_lex $P1558 - .const 'Sub' $P1534 = "88_1258208116.06691" + .const 'Sub' $P1534 = "88_1258264465.36631" capture_lex $P1534 - .const 'Sub' $P1524 = "87_1258208116.06691" + .const 'Sub' $P1524 = "87_1258264465.36631" capture_lex $P1524 - .const 'Sub' $P1497 = "86_1258208116.06691" + .const 'Sub' $P1497 = "86_1258264465.36631" capture_lex $P1497 - .const 'Sub' $P1479 = "85_1258208116.06691" + .const 'Sub' $P1479 = "85_1258264465.36631" capture_lex $P1479 - .const 'Sub' $P1469 = "84_1258208116.06691" + .const 'Sub' $P1469 = "84_1258264465.36631" capture_lex $P1469 - .const 'Sub' $P1385 = "81_1258208116.06691" + .const 'Sub' $P1385 = "81_1258264465.36631" capture_lex $P1385 - .const 'Sub' $P1375 = "80_1258208116.06691" + .const 'Sub' $P1375 = "80_1258264465.36631" capture_lex $P1375 - .const 'Sub' $P1346 = "79_1258208116.06691" + .const 'Sub' $P1346 = "79_1258264465.36631" capture_lex $P1346 - .const 'Sub' $P1313 = "78_1258208116.06691" + .const 'Sub' $P1313 = "78_1258264465.36631" capture_lex $P1313 - .const 'Sub' $P1297 = "77_1258208116.06691" + .const 'Sub' $P1297 = "77_1258264465.36631" capture_lex $P1297 - .const 'Sub' $P1288 = "76_1258208116.06691" + .const 'Sub' $P1288 = "76_1258264465.36631" capture_lex $P1288 - .const 'Sub' $P1263 = "75_1258208116.06691" + .const 'Sub' $P1263 = "75_1258264465.36631" capture_lex $P1263 - .const 'Sub' $P1159 = "72_1258208116.06691" + .const 'Sub' $P1159 = "72_1258264465.36631" capture_lex $P1159 - .const 'Sub' $P1142 = "71_1258208116.06691" + .const 'Sub' $P1142 = "71_1258264465.36631" capture_lex $P1142 - .const 'Sub' $P1122 = "70_1258208116.06691" + .const 'Sub' $P1122 = "70_1258264465.36631" capture_lex $P1122 - .const 'Sub' $P1038 = "69_1258208116.06691" + .const 'Sub' $P1038 = "69_1258264465.36631" capture_lex $P1038 - .const 'Sub' $P1014 = "67_1258208116.06691" + .const 'Sub' $P1014 = "67_1258264465.36631" capture_lex $P1014 - .const 'Sub' $P980 = "65_1258208116.06691" + .const 'Sub' $P980 = "65_1258264465.36631" capture_lex $P980 - .const 'Sub' $P934 = "63_1258208116.06691" + .const 'Sub' $P934 = "63_1258264465.36631" capture_lex $P934 - .const 'Sub' $P924 = "62_1258208116.06691" + .const 'Sub' $P924 = "62_1258264465.36631" capture_lex $P924 - .const 'Sub' $P914 = "61_1258208116.06691" + .const 'Sub' $P914 = "61_1258264465.36631" capture_lex $P914 - .const 'Sub' $P843 = "59_1258208116.06691" + .const 'Sub' $P843 = "59_1258264465.36631" capture_lex $P843 - .const 'Sub' $P826 = "58_1258208116.06691" + .const 'Sub' $P826 = "58_1258264465.36631" capture_lex $P826 - .const 'Sub' $P816 = "57_1258208116.06691" + .const 'Sub' $P816 = "57_1258264465.36631" capture_lex $P816 - .const 'Sub' $P806 = "56_1258208116.06691" + .const 'Sub' $P806 = "56_1258264465.36631" capture_lex $P806 - .const 'Sub' $P796 = "55_1258208116.06691" + .const 'Sub' $P796 = "55_1258264465.36631" capture_lex $P796 - .const 'Sub' $P772 = "54_1258208116.06691" + .const 'Sub' $P772 = "54_1258264465.36631" capture_lex $P772 - .const 'Sub' $P719 = "53_1258208116.06691" + .const 'Sub' $P719 = "53_1258264465.36631" capture_lex $P719 - .const 'Sub' $P709 = "52_1258208116.06691" + .const 'Sub' $P709 = "52_1258264465.36631" capture_lex $P709 - .const 'Sub' $P660 = "51_1258208116.06691" + .const 'Sub' $P660 = "51_1258264465.36631" capture_lex $P660 - .const 'Sub' $P634 = "50_1258208116.06691" + .const 'Sub' $P634 = "50_1258264465.36631" capture_lex $P634 - .const 'Sub' $P624 = "49_1258208116.06691" + .const 'Sub' $P624 = "49_1258264465.36631" capture_lex $P624 - .const 'Sub' $P614 = "48_1258208116.06691" + .const 'Sub' $P614 = "48_1258264465.36631" capture_lex $P614 - .const 'Sub' $P604 = "47_1258208116.06691" + .const 'Sub' $P604 = "47_1258264465.36631" capture_lex $P604 - .const 'Sub' $P594 = "46_1258208116.06691" + .const 'Sub' $P594 = "46_1258264465.36631" capture_lex $P594 - .const 'Sub' $P584 = "45_1258208116.06691" + .const 'Sub' $P584 = "45_1258264465.36631" capture_lex $P584 - .const 'Sub' $P574 = "44_1258208116.06691" + .const 'Sub' $P574 = "44_1258264465.36631" capture_lex $P574 - .const 'Sub' $P564 = "43_1258208116.06691" + .const 'Sub' $P564 = "43_1258264465.36631" capture_lex $P564 - .const 'Sub' $P554 = "42_1258208116.06691" + .const 'Sub' $P554 = "42_1258264465.36631" capture_lex $P554 - .const 'Sub' $P544 = "41_1258208116.06691" + .const 'Sub' $P544 = "41_1258264465.36631" capture_lex $P544 - .const 'Sub' $P534 = "40_1258208116.06691" + .const 'Sub' $P534 = "40_1258264465.36631" capture_lex $P534 - .const 'Sub' $P524 = "39_1258208116.06691" + .const 'Sub' $P524 = "39_1258264465.36631" capture_lex $P524 - .const 'Sub' $P514 = "38_1258208116.06691" + .const 'Sub' $P514 = "38_1258264465.36631" capture_lex $P514 - .const 'Sub' $P496 = "37_1258208116.06691" + .const 'Sub' $P496 = "37_1258264465.36631" capture_lex $P496 - .const 'Sub' $P480 = "36_1258208116.06691" + .const 'Sub' $P480 = "36_1258264465.36631" capture_lex $P480 - .const 'Sub' $P467 = "35_1258208116.06691" + .const 'Sub' $P467 = "35_1258264465.36631" capture_lex $P467 - .const 'Sub' $P441 = "34_1258208116.06691" + .const 'Sub' $P441 = "34_1258264465.36631" capture_lex $P441 - .const 'Sub' $P405 = "33_1258208116.06691" + .const 'Sub' $P405 = "33_1258264465.36631" capture_lex $P405 - .const 'Sub' $P388 = "32_1258208116.06691" + .const 'Sub' $P388 = "32_1258264465.36631" capture_lex $P388 - .const 'Sub' $P374 = "31_1258208116.06691" + .const 'Sub' $P374 = "31_1258264465.36631" capture_lex $P374 - .const 'Sub' $P319 = "29_1258208116.06691" + .const 'Sub' $P319 = "29_1258264465.36631" capture_lex $P319 - .const 'Sub' $P306 = "28_1258208116.06691" + .const 'Sub' $P306 = "28_1258264465.36631" capture_lex $P306 - .const 'Sub' $P287 = "27_1258208116.06691" + .const 'Sub' $P287 = "27_1258264465.36631" capture_lex $P287 - .const 'Sub' $P277 = "26_1258208116.06691" + .const 'Sub' $P277 = "26_1258264465.36631" capture_lex $P277 - .const 'Sub' $P267 = "25_1258208116.06691" + .const 'Sub' $P267 = "25_1258264465.36631" capture_lex $P267 - .const 'Sub' $P251 = "24_1258208116.06691" + .const 'Sub' $P251 = "24_1258264465.36631" capture_lex $P251 - .const 'Sub' $P173 = "22_1258208116.06691" + .const 'Sub' $P173 = "22_1258264465.36631" capture_lex $P173 - .const 'Sub' $P130 = "20_1258208116.06691" + .const 'Sub' $P130 = "20_1258264465.36631" capture_lex $P130 - .const 'Sub' $P111 = "19_1258208116.06691" + .const 'Sub' $P111 = "19_1258264465.36631" capture_lex $P111 - .const 'Sub' $P89 = "18_1258208116.06691" + .const 'Sub' $P89 = "18_1258264465.36631" capture_lex $P89 - .const 'Sub' $P79 = "17_1258208116.06691" + .const 'Sub' $P79 = "17_1258264465.36631" capture_lex $P79 - .const 'Sub' $P57 = "16_1258208116.06691" + .const 'Sub' $P57 = "16_1258264465.36631" capture_lex $P57 - .const 'Sub' $P26 = "13_1258208116.06691" + .const 'Sub' $P26 = "13_1258264465.36631" capture_lex $P26 - .const 'Sub' $P16 = "12_1258208116.06691" + .const 'Sub' $P16 = "12_1258264465.36631" capture_lex $P16 get_global $P15, "@BLOCK" unless_null $P15, vivify_118 @@ -13133,15 +13133,15 @@ NQP::Compiler - NQP compiler set_global "@BLOCK", $P15 vivify_118: .annotate "line", 9 - .const 'Sub' $P16 = "12_1258208116.06691" + .const 'Sub' $P16 = "12_1258264465.36631" capture_lex $P16 .lex "xblock_immediate", $P16 .annotate "line", 14 - .const 'Sub' $P26 = "13_1258208116.06691" + .const 'Sub' $P26 = "13_1258264465.36631" capture_lex $P26 .lex "block_immediate", $P26 .annotate "line", 24 - .const 'Sub' $P57 = "16_1258208116.06691" + .const 'Sub' $P57 = "16_1258264465.36631" capture_lex $P57 .lex "sigiltype", $P57 .annotate "line", 3 @@ -13160,13 +13160,13 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "" :load :init :subid("post116") :outer("11_1258208116.06691") +.sub "" :load :init :subid("post116") :outer("11_1258264465.36631") .annotate "line", 3 get_hll_global $P14, ["NQP";"Actions"], "_block13" .local pmc block set block, $P14 .annotate "line", 5 - .const 'Sub' $P1881 = "114_1258208116.06691" + .const 'Sub' $P1881 = "114_1258264465.36631" capture_lex $P1881 $P1881() $P1884 = get_root_global ["parrot"], "P6metaclass" @@ -13175,7 +13175,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block1880" :anon :subid("114_1258208116.06691") :outer("11_1258208116.06691") +.sub "_block1880" :anon :subid("114_1258264465.36631") :outer("11_1258264465.36631") .annotate "line", 6 get_global $P1882, "@BLOCK" unless_null $P1882, vivify_117 @@ -13190,7 +13190,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "xblock_immediate" :subid("12_1258208116.06691") :outer("11_1258208116.06691") +.sub "xblock_immediate" :subid("12_1258264465.36631") :outer("11_1258264465.36631") .param pmc param_19 .annotate "line", 9 new $P18, 'ExceptionHandler' @@ -13227,10 +13227,10 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "block_immediate" :subid("13_1258208116.06691") :outer("11_1258208116.06691") +.sub "block_immediate" :subid("13_1258264465.36631") :outer("11_1258264465.36631") .param pmc param_29 .annotate "line", 14 - .const 'Sub' $P35 = "14_1258208116.06691" + .const 'Sub' $P35 = "14_1258264465.36631" capture_lex $P35 new $P28, 'ExceptionHandler' set_addr $P28, control_27 @@ -13244,7 +13244,7 @@ NQP::Compiler - NQP compiler find_lex $P32, "$block" $P33 = $P32."symtable"() if $P33, unless_31_end - .const 'Sub' $P35 = "14_1258208116.06691" + .const 'Sub' $P35 = "14_1258264465.36631" capture_lex $P35 $P35() unless_31_end: @@ -13261,9 +13261,9 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block34" :anon :subid("14_1258208116.06691") :outer("13_1258208116.06691") +.sub "_block34" :anon :subid("14_1258264465.36631") :outer("13_1258264465.36631") .annotate "line", 16 - .const 'Sub' $P46 = "15_1258208116.06691" + .const 'Sub' $P46 = "15_1258264465.36631" capture_lex $P46 .annotate "line", 17 new $P36, "Undef" @@ -13286,7 +13286,7 @@ NQP::Compiler - NQP compiler unless $P40, loop51_done shift $P44, $P40 loop51_redo: - .const 'Sub' $P46 = "15_1258208116.06691" + .const 'Sub' $P46 = "15_1258264465.36631" capture_lex $P46 $P46($P44) loop51_next: @@ -13309,7 +13309,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block45" :anon :subid("15_1258208116.06691") :outer("14_1258208116.06691") +.sub "_block45" :anon :subid("15_1258264465.36631") :outer("14_1258264465.36631") .param pmc param_47 .annotate "line", 18 .lex "$_", param_47 @@ -13321,7 +13321,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "sigiltype" :subid("16_1258208116.06691") :outer("11_1258208116.06691") +.sub "sigiltype" :subid("16_1258264465.36631") :outer("11_1258264465.36631") .param pmc param_60 .annotate "line", 24 new $P59, 'ExceptionHandler' @@ -13368,7 +13368,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "TOP" :subid("17_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "TOP" :subid("17_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_82 .annotate "line", 30 new $P81, 'ExceptionHandler' @@ -13399,7 +13399,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "deflongname" :subid("18_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "deflongname" :subid("18_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_92 .annotate "line", 32 new $P91, 'ExceptionHandler' @@ -13464,7 +13464,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "comp_unit" :subid("19_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "comp_unit" :subid("19_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_114 .annotate "line", 36 new $P113, 'ExceptionHandler' @@ -13518,10 +13518,10 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statementlist" :subid("20_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statementlist" :subid("20_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_133 .annotate "line", 44 - .const 'Sub' $P147 = "21_1258208116.06691" + .const 'Sub' $P147 = "21_1258264465.36631" capture_lex $P147 new $P132, 'ExceptionHandler' set_addr $P132, control_131 @@ -13566,7 +13566,7 @@ NQP::Compiler - NQP compiler unless $P141, loop166_done shift $P145, $P141 loop166_redo: - .const 'Sub' $P147 = "21_1258208116.06691" + .const 'Sub' $P147 = "21_1258264465.36631" capture_lex $P147 $P147($P145) loop166_next: @@ -13597,7 +13597,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block146" :anon :subid("21_1258208116.06691") :outer("20_1258208116.06691") +.sub "_block146" :anon :subid("21_1258264465.36631") :outer("20_1258264465.36631") .param pmc param_149 .annotate "line", 48 new $P148, "Undef" @@ -13636,12 +13636,12 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement" :subid("22_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement" :subid("22_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_176 .param pmc param_177 :optional .param int has_param_177 :opt_flag .annotate "line", 58 - .const 'Sub' $P185 = "23_1258208116.06691" + .const 'Sub' $P185 = "23_1258264465.36631" capture_lex $P185 new $P175, 'ExceptionHandler' set_addr $P175, control_174 @@ -13700,7 +13700,7 @@ NQP::Compiler - NQP compiler goto if_181_end if_181: .annotate "line", 60 - .const 'Sub' $P185 = "23_1258208116.06691" + .const 'Sub' $P185 = "23_1258264465.36631" capture_lex $P185 $P185() if_181_end: @@ -13720,7 +13720,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block184" :anon :subid("23_1258208116.06691") :outer("22_1258208116.06691") +.sub "_block184" :anon :subid("23_1258264465.36631") :outer("22_1258264465.36631") .annotate "line", 61 new $P186, "Undef" .lex "$mc", $P186 @@ -13890,7 +13890,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "xblock" :subid("24_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "xblock" :subid("24_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_254 .annotate "line", 79 new $P253, 'ExceptionHandler' @@ -13935,7 +13935,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "pblock" :subid("25_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "pblock" :subid("25_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_270 .annotate "line", 83 new $P269, 'ExceptionHandler' @@ -13968,7 +13968,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "block" :subid("26_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "block" :subid("26_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_280 .annotate "line", 87 new $P279, 'ExceptionHandler' @@ -14001,7 +14001,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "blockoid" :subid("27_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "blockoid" :subid("27_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_290 .annotate "line", 91 new $P289, 'ExceptionHandler' @@ -14055,7 +14055,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "newpad" :subid("28_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "newpad" :subid("28_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_309 .annotate "line", 99 new $P308, 'ExceptionHandler' @@ -14091,10 +14091,10 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_control:sym" :subid("29_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_control:sym" :subid("29_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_322 .annotate "line", 106 - .const 'Sub' $P352 = "30_1258208116.06691" + .const 'Sub' $P352 = "30_1258264465.36631" capture_lex $P352 new $P321, 'ExceptionHandler' set_addr $P321, control_320 @@ -14182,7 +14182,7 @@ NQP::Compiler - NQP compiler isgt $I350, $N347, $N349 unless $I350, loop367_done loop367_redo: - .const 'Sub' $P352 = "30_1258208116.06691" + .const 'Sub' $P352 = "30_1258264465.36631" capture_lex $P352 $P352() loop367_next: @@ -14211,7 +14211,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block351" :anon :subid("30_1258208116.06691") :outer("29_1258208116.06691") +.sub "_block351" :anon :subid("30_1258264465.36631") :outer("29_1258264465.36631") .annotate "line", 115 new $P353, "Undef" .lex "$else", $P353 @@ -14250,7 +14250,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_control:sym" :subid("31_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_control:sym" :subid("31_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_377 .annotate "line", 122 new $P376, 'ExceptionHandler' @@ -14292,7 +14292,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_control:sym" :subid("32_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_control:sym" :subid("32_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_391 .annotate "line", 128 new $P390, 'ExceptionHandler' @@ -14343,7 +14343,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_control:sym" :subid("33_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_control:sym" :subid("33_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_408 .annotate "line", 134 new $P407, 'ExceptionHandler' @@ -14444,7 +14444,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_control:sym" :subid("34_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_control:sym" :subid("34_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_444 .annotate "line", 148 new $P443, 'ExceptionHandler' @@ -14525,7 +14525,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_control:sym" :subid("35_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_control:sym" :subid("35_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_470 .annotate "line", 161 new $P469, 'ExceptionHandler' @@ -14561,7 +14561,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_prefix:sym" :subid("36_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_prefix:sym" :subid("36_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_483 .annotate "line", 165 new $P482, 'ExceptionHandler' @@ -14608,7 +14608,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "blorst" :subid("37_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "blorst" :subid("37_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_499 .annotate "line", 170 new $P498, 'ExceptionHandler' @@ -14668,7 +14668,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_mod_cond:sym" :subid("38_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_mod_cond:sym" :subid("38_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_517 .annotate "line", 178 new $P516, 'ExceptionHandler' @@ -14699,7 +14699,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_mod_cond:sym" :subid("39_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_mod_cond:sym" :subid("39_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_527 .annotate "line", 179 new $P526, 'ExceptionHandler' @@ -14730,7 +14730,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_mod_loop:sym" :subid("40_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_mod_loop:sym" :subid("40_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_537 .annotate "line", 181 new $P536, 'ExceptionHandler' @@ -14761,7 +14761,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "statement_mod_loop:sym" :subid("41_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "statement_mod_loop:sym" :subid("41_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_547 .annotate "line", 182 new $P546, 'ExceptionHandler' @@ -14792,7 +14792,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("42_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("42_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_557 .annotate "line", 186 new $P556, 'ExceptionHandler' @@ -14823,7 +14823,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("43_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("43_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_567 .annotate "line", 187 new $P566, 'ExceptionHandler' @@ -14854,7 +14854,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("44_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("44_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_577 .annotate "line", 188 new $P576, 'ExceptionHandler' @@ -14885,7 +14885,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("45_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("45_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_587 .annotate "line", 189 new $P586, 'ExceptionHandler' @@ -14916,7 +14916,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("46_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("46_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_597 .annotate "line", 190 new $P596, 'ExceptionHandler' @@ -14947,7 +14947,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("47_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("47_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_607 .annotate "line", 191 new $P606, 'ExceptionHandler' @@ -14978,7 +14978,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("48_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("48_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_617 .annotate "line", 192 new $P616, 'ExceptionHandler' @@ -15009,7 +15009,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("49_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("49_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_627 .annotate "line", 193 new $P626, 'ExceptionHandler' @@ -15040,7 +15040,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "colonpair" :subid("50_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "colonpair" :subid("50_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_637 .annotate "line", 195 new $P636, 'ExceptionHandler' @@ -15122,7 +15122,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "variable" :subid("51_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "variable" :subid("51_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_663 .annotate "line", 203 new $P662, 'ExceptionHandler' @@ -15254,7 +15254,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "package_declarator:sym" :subid("52_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "package_declarator:sym" :subid("52_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_712 .annotate "line", 225 new $P711, 'ExceptionHandler' @@ -15285,7 +15285,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "package_declarator:sym" :subid("53_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "package_declarator:sym" :subid("53_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_722 .annotate "line", 226 new $P721, 'ExceptionHandler' @@ -15443,7 +15443,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "package_def" :subid("54_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "package_def" :subid("54_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_775 .annotate "line", 249 new $P774, 'ExceptionHandler' @@ -15522,7 +15522,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "scope_declarator:sym" :subid("55_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "scope_declarator:sym" :subid("55_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_799 .annotate "line", 256 new $P798, 'ExceptionHandler' @@ -15553,7 +15553,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "scope_declarator:sym" :subid("56_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "scope_declarator:sym" :subid("56_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_809 .annotate "line", 257 new $P808, 'ExceptionHandler' @@ -15584,7 +15584,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "scope_declarator:sym" :subid("57_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "scope_declarator:sym" :subid("57_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_819 .annotate "line", 258 new $P818, 'ExceptionHandler' @@ -15615,7 +15615,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "scoped" :subid("58_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "scoped" :subid("58_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_829 .annotate "line", 260 new $P828, 'ExceptionHandler' @@ -15674,10 +15674,10 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "variable_declarator" :subid("59_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "variable_declarator" :subid("59_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_846 .annotate "line", 266 - .const 'Sub' $P886 = "60_1258208116.06691" + .const 'Sub' $P886 = "60_1258264465.36631" capture_lex $P886 new $P845, 'ExceptionHandler' set_addr $P845, control_844 @@ -15756,7 +15756,7 @@ NQP::Compiler - NQP compiler iseq $I871, $S870, "has" if $I871, if_868 .annotate "line", 283 - .const 'Sub' $P886 = "60_1258208116.06691" + .const 'Sub' $P886 = "60_1258264465.36631" capture_lex $P886 $P886() goto if_868_end @@ -15817,7 +15817,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block885" :anon :subid("60_1258208116.06691") :outer("59_1258208116.06691") +.sub "_block885" :anon :subid("60_1258264465.36631") :outer("59_1258264465.36631") .annotate "line", 284 new $P887, "Undef" .lex "$scope", $P887 @@ -15875,7 +15875,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "routine_declarator:sym" :subid("61_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "routine_declarator:sym" :subid("61_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_917 .annotate "line", 294 new $P916, 'ExceptionHandler' @@ -15906,7 +15906,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "routine_declarator:sym" :subid("62_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "routine_declarator:sym" :subid("62_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_927 .annotate "line", 295 new $P926, 'ExceptionHandler' @@ -15937,10 +15937,10 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "routine_def" :subid("63_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "routine_def" :subid("63_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_937 .annotate "line", 297 - .const 'Sub' $P948 = "64_1258208116.06691" + .const 'Sub' $P948 = "64_1258264465.36631" capture_lex $P948 new $P936, 'ExceptionHandler' set_addr $P936, control_935 @@ -15977,7 +15977,7 @@ NQP::Compiler - NQP compiler new $P946, "Undef" vivify_336: unless $P946, if_944_end - .const 'Sub' $P948 = "64_1258208116.06691" + .const 'Sub' $P948 = "64_1258264465.36631" capture_lex $P948 $P948() if_944_end: @@ -15997,7 +15997,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block947" :anon :subid("64_1258208116.06691") :outer("63_1258208116.06691") +.sub "_block947" :anon :subid("64_1258264465.36631") :outer("63_1258264465.36631") .annotate "line", 302 new $P949, "Undef" .lex "$name", $P949 @@ -16077,10 +16077,10 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "method_def" :subid("65_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "method_def" :subid("65_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_983 .annotate "line", 315 - .const 'Sub' $P999 = "66_1258208116.06691" + .const 'Sub' $P999 = "66_1258264465.36631" capture_lex $P999 new $P982, 'ExceptionHandler' set_addr $P982, control_981 @@ -16132,7 +16132,7 @@ NQP::Compiler - NQP compiler new $P997, "Undef" vivify_351: unless $P997, if_995_end - .const 'Sub' $P999 = "66_1258208116.06691" + .const 'Sub' $P999 = "66_1258264465.36631" capture_lex $P999 $P999() if_995_end: @@ -16152,7 +16152,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block998" :anon :subid("66_1258208116.06691") :outer("65_1258208116.06691") +.sub "_block998" :anon :subid("66_1258264465.36631") :outer("65_1258264465.36631") .annotate "line", 322 new $P1000, "Undef" .lex "$name", $P1000 @@ -16183,10 +16183,10 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "signature" :subid("67_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "signature" :subid("67_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1017 .annotate "line", 329 - .const 'Sub' $P1028 = "68_1258208116.06691" + .const 'Sub' $P1028 = "68_1258264465.36631" capture_lex $P1028 new $P1016, 'ExceptionHandler' set_addr $P1016, control_1015 @@ -16230,7 +16230,7 @@ NQP::Compiler - NQP compiler unless $P1022, loop1034_done shift $P1026, $P1022 loop1034_redo: - .const 'Sub' $P1028 = "68_1258208116.06691" + .const 'Sub' $P1028 = "68_1258264465.36631" capture_lex $P1028 $P1028($P1026) loop1034_next: @@ -16256,7 +16256,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block1027" :anon :subid("68_1258208116.06691") :outer("67_1258208116.06691") +.sub "_block1027" :anon :subid("68_1258264465.36631") :outer("67_1258264465.36631") .param pmc param_1029 .annotate "line", 331 .lex "$_", param_1029 @@ -16269,7 +16269,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "parameter" :subid("69_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "parameter" :subid("69_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1041 .annotate "line", 334 new $P1040, 'ExceptionHandler' @@ -16502,7 +16502,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "param_var" :subid("70_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "param_var" :subid("70_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1125 .annotate "line", 366 new $P1124, 'ExceptionHandler' @@ -16556,7 +16556,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "named_param" :subid("71_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "named_param" :subid("71_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1145 .annotate "line", 374 new $P1144, 'ExceptionHandler' @@ -16610,14 +16610,14 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "regex_declarator" :subid("72_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "regex_declarator" :subid("72_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1162 .param pmc param_1163 :optional .param int has_param_1163 :opt_flag .annotate "line", 380 - .const 'Sub' $P1233 = "74_1258208116.06691" + .const 'Sub' $P1233 = "74_1258264465.36631" capture_lex $P1233 - .const 'Sub' $P1180 = "73_1258208116.06691" + .const 'Sub' $P1180 = "73_1258264465.36631" capture_lex $P1180 new $P1161, 'ExceptionHandler' set_addr $P1161, control_1160 @@ -16675,7 +16675,7 @@ NQP::Compiler - NQP compiler vivify_400: if $P1209, if_1207 .annotate "line", 426 - .const 'Sub' $P1233 = "74_1258208116.06691" + .const 'Sub' $P1233 = "74_1258264465.36631" capture_lex $P1233 $P1233() goto if_1207_end @@ -16720,7 +16720,7 @@ NQP::Compiler - NQP compiler goto if_1175_end if_1175: .annotate "line", 386 - .const 'Sub' $P1180 = "73_1258208116.06691" + .const 'Sub' $P1180 = "73_1258264465.36631" capture_lex $P1180 $P1180() if_1175_end: @@ -16740,7 +16740,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block1232" :anon :subid("74_1258208116.06691") :outer("72_1258208116.06691") +.sub "_block1232" :anon :subid("74_1258264465.36631") :outer("72_1258264465.36631") .annotate "line", 427 new $P1234, "Undef" .lex "$rpast", $P1234 @@ -16806,7 +16806,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block1179" :anon :subid("73_1258208116.06691") :outer("72_1258208116.06691") +.sub "_block1179" :anon :subid("73_1258264465.36631") :outer("72_1258264465.36631") .annotate "line", 387 new $P1181, "Hash" .lex "%h", $P1181 @@ -16904,7 +16904,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "dotty" :subid("75_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "dotty" :subid("75_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1266 .annotate "line", 446 new $P1265, 'ExceptionHandler' @@ -16978,7 +16978,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("76_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("76_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1291 .annotate "line", 455 new $P1290, 'ExceptionHandler' @@ -17004,7 +17004,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("77_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("77_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1300 .annotate "line", 459 new $P1299, 'ExceptionHandler' @@ -17054,7 +17054,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("78_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("78_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1316 .annotate "line", 465 new $P1315, 'ExceptionHandler' @@ -17155,7 +17155,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("79_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("79_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1349 .annotate "line", 482 new $P1348, 'ExceptionHandler' @@ -17247,7 +17247,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "args" :subid("80_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "args" :subid("80_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1378 .annotate "line", 497 new $P1377, 'ExceptionHandler' @@ -17278,10 +17278,10 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "arglist" :subid("81_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "arglist" :subid("81_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1388 .annotate "line", 499 - .const 'Sub' $P1399 = "82_1258208116.06691" + .const 'Sub' $P1399 = "82_1258264465.36631" capture_lex $P1399 new $P1387, 'ExceptionHandler' set_addr $P1387, control_1386 @@ -17313,7 +17313,7 @@ NQP::Compiler - NQP compiler new $P1397, "Undef" vivify_444: unless $P1397, if_1395_end - .const 'Sub' $P1399 = "82_1258208116.06691" + .const 'Sub' $P1399 = "82_1258264465.36631" capture_lex $P1399 $P1399() if_1395_end: @@ -17422,9 +17422,9 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block1398" :anon :subid("82_1258208116.06691") :outer("81_1258208116.06691") +.sub "_block1398" :anon :subid("82_1258264465.36631") :outer("81_1258264465.36631") .annotate "line", 501 - .const 'Sub' $P1420 = "83_1258208116.06691" + .const 'Sub' $P1420 = "83_1258264465.36631" capture_lex $P1420 .annotate "line", 502 new $P1400, "Undef" @@ -17477,7 +17477,7 @@ NQP::Compiler - NQP compiler unless $P1414, loop1425_done shift $P1418, $P1414 loop1425_redo: - .const 'Sub' $P1420 = "83_1258208116.06691" + .const 'Sub' $P1420 = "83_1258264465.36631" capture_lex $P1420 $P1420($P1418) loop1425_next: @@ -17500,7 +17500,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "_block1419" :anon :subid("83_1258208116.06691") :outer("82_1258208116.06691") +.sub "_block1419" :anon :subid("83_1258264465.36631") :outer("82_1258264465.36631") .param pmc param_1421 .annotate "line", 504 .lex "$_", param_1421 @@ -17512,7 +17512,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "term:sym" :subid("84_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "term:sym" :subid("84_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1472 .annotate "line", 521 new $P1471, 'ExceptionHandler' @@ -17543,7 +17543,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "circumfix:sym<( )>" :subid("85_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "circumfix:sym<( )>" :subid("85_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1482 .annotate "line", 523 new $P1481, 'ExceptionHandler' @@ -17600,7 +17600,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "circumfix:sym<[ ]>" :subid("86_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "circumfix:sym<[ ]>" :subid("86_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1500 .annotate "line", 529 new $P1499, 'ExceptionHandler' @@ -17677,7 +17677,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "circumfix:sym" :subid("87_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "circumfix:sym" :subid("87_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1527 .annotate "line", 544 new $P1526, 'ExceptionHandler' @@ -17708,7 +17708,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "circumfix:sym<{ }>" :subid("88_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "circumfix:sym<{ }>" :subid("88_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1537 .annotate "line", 546 new $P1536, 'ExceptionHandler' @@ -17778,7 +17778,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "circumfix:sym" :subid("89_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "circumfix:sym" :subid("89_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1561 .annotate "line", 552 new $P1560, 'ExceptionHandler' @@ -17858,7 +17858,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "semilist" :subid("90_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "semilist" :subid("90_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1590 .annotate "line", 559 new $P1589, 'ExceptionHandler' @@ -17889,7 +17889,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "postcircumfix:sym<[ ]>" :subid("91_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "postcircumfix:sym<[ ]>" :subid("91_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1600 .annotate "line", 561 new $P1599, 'ExceptionHandler' @@ -17924,7 +17924,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "postcircumfix:sym<{ }>" :subid("92_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "postcircumfix:sym<{ }>" :subid("92_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1612 .annotate "line", 567 new $P1611, 'ExceptionHandler' @@ -17959,7 +17959,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "postcircumfix:sym" :subid("93_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "postcircumfix:sym" :subid("93_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1624 .annotate "line", 573 new $P1623, 'ExceptionHandler' @@ -17994,7 +17994,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "postcircumfix:sym<( )>" :subid("94_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "postcircumfix:sym<( )>" :subid("94_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1636 .annotate "line", 579 new $P1635, 'ExceptionHandler' @@ -18027,7 +18027,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "value" :subid("95_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "value" :subid("95_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1646 .annotate "line", 583 new $P1645, 'ExceptionHandler' @@ -18120,7 +18120,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "quote:sym" :subid("96_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "quote:sym" :subid("96_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1674 .annotate "line", 594 new $P1673, 'ExceptionHandler' @@ -18151,7 +18151,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "quote:sym" :subid("97_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "quote:sym" :subid("97_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1684 .annotate "line", 595 new $P1683, 'ExceptionHandler' @@ -18182,7 +18182,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "quote:sym" :subid("98_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "quote:sym" :subid("98_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1694 .annotate "line", 596 new $P1693, 'ExceptionHandler' @@ -18213,7 +18213,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "quote:sym" :subid("99_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "quote:sym" :subid("99_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1704 .annotate "line", 597 new $P1703, 'ExceptionHandler' @@ -18244,7 +18244,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "quote:sym" :subid("100_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "quote:sym" :subid("100_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1714 .annotate "line", 598 new $P1713, 'ExceptionHandler' @@ -18275,7 +18275,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "quote:sym" :subid("101_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "quote:sym" :subid("101_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1724 .annotate "line", 599 new $P1723, 'ExceptionHandler' @@ -18312,7 +18312,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "quote_escape:sym<$>" :subid("102_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "quote_escape:sym<$>" :subid("102_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1738 .annotate "line", 605 new $P1737, 'ExceptionHandler' @@ -18343,7 +18343,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "quote_escape:sym<{ }>" :subid("103_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "quote_escape:sym<{ }>" :subid("103_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1748 .annotate "line", 606 new $P1747, 'ExceptionHandler' @@ -18382,7 +18382,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "nulltermish" :subid("104_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "nulltermish" :subid("104_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1762 .annotate "line", 614 new $P1761, 'ExceptionHandler' @@ -18431,7 +18431,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "postfix:sym<.>" :subid("105_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "postfix:sym<.>" :subid("105_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1777 .annotate "line", 618 new $P1776, 'ExceptionHandler' @@ -18462,7 +18462,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "postfix:sym<++>" :subid("106_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "postfix:sym<++>" :subid("106_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1787 .annotate "line", 620 new $P1786, 'ExceptionHandler' @@ -18493,7 +18493,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "postfix:sym<-->" :subid("107_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "postfix:sym<-->" :subid("107_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1797 .annotate "line", 626 new $P1796, 'ExceptionHandler' @@ -18524,7 +18524,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"Actions"] -.sub "prefix:sym" :subid("108_1258208116.06691") :method :outer("11_1258208116.06691") +.sub "prefix:sym" :subid("108_1258264465.36631") :method :outer("11_1258264465.36631") .param pmc param_1807 .annotate "line", 632 new $P1806, 'ExceptionHandler' @@ -18555,18 +18555,18 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"RegexActions"] -.sub "_block1816" :subid("109_1258208116.06691") :outer("11_1258208116.06691") +.sub "_block1816" :subid("109_1258264465.36631") :outer("11_1258264465.36631") .annotate "line", 642 - .const 'Sub' $P1852 = "113_1258208116.06691" + .const 'Sub' $P1852 = "113_1258264465.36631" capture_lex $P1852 - .const 'Sub' $P1842 = "112_1258208116.06691" + .const 'Sub' $P1842 = "112_1258264465.36631" capture_lex $P1842 - .const 'Sub' $P1832 = "111_1258208116.06691" + .const 'Sub' $P1832 = "111_1258264465.36631" capture_lex $P1832 - .const 'Sub' $P1818 = "110_1258208116.06691" + .const 'Sub' $P1818 = "110_1258264465.36631" capture_lex $P1818 .annotate "line", 653 - .const 'Sub' $P1852 = "113_1258208116.06691" + .const 'Sub' $P1852 = "113_1258264465.36631" capture_lex $P1852 .annotate "line", 642 .return ($P1852) @@ -18574,7 +18574,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"RegexActions"] -.sub "metachar:sym<:my>" :subid("110_1258208116.06691") :method :outer("109_1258208116.06691") +.sub "metachar:sym<:my>" :subid("110_1258264465.36631") :method :outer("109_1258264465.36631") .param pmc param_1821 .annotate "line", 644 new $P1820, 'ExceptionHandler' @@ -18614,7 +18614,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"RegexActions"] -.sub "metachar:sym<{ }>" :subid("111_1258208116.06691") :method :outer("109_1258208116.06691") +.sub "metachar:sym<{ }>" :subid("111_1258264465.36631") :method :outer("109_1258264465.36631") .param pmc param_1835 .annotate "line", 649 new $P1834, 'ExceptionHandler' @@ -18645,7 +18645,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"RegexActions"] -.sub "assertion:sym<{ }>" :subid("112_1258208116.06691") :method :outer("109_1258208116.06691") +.sub "assertion:sym<{ }>" :subid("112_1258264465.36631") :method :outer("109_1258264465.36631") .param pmc param_1845 .annotate "line", 651 new $P1844, 'ExceptionHandler' @@ -18676,7 +18676,7 @@ NQP::Compiler - NQP compiler .namespace ["NQP";"RegexActions"] -.sub "codeblock" :subid("113_1258208116.06691") :method :outer("109_1258208116.06691") +.sub "codeblock" :subid("113_1258264465.36631") :method :outer("109_1258264465.36631") .param pmc param_1855 .annotate "line", 653 new $P1854, 'ExceptionHandler' @@ -18820,8 +18820,6 @@ NQP::Compiler - NQP compiler exit 0 .end -=cut - # Local Variables: # mode: pir # fill-column: 100 diff --git a/src/stage0/P6Regex-s0.pir b/src/stage0/P6Regex-s0.pir index b670247..90a6a93 100644 --- a/src/stage0/P6Regex-s0.pir +++ b/src/stage0/P6Regex-s0.pir @@ -16,165 +16,165 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes ### .include 'gen/p6regex-grammar.pir' .namespace [] -.sub "_block11" :anon :subid("10_1258208089.76063") +.sub "_block11" :anon :subid("10_1258264421.2958") .annotate "line", 0 get_hll_global $P14, ["Regex";"P6Regex";"Grammar"], "_block13" capture_lex $P14 .annotate "line", 3 get_hll_global $P14, ["Regex";"P6Regex";"Grammar"], "_block13" capture_lex $P14 - $P523 = $P14() + $P518 = $P14() .annotate "line", 1 - .return ($P523) + .return ($P518) .end .namespace [] -.sub "" :load :init :subid("post158") :outer("10_1258208089.76063") +.sub "" :load :init :subid("post158") :outer("10_1258264421.2958") .annotate "line", 0 - .const 'Sub' $P12 = "10_1258208089.76063" + .const 'Sub' $P12 = "10_1258264421.2958" .local pmc block set block, $P12 - $P524 = get_root_global ["parrot"], "P6metaclass" - $P524."new_class"("Regex::P6Regex::Grammar", "HLL::Grammar" :named("parent")) + $P519 = get_root_global ["parrot"], "P6metaclass" + $P519."new_class"("Regex::P6Regex::Grammar", "HLL::Grammar" :named("parent")) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block13" :subid("11_1258208089.76063") :outer("10_1258208089.76063") +.sub "_block13" :subid("11_1258264421.2958") :outer("10_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P516 = "156_1258208089.76063" - capture_lex $P516 - .const 'Sub' $P509 = "154_1258208089.76063" - capture_lex $P509 - .const 'Sub' $P502 = "152_1258208089.76063" - capture_lex $P502 - .const 'Sub' $P482 = "147_1258208089.76063" - capture_lex $P482 - .const 'Sub' $P448 = "141_1258208089.76063" - capture_lex $P448 - .const 'Sub' $P437 = "138_1258208089.76063" - capture_lex $P437 - .const 'Sub' $P425 = "135_1258208089.76063" - capture_lex $P425 - .const 'Sub' $P420 = "133_1258208089.76063" + .const 'Sub' $P511 = "156_1258264421.2958" + capture_lex $P511 + .const 'Sub' $P504 = "154_1258264421.2958" + capture_lex $P504 + .const 'Sub' $P497 = "152_1258264421.2958" + capture_lex $P497 + .const 'Sub' $P477 = "147_1258264421.2958" + capture_lex $P477 + .const 'Sub' $P443 = "141_1258264421.2958" + capture_lex $P443 + .const 'Sub' $P432 = "138_1258264421.2958" + capture_lex $P432 + .const 'Sub' $P420 = "135_1258264421.2958" capture_lex $P420 - .const 'Sub' $P410 = "130_1258208089.76063" - capture_lex $P410 - .const 'Sub' $P400 = "127_1258208089.76063" - capture_lex $P400 - .const 'Sub' $P392 = "123_1258208089.76063" - capture_lex $P392 - .const 'Sub' $P387 = "121_1258208089.76063" + .const 'Sub' $P415 = "133_1258264421.2958" + capture_lex $P415 + .const 'Sub' $P405 = "130_1258264421.2958" + capture_lex $P405 + .const 'Sub' $P395 = "127_1258264421.2958" + capture_lex $P395 + .const 'Sub' $P387 = "123_1258264421.2958" capture_lex $P387 - .const 'Sub' $P382 = "119_1258208089.76063" + .const 'Sub' $P382 = "121_1258264421.2958" capture_lex $P382 - .const 'Sub' $P377 = "117_1258208089.76063" + .const 'Sub' $P377 = "119_1258264421.2958" capture_lex $P377 - .const 'Sub' $P372 = "115_1258208089.76063" + .const 'Sub' $P372 = "117_1258264421.2958" capture_lex $P372 - .const 'Sub' $P362 = "113_1258208089.76063" - capture_lex $P362 - .const 'Sub' $P352 = "111_1258208089.76063" - capture_lex $P352 - .const 'Sub' $P345 = "109_1258208089.76063" - capture_lex $P345 - .const 'Sub' $P340 = "107_1258208089.76063" + .const 'Sub' $P367 = "115_1258264421.2958" + capture_lex $P367 + .const 'Sub' $P357 = "113_1258264421.2958" + capture_lex $P357 + .const 'Sub' $P347 = "111_1258264421.2958" + capture_lex $P347 + .const 'Sub' $P340 = "109_1258264421.2958" capture_lex $P340 - .const 'Sub' $P335 = "105_1258208089.76063" + .const 'Sub' $P335 = "107_1258264421.2958" capture_lex $P335 - .const 'Sub' $P330 = "103_1258208089.76063" + .const 'Sub' $P330 = "105_1258264421.2958" capture_lex $P330 - .const 'Sub' $P325 = "101_1258208089.76063" + .const 'Sub' $P325 = "103_1258264421.2958" capture_lex $P325 - .const 'Sub' $P320 = "99_1258208089.76063" + .const 'Sub' $P320 = "101_1258264421.2958" capture_lex $P320 - .const 'Sub' $P315 = "97_1258208089.76063" + .const 'Sub' $P315 = "99_1258264421.2958" capture_lex $P315 - .const 'Sub' $P310 = "95_1258208089.76063" + .const 'Sub' $P310 = "97_1258264421.2958" capture_lex $P310 - .const 'Sub' $P305 = "93_1258208089.76063" + .const 'Sub' $P305 = "95_1258264421.2958" capture_lex $P305 - .const 'Sub' $P294 = "89_1258208089.76063" - capture_lex $P294 - .const 'Sub' $P283 = "87_1258208089.76063" - capture_lex $P283 - .const 'Sub' $P277 = "85_1258208089.76063" - capture_lex $P277 - .const 'Sub' $P261 = "83_1258208089.76063" - capture_lex $P261 - .const 'Sub' $P255 = "81_1258208089.76063" - capture_lex $P255 - .const 'Sub' $P250 = "79_1258208089.76063" + .const 'Sub' $P300 = "93_1258264421.2958" + capture_lex $P300 + .const 'Sub' $P289 = "89_1258264421.2958" + capture_lex $P289 + .const 'Sub' $P278 = "87_1258264421.2958" + capture_lex $P278 + .const 'Sub' $P272 = "85_1258264421.2958" + capture_lex $P272 + .const 'Sub' $P256 = "83_1258264421.2958" + capture_lex $P256 + .const 'Sub' $P250 = "81_1258264421.2958" capture_lex $P250 - .const 'Sub' $P245 = "77_1258208089.76063" + .const 'Sub' $P245 = "79_1258264421.2958" capture_lex $P245 - .const 'Sub' $P239 = "75_1258208089.76063" - capture_lex $P239 - .const 'Sub' $P233 = "73_1258208089.76063" - capture_lex $P233 - .const 'Sub' $P227 = "71_1258208089.76063" - capture_lex $P227 - .const 'Sub' $P221 = "69_1258208089.76063" - capture_lex $P221 - .const 'Sub' $P216 = "67_1258208089.76063" + .const 'Sub' $P240 = "77_1258264421.2958" + capture_lex $P240 + .const 'Sub' $P234 = "75_1258264421.2958" + capture_lex $P234 + .const 'Sub' $P228 = "73_1258264421.2958" + capture_lex $P228 + .const 'Sub' $P222 = "71_1258264421.2958" + capture_lex $P222 + .const 'Sub' $P216 = "69_1258264421.2958" capture_lex $P216 - .const 'Sub' $P211 = "65_1258208089.76063" + .const 'Sub' $P211 = "67_1258264421.2958" capture_lex $P211 - .const 'Sub' $P206 = "63_1258208089.76063" + .const 'Sub' $P206 = "65_1258264421.2958" capture_lex $P206 - .const 'Sub' $P201 = "61_1258208089.76063" + .const 'Sub' $P201 = "63_1258264421.2958" capture_lex $P201 - .const 'Sub' $P196 = "59_1258208089.76063" + .const 'Sub' $P196 = "61_1258264421.2958" capture_lex $P196 - .const 'Sub' $P191 = "57_1258208089.76063" + .const 'Sub' $P191 = "59_1258264421.2958" capture_lex $P191 - .const 'Sub' $P186 = "55_1258208089.76063" - capture_lex $P186 - .const 'Sub' $P181 = "53_1258208089.76063" - capture_lex $P181 - .const 'Sub' $P176 = "51_1258208089.76063" - capture_lex $P176 - .const 'Sub' $P161 = "46_1258208089.76063" - capture_lex $P161 - .const 'Sub' $P150 = "44_1258208089.76063" - capture_lex $P150 - .const 'Sub' $P144 = "42_1258208089.76063" - capture_lex $P144 - .const 'Sub' $P138 = "40_1258208089.76063" - capture_lex $P138 - .const 'Sub' $P132 = "38_1258208089.76063" - capture_lex $P132 - .const 'Sub' $P114 = "33_1258208089.76063" - capture_lex $P114 - .const 'Sub' $P102 = "30_1258208089.76063" - capture_lex $P102 - .const 'Sub' $P96 = "28_1258208089.76063" - capture_lex $P96 - .const 'Sub' $P85 = "26_1258208089.76063" - capture_lex $P85 - .const 'Sub' $P79 = "24_1258208089.76063" - capture_lex $P79 - .const 'Sub' $P68 = "22_1258208089.76063" - capture_lex $P68 - .const 'Sub' $P61 = "20_1258208089.76063" - capture_lex $P61 - .const 'Sub' $P54 = "18_1258208089.76063" + .const 'Sub' $P187 = "57_1258264421.2958" + capture_lex $P187 + .const 'Sub' $P183 = "55_1258264421.2958" + capture_lex $P183 + .const 'Sub' $P178 = "53_1258264421.2958" + capture_lex $P178 + .const 'Sub' $P173 = "51_1258264421.2958" + capture_lex $P173 + .const 'Sub' $P168 = "49_1258264421.2958" + capture_lex $P168 + .const 'Sub' $P153 = "44_1258264421.2958" + capture_lex $P153 + .const 'Sub' $P142 = "42_1258264421.2958" + capture_lex $P142 + .const 'Sub' $P136 = "40_1258264421.2958" + capture_lex $P136 + .const 'Sub' $P130 = "38_1258264421.2958" + capture_lex $P130 + .const 'Sub' $P124 = "36_1258264421.2958" + capture_lex $P124 + .const 'Sub' $P106 = "31_1258264421.2958" + capture_lex $P106 + .const 'Sub' $P94 = "28_1258264421.2958" + capture_lex $P94 + .const 'Sub' $P88 = "26_1258264421.2958" + capture_lex $P88 + .const 'Sub' $P77 = "24_1258264421.2958" + capture_lex $P77 + .const 'Sub' $P71 = "22_1258264421.2958" + capture_lex $P71 + .const 'Sub' $P60 = "20_1258264421.2958" + capture_lex $P60 + .const 'Sub' $P54 = "18_1258264421.2958" capture_lex $P54 - .const 'Sub' $P45 = "15_1258208089.76063" + .const 'Sub' $P45 = "15_1258264421.2958" capture_lex $P45 - .const 'Sub' $P38 = "13_1258208089.76063" + .const 'Sub' $P38 = "13_1258264421.2958" capture_lex $P38 - .const 'Sub' $P15 = "12_1258208089.76063" + .const 'Sub' $P15 = "12_1258264421.2958" capture_lex $P15 - .const 'Sub' $P516 = "156_1258208089.76063" - capture_lex $P516 - .return ($P516) + .const 'Sub' $P511 = "156_1258264421.2958" + capture_lex $P511 + .return ($P511) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "obs" :subid("12_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "obs" :subid("12_1258264421.2958") :method :outer("11_1258264421.2958") .param pmc param_18 .param pmc param_19 .param pmc param_20 :optional @@ -223,7 +223,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "ws" :subid("13_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "ws" :subid("13_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx39_tgt .local int rx39_pos @@ -293,7 +293,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__ws" :subid("14_1258208089.76063") :method +.sub "!PREFIX__ws" :subid("14_1258264421.2958") :method .annotate "line", 3 new $P41, "ResizablePMCArray" push $P41, "" @@ -302,9 +302,9 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "normspace" :subid("15_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "normspace" :subid("15_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P50 = "17_1258208089.76063" + .const 'Sub' $P50 = "17_1258264421.2958" capture_lex $P50 .local string rx46_tgt .local int rx46_pos @@ -326,7 +326,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .annotate "line", 10 # rx subrule "before" subtype=zerowidth negate= rx46_cur."!cursor_pos"(rx46_pos) - .const 'Sub' $P50 = "17_1258208089.76063" + .const 'Sub' $P50 = "17_1258264421.2958" capture_lex $P50 $P10 = rx46_cur."before"($P50) unless $P10, rx46_fail @@ -354,7 +354,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__normspace" :subid("16_1258208089.76063") :method +.sub "!PREFIX__normspace" :subid("16_1258264421.2958") :method .annotate "line", 3 new $P48, "ResizablePMCArray" push $P48, "" @@ -363,7 +363,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block49" :anon :subid("17_1258208089.76063") :method :outer("15_1258208089.76063") +.sub "_block49" :anon :subid("17_1258264421.2958") :method :outer("15_1258264421.2958") .annotate "line", 10 .local string rx51_tgt .local int rx51_pos @@ -428,7 +428,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "quote" :subid("18_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "arg" :subid("18_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx55_tgt .local int rx55_pos @@ -437,7 +437,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx55_rep .local pmc rx55_cur (rx55_cur, rx55_pos, rx55_tgt, $I10) = self."!cursor_start"() - rx55_cur."!cursor_debug"("START ", "quote") + rx55_cur."!cursor_debug"("START ", "arg") .lex unicode:"$\x{a2}", rx55_cur .local pmc match .lex "$/", match @@ -447,53 +447,70 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx55_off, $I10, 1 substr rx55_tgt, rx55_tgt, rx55_off rx55_start: -.annotate "line", 12 - # rx literal "'" - add $I11, rx55_pos, 1 - gt $I11, rx55_eos, rx55_fail - sub $I11, rx55_pos, rx55_off - substr $S10, rx55_tgt, $I11, 1 - ne $S10, "'", rx55_fail - add rx55_pos, 1 - # rx subcapture "val" - set_addr $I10, rxcap_60_fail + alt58_0: +.annotate "line", 13 + set_addr $I10, alt58_1 rx55_cur."!mark_push"(0, rx55_pos, $I10) - # rx rxquantr58 ** 0..* - set_addr $I59, rxquantr58_done - rx55_cur."!mark_push"(0, rx55_pos, $I59) - rxquantr58_loop: - # rx enumcharlist negate=1 +.annotate "line", 14 + # rx enumcharlist negate=0 zerowidth ge rx55_pos, rx55_eos, rx55_fail sub $I10, rx55_pos, rx55_off substr $S10, rx55_tgt, $I10, 1 index $I11, "'", $S10 - ge $I11, 0, rx55_fail - inc rx55_pos - (rx55_rep) = rx55_cur."!mark_commit"($I59) - rx55_cur."!mark_push"(rx55_rep, rx55_pos, $I59) - goto rxquantr58_loop - rxquantr58_done: - set_addr $I10, rxcap_60_fail + lt $I11, 0, rx55_fail + # rx subrule "quote_EXPR" subtype=capture negate= + rx55_cur."!cursor_pos"(rx55_pos) + $P10 = rx55_cur."quote_EXPR"(":q") + unless $P10, rx55_fail + rx55_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("quote_EXPR") + rx55_pos = $P10."pos"() + goto alt58_end + alt58_1: + set_addr $I10, alt58_2 + rx55_cur."!mark_push"(0, rx55_pos, $I10) +.annotate "line", 15 + # rx enumcharlist negate=0 zerowidth + ge rx55_pos, rx55_eos, rx55_fail + sub $I10, rx55_pos, rx55_off + substr $S10, rx55_tgt, $I10, 1 + index $I11, "\"", $S10 + lt $I11, 0, rx55_fail + # rx subrule "quote_EXPR" subtype=capture negate= + rx55_cur."!cursor_pos"(rx55_pos) + $P10 = rx55_cur."quote_EXPR"(":qq") + unless $P10, rx55_fail + rx55_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("quote_EXPR") + rx55_pos = $P10."pos"() + goto alt58_end + alt58_2: +.annotate "line", 16 + # rx subcapture "val" + set_addr $I10, rxcap_59_fail + rx55_cur."!mark_push"(0, rx55_pos, $I10) + # rx charclass_q d r 1..-1 + sub $I10, rx55_pos, rx55_off + find_not_cclass $I11, 8, rx55_tgt, $I10, rx55_eos + add $I12, $I10, 1 + lt $I11, $I12, rx55_fail + add rx55_pos, rx55_off, $I11 + set_addr $I10, rxcap_59_fail ($I12, $I11) = rx55_cur."!mark_peek"($I10) rx55_cur."!cursor_pos"($I11) ($P10) = rx55_cur."!cursor_start"() $P10."!cursor_pass"(rx55_pos, "") rx55_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("val") - goto rxcap_60_done - rxcap_60_fail: + goto rxcap_59_done + rxcap_59_fail: goto rx55_fail - rxcap_60_done: - # rx literal "'" - add $I11, rx55_pos, 1 - gt $I11, rx55_eos, rx55_fail - sub $I11, rx55_pos, rx55_off - substr $S10, rx55_tgt, $I11, 1 - ne $S10, "'", rx55_fail - add rx55_pos, 1 + rxcap_59_done: + alt58_end: +.annotate "line", 12 # rx pass - rx55_cur."!cursor_pass"(rx55_pos, "quote") - rx55_cur."!cursor_debug"("PASS ", "quote", " at pos=", rx55_pos) + rx55_cur."!cursor_pass"(rx55_pos, "arg") + rx55_cur."!cursor_debug"("PASS ", "arg", " at pos=", rx55_pos) .return (rx55_cur) rx55_fail: .annotate "line", 3 @@ -503,1235 +520,1242 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx55_done: rx55_cur."!cursor_fail"() - rx55_cur."!cursor_debug"("FAIL ", "quote") + rx55_cur."!cursor_debug"("FAIL ", "arg") .return (rx55_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__quote" :subid("19_1258208089.76063") :method +.sub "!PREFIX__arg" :subid("19_1258264421.2958") :method .annotate "line", 3 new $P57, "ResizablePMCArray" + push $P57, "" + push $P57, "\"" push $P57, "'" .return ($P57) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "arg" :subid("20_1258208089.76063") :method :outer("11_1258208089.76063") -.annotate "line", 3 - .local string rx62_tgt - .local int rx62_pos - .local int rx62_off - .local int rx62_eos - .local int rx62_rep - .local pmc rx62_cur - (rx62_cur, rx62_pos, rx62_tgt, $I10) = self."!cursor_start"() - rx62_cur."!cursor_debug"("START ", "arg") - .lex unicode:"$\x{a2}", rx62_cur - .local pmc match - .lex "$/", match - length rx62_eos, rx62_tgt - set rx62_off, 0 - lt $I10, 2, rx62_start - sub rx62_off, $I10, 1 - substr rx62_tgt, rx62_tgt, rx62_off - rx62_start: - alt66_0: -.annotate "line", 15 - set_addr $I10, alt66_1 - rx62_cur."!mark_push"(0, rx62_pos, $I10) -.annotate "line", 16 - # rx subrule "quote" subtype=capture negate= - rx62_cur."!cursor_pos"(rx62_pos) - $P10 = rx62_cur."quote"() - unless $P10, rx62_fail - rx62_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("quote") - rx62_pos = $P10."pos"() - goto alt66_end - alt66_1: -.annotate "line", 17 - # rx subcapture "val" - set_addr $I10, rxcap_67_fail - rx62_cur."!mark_push"(0, rx62_pos, $I10) - # rx charclass_q d r 1..-1 - sub $I10, rx62_pos, rx62_off - find_not_cclass $I11, 8, rx62_tgt, $I10, rx62_eos - add $I12, $I10, 1 - lt $I11, $I12, rx62_fail - add rx62_pos, rx62_off, $I11 - set_addr $I10, rxcap_67_fail - ($I12, $I11) = rx62_cur."!mark_peek"($I10) - rx62_cur."!cursor_pos"($I11) - ($P10) = rx62_cur."!cursor_start"() - $P10."!cursor_pass"(rx62_pos, "") - rx62_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("val") - goto rxcap_67_done - rxcap_67_fail: - goto rx62_fail - rxcap_67_done: - alt66_end: -.annotate "line", 14 - # rx pass - rx62_cur."!cursor_pass"(rx62_pos, "arg") - rx62_cur."!cursor_debug"("PASS ", "arg", " at pos=", rx62_pos) - .return (rx62_cur) - rx62_fail: -.annotate "line", 3 - (rx62_rep, rx62_pos, $I10, $P10) = rx62_cur."!mark_fail"(0) - lt rx62_pos, -1, rx62_done - eq rx62_pos, -1, rx62_fail - jump $I10 - rx62_done: - rx62_cur."!cursor_fail"() - rx62_cur."!cursor_debug"("FAIL ", "arg") - .return (rx62_cur) - .return () -.end - - -.namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__arg" :subid("21_1258208089.76063") :method -.annotate "line", 3 - $P64 = self."!PREFIX__!subrule"("quote", "") - new $P65, "ResizablePMCArray" - push $P65, "" - push $P65, $P64 - .return ($P65) -.end - - -.namespace ["Regex";"P6Regex";"Grammar"] -.sub "arglist" :subid("22_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "arglist" :subid("20_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx69_tgt - .local int rx69_pos - .local int rx69_off - .local int rx69_eos - .local int rx69_rep - .local pmc rx69_cur - (rx69_cur, rx69_pos, rx69_tgt, $I10) = self."!cursor_start"() - rx69_cur."!cursor_debug"("START ", "arglist") - rx69_cur."!cursor_caparray"("arg") - .lex unicode:"$\x{a2}", rx69_cur + .local string rx61_tgt + .local int rx61_pos + .local int rx61_off + .local int rx61_eos + .local int rx61_rep + .local pmc rx61_cur + (rx61_cur, rx61_pos, rx61_tgt, $I10) = self."!cursor_start"() + rx61_cur."!cursor_debug"("START ", "arglist") + rx61_cur."!cursor_caparray"("arg") + .lex unicode:"$\x{a2}", rx61_cur .local pmc match .lex "$/", match - length rx69_eos, rx69_tgt - set rx69_off, 0 - lt $I10, 2, rx69_start - sub rx69_off, $I10, 1 - substr rx69_tgt, rx69_tgt, rx69_off - rx69_start: -.annotate "line", 21 + length rx61_eos, rx61_tgt + set rx61_off, 0 + lt $I10, 2, rx61_start + sub rx61_off, $I10, 1 + substr rx61_tgt, rx61_tgt, rx61_off + rx61_start: +.annotate "line", 20 # rx subrule "ws" subtype=method negate= - rx69_cur."!cursor_pos"(rx69_pos) - $P10 = rx69_cur."ws"() - unless $P10, rx69_fail - rx69_pos = $P10."pos"() + rx61_cur."!cursor_pos"(rx61_pos) + $P10 = rx61_cur."ws"() + unless $P10, rx61_fail + rx61_pos = $P10."pos"() # rx subrule "arg" subtype=capture negate= - rx69_cur."!cursor_pos"(rx69_pos) - $P10 = rx69_cur."arg"() - unless $P10, rx69_fail - rx69_cur."!mark_push"(0, -1, 0, $P10) + rx61_cur."!cursor_pos"(rx61_pos) + $P10 = rx61_cur."arg"() + unless $P10, rx61_fail + rx61_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("arg") - rx69_pos = $P10."pos"() + rx61_pos = $P10."pos"() # rx subrule "ws" subtype=method negate= - rx69_cur."!cursor_pos"(rx69_pos) - $P10 = rx69_cur."ws"() - unless $P10, rx69_fail - rx69_pos = $P10."pos"() - # rx rxquantr74 ** 0..* - set_addr $I77, rxquantr74_done - rx69_cur."!mark_push"(0, rx69_pos, $I77) - rxquantr74_loop: + rx61_cur."!cursor_pos"(rx61_pos) + $P10 = rx61_cur."ws"() + unless $P10, rx61_fail + rx61_pos = $P10."pos"() + # rx rxquantr66 ** 0..* + set_addr $I69, rxquantr66_done + rx61_cur."!mark_push"(0, rx61_pos, $I69) + rxquantr66_loop: # rx subrule "ws" subtype=method negate= - rx69_cur."!cursor_pos"(rx69_pos) - $P10 = rx69_cur."ws"() - unless $P10, rx69_fail - rx69_pos = $P10."pos"() + rx61_cur."!cursor_pos"(rx61_pos) + $P10 = rx61_cur."ws"() + unless $P10, rx61_fail + rx61_pos = $P10."pos"() # rx literal "," - add $I11, rx69_pos, 1 - gt $I11, rx69_eos, rx69_fail - sub $I11, rx69_pos, rx69_off - substr $S10, rx69_tgt, $I11, 1 - ne $S10, ",", rx69_fail - add rx69_pos, 1 + add $I11, rx61_pos, 1 + gt $I11, rx61_eos, rx61_fail + sub $I11, rx61_pos, rx61_off + substr $S10, rx61_tgt, $I11, 1 + ne $S10, ",", rx61_fail + add rx61_pos, 1 # rx subrule "ws" subtype=method negate= - rx69_cur."!cursor_pos"(rx69_pos) - $P10 = rx69_cur."ws"() - unless $P10, rx69_fail - rx69_pos = $P10."pos"() + rx61_cur."!cursor_pos"(rx61_pos) + $P10 = rx61_cur."ws"() + unless $P10, rx61_fail + rx61_pos = $P10."pos"() # rx subrule "arg" subtype=capture negate= - rx69_cur."!cursor_pos"(rx69_pos) - $P10 = rx69_cur."arg"() - unless $P10, rx69_fail - rx69_cur."!mark_push"(0, -1, 0, $P10) + rx61_cur."!cursor_pos"(rx61_pos) + $P10 = rx61_cur."arg"() + unless $P10, rx61_fail + rx61_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("arg") - rx69_pos = $P10."pos"() - (rx69_rep) = rx69_cur."!mark_commit"($I77) - rx69_cur."!mark_push"(rx69_rep, rx69_pos, $I77) - goto rxquantr74_loop - rxquantr74_done: + rx61_pos = $P10."pos"() + (rx61_rep) = rx61_cur."!mark_commit"($I69) + rx61_cur."!mark_push"(rx61_rep, rx61_pos, $I69) + goto rxquantr66_loop + rxquantr66_done: # rx subrule "ws" subtype=method negate= - rx69_cur."!cursor_pos"(rx69_pos) - $P10 = rx69_cur."ws"() - unless $P10, rx69_fail - rx69_pos = $P10."pos"() + rx61_cur."!cursor_pos"(rx61_pos) + $P10 = rx61_cur."ws"() + unless $P10, rx61_fail + rx61_pos = $P10."pos"() # rx pass - rx69_cur."!cursor_pass"(rx69_pos, "arglist") - rx69_cur."!cursor_debug"("PASS ", "arglist", " at pos=", rx69_pos) - .return (rx69_cur) - rx69_fail: -.annotate "line", 3 - (rx69_rep, rx69_pos, $I10, $P10) = rx69_cur."!mark_fail"(0) - lt rx69_pos, -1, rx69_done - eq rx69_pos, -1, rx69_fail + rx61_cur."!cursor_pass"(rx61_pos, "arglist") + rx61_cur."!cursor_debug"("PASS ", "arglist", " at pos=", rx61_pos) + .return (rx61_cur) + rx61_fail: +.annotate "line", 3 + (rx61_rep, rx61_pos, $I10, $P10) = rx61_cur."!mark_fail"(0) + lt rx61_pos, -1, rx61_done + eq rx61_pos, -1, rx61_fail jump $I10 - rx69_done: - rx69_cur."!cursor_fail"() - rx69_cur."!cursor_debug"("FAIL ", "arglist") - .return (rx69_cur) + rx61_done: + rx61_cur."!cursor_fail"() + rx61_cur."!cursor_debug"("FAIL ", "arglist") + .return (rx61_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__arglist" :subid("23_1258208089.76063") :method +.sub "!PREFIX__arglist" :subid("21_1258264421.2958") :method .annotate "line", 3 - new $P71, "ResizablePMCArray" - push $P71, "" - .return ($P71) + new $P63, "ResizablePMCArray" + push $P63, "" + .return ($P63) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "TOP" :subid("24_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "TOP" :subid("22_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx80_tgt - .local int rx80_pos - .local int rx80_off - .local int rx80_eos - .local int rx80_rep - .local pmc rx80_cur - (rx80_cur, rx80_pos, rx80_tgt, $I10) = self."!cursor_start"() - rx80_cur."!cursor_debug"("START ", "TOP") - .lex unicode:"$\x{a2}", rx80_cur + .local string rx72_tgt + .local int rx72_pos + .local int rx72_off + .local int rx72_eos + .local int rx72_rep + .local pmc rx72_cur + (rx72_cur, rx72_pos, rx72_tgt, $I10) = self."!cursor_start"() + rx72_cur."!cursor_debug"("START ", "TOP") + .lex unicode:"$\x{a2}", rx72_cur .local pmc match .lex "$/", match - length rx80_eos, rx80_tgt - set rx80_off, 0 - lt $I10, 2, rx80_start - sub rx80_off, $I10, 1 - substr rx80_tgt, rx80_tgt, rx80_off - rx80_start: -.annotate "line", 24 + length rx72_eos, rx72_tgt + set rx72_off, 0 + lt $I10, 2, rx72_start + sub rx72_off, $I10, 1 + substr rx72_tgt, rx72_tgt, rx72_off + rx72_start: +.annotate "line", 23 # rx subrule "nibbler" subtype=capture negate= - rx80_cur."!cursor_pos"(rx80_pos) - $P10 = rx80_cur."nibbler"() - unless $P10, rx80_fail - rx80_cur."!mark_push"(0, -1, 0, $P10) + rx72_cur."!cursor_pos"(rx72_pos) + $P10 = rx72_cur."nibbler"() + unless $P10, rx72_fail + rx72_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("nibbler") - rx80_pos = $P10."pos"() - alt84_0: -.annotate "line", 25 - set_addr $I10, alt84_1 - rx80_cur."!mark_push"(0, rx80_pos, $I10) + rx72_pos = $P10."pos"() + alt76_0: +.annotate "line", 24 + set_addr $I10, alt76_1 + rx72_cur."!mark_push"(0, rx72_pos, $I10) # rxanchor eos - ne rx80_pos, rx80_eos, rx80_fail - goto alt84_end - alt84_1: + ne rx72_pos, rx72_eos, rx72_fail + goto alt76_end + alt76_1: # rx subrule "panic" subtype=method negate= - rx80_cur."!cursor_pos"(rx80_pos) - $P10 = rx80_cur."panic"("Confused") - unless $P10, rx80_fail - rx80_pos = $P10."pos"() - alt84_end: -.annotate "line", 23 + rx72_cur."!cursor_pos"(rx72_pos) + $P10 = rx72_cur."panic"("Confused") + unless $P10, rx72_fail + rx72_pos = $P10."pos"() + alt76_end: +.annotate "line", 22 # rx pass - rx80_cur."!cursor_pass"(rx80_pos, "TOP") - rx80_cur."!cursor_debug"("PASS ", "TOP", " at pos=", rx80_pos) - .return (rx80_cur) - rx80_fail: -.annotate "line", 3 - (rx80_rep, rx80_pos, $I10, $P10) = rx80_cur."!mark_fail"(0) - lt rx80_pos, -1, rx80_done - eq rx80_pos, -1, rx80_fail + rx72_cur."!cursor_pass"(rx72_pos, "TOP") + rx72_cur."!cursor_debug"("PASS ", "TOP", " at pos=", rx72_pos) + .return (rx72_cur) + rx72_fail: +.annotate "line", 3 + (rx72_rep, rx72_pos, $I10, $P10) = rx72_cur."!mark_fail"(0) + lt rx72_pos, -1, rx72_done + eq rx72_pos, -1, rx72_fail jump $I10 - rx80_done: - rx80_cur."!cursor_fail"() - rx80_cur."!cursor_debug"("FAIL ", "TOP") - .return (rx80_cur) + rx72_done: + rx72_cur."!cursor_fail"() + rx72_cur."!cursor_debug"("FAIL ", "TOP") + .return (rx72_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__TOP" :subid("25_1258208089.76063") :method +.sub "!PREFIX__TOP" :subid("23_1258264421.2958") :method .annotate "line", 3 - $P82 = self."!PREFIX__!subrule"("nibbler", "") - new $P83, "ResizablePMCArray" - push $P83, $P82 - .return ($P83) + $P74 = self."!PREFIX__!subrule"("nibbler", "") + new $P75, "ResizablePMCArray" + push $P75, $P74 + .return ($P75) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "nibbler" :subid("26_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "nibbler" :subid("24_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx86_tgt - .local int rx86_pos - .local int rx86_off - .local int rx86_eos - .local int rx86_rep - .local pmc rx86_cur - (rx86_cur, rx86_pos, rx86_tgt, $I10) = self."!cursor_start"() - rx86_cur."!cursor_debug"("START ", "nibbler") - rx86_cur."!cursor_caparray"("termish") - .lex unicode:"$\x{a2}", rx86_cur + .local string rx78_tgt + .local int rx78_pos + .local int rx78_off + .local int rx78_eos + .local int rx78_rep + .local pmc rx78_cur + (rx78_cur, rx78_pos, rx78_tgt, $I10) = self."!cursor_start"() + rx78_cur."!cursor_debug"("START ", "nibbler") + rx78_cur."!cursor_caparray"("termish") + .lex unicode:"$\x{a2}", rx78_cur .local pmc match .lex "$/", match - length rx86_eos, rx86_tgt - set rx86_off, 0 - lt $I10, 2, rx86_start - sub rx86_off, $I10, 1 - substr rx86_tgt, rx86_tgt, rx86_off - rx86_start: -.annotate "line", 29 + length rx78_eos, rx78_tgt + set rx78_off, 0 + lt $I10, 2, rx78_start + sub rx78_off, $I10, 1 + substr rx78_tgt, rx78_tgt, rx78_off + rx78_start: +.annotate "line", 28 # rx reduce name="nibbler" key="open" - rx86_cur."!cursor_pos"(rx86_pos) - rx86_cur."!reduce"("nibbler", "open") -.annotate "line", 30 - # rx rxquantr89 ** 0..1 - set_addr $I91, rxquantr89_done - rx86_cur."!mark_push"(0, rx86_pos, $I91) - rxquantr89_loop: + rx78_cur."!cursor_pos"(rx78_pos) + rx78_cur."!reduce"("nibbler", "open") +.annotate "line", 29 + # rx rxquantr81 ** 0..1 + set_addr $I83, rxquantr81_done + rx78_cur."!mark_push"(0, rx78_pos, $I83) + rxquantr81_loop: # rx subrule "ws" subtype=method negate= - rx86_cur."!cursor_pos"(rx86_pos) - $P10 = rx86_cur."ws"() - unless $P10, rx86_fail - rx86_pos = $P10."pos"() - alt90_0: - set_addr $I10, alt90_1 - rx86_cur."!mark_push"(0, rx86_pos, $I10) + rx78_cur."!cursor_pos"(rx78_pos) + $P10 = rx78_cur."ws"() + unless $P10, rx78_fail + rx78_pos = $P10."pos"() + alt82_0: + set_addr $I10, alt82_1 + rx78_cur."!mark_push"(0, rx78_pos, $I10) # rx literal "||" - add $I11, rx86_pos, 2 - gt $I11, rx86_eos, rx86_fail - sub $I11, rx86_pos, rx86_off - substr $S10, rx86_tgt, $I11, 2 - ne $S10, "||", rx86_fail - add rx86_pos, 2 - goto alt90_end - alt90_1: - set_addr $I10, alt90_2 - rx86_cur."!mark_push"(0, rx86_pos, $I10) + add $I11, rx78_pos, 2 + gt $I11, rx78_eos, rx78_fail + sub $I11, rx78_pos, rx78_off + substr $S10, rx78_tgt, $I11, 2 + ne $S10, "||", rx78_fail + add rx78_pos, 2 + goto alt82_end + alt82_1: + set_addr $I10, alt82_2 + rx78_cur."!mark_push"(0, rx78_pos, $I10) # rx literal "|" - add $I11, rx86_pos, 1 - gt $I11, rx86_eos, rx86_fail - sub $I11, rx86_pos, rx86_off - substr $S10, rx86_tgt, $I11, 1 - ne $S10, "|", rx86_fail - add rx86_pos, 1 - goto alt90_end - alt90_2: - set_addr $I10, alt90_3 - rx86_cur."!mark_push"(0, rx86_pos, $I10) + add $I11, rx78_pos, 1 + gt $I11, rx78_eos, rx78_fail + sub $I11, rx78_pos, rx78_off + substr $S10, rx78_tgt, $I11, 1 + ne $S10, "|", rx78_fail + add rx78_pos, 1 + goto alt82_end + alt82_2: + set_addr $I10, alt82_3 + rx78_cur."!mark_push"(0, rx78_pos, $I10) # rx literal "&&" - add $I11, rx86_pos, 2 - gt $I11, rx86_eos, rx86_fail - sub $I11, rx86_pos, rx86_off - substr $S10, rx86_tgt, $I11, 2 - ne $S10, "&&", rx86_fail - add rx86_pos, 2 - goto alt90_end - alt90_3: + add $I11, rx78_pos, 2 + gt $I11, rx78_eos, rx78_fail + sub $I11, rx78_pos, rx78_off + substr $S10, rx78_tgt, $I11, 2 + ne $S10, "&&", rx78_fail + add rx78_pos, 2 + goto alt82_end + alt82_3: # rx literal "&" - add $I11, rx86_pos, 1 - gt $I11, rx86_eos, rx86_fail - sub $I11, rx86_pos, rx86_off - substr $S10, rx86_tgt, $I11, 1 - ne $S10, "&", rx86_fail - add rx86_pos, 1 - alt90_end: - (rx86_rep) = rx86_cur."!mark_commit"($I91) - rxquantr89_done: -.annotate "line", 31 + add $I11, rx78_pos, 1 + gt $I11, rx78_eos, rx78_fail + sub $I11, rx78_pos, rx78_off + substr $S10, rx78_tgt, $I11, 1 + ne $S10, "&", rx78_fail + add rx78_pos, 1 + alt82_end: + (rx78_rep) = rx78_cur."!mark_commit"($I83) + rxquantr81_done: +.annotate "line", 30 # rx subrule "termish" subtype=capture negate= - rx86_cur."!cursor_pos"(rx86_pos) - $P10 = rx86_cur."termish"() - unless $P10, rx86_fail - rx86_cur."!mark_push"(0, -1, 0, $P10) + rx78_cur."!cursor_pos"(rx78_pos) + $P10 = rx78_cur."termish"() + unless $P10, rx78_fail + rx78_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("termish") - rx86_pos = $P10."pos"() -.annotate "line", 34 - # rx rxquantr92 ** 0..* - set_addr $I95, rxquantr92_done - rx86_cur."!mark_push"(0, rx86_pos, $I95) - rxquantr92_loop: - alt93_0: -.annotate "line", 32 - set_addr $I10, alt93_1 - rx86_cur."!mark_push"(0, rx86_pos, $I10) + rx78_pos = $P10."pos"() +.annotate "line", 33 + # rx rxquantr84 ** 0..* + set_addr $I87, rxquantr84_done + rx78_cur."!mark_push"(0, rx78_pos, $I87) + rxquantr84_loop: + alt85_0: +.annotate "line", 31 + set_addr $I10, alt85_1 + rx78_cur."!mark_push"(0, rx78_pos, $I10) # rx literal "||" - add $I11, rx86_pos, 2 - gt $I11, rx86_eos, rx86_fail - sub $I11, rx86_pos, rx86_off - substr $S10, rx86_tgt, $I11, 2 - ne $S10, "||", rx86_fail - add rx86_pos, 2 - goto alt93_end - alt93_1: + add $I11, rx78_pos, 2 + gt $I11, rx78_eos, rx78_fail + sub $I11, rx78_pos, rx78_off + substr $S10, rx78_tgt, $I11, 2 + ne $S10, "||", rx78_fail + add rx78_pos, 2 + goto alt85_end + alt85_1: # rx literal "|" - add $I11, rx86_pos, 1 - gt $I11, rx86_eos, rx86_fail - sub $I11, rx86_pos, rx86_off - substr $S10, rx86_tgt, $I11, 1 - ne $S10, "|", rx86_fail - add rx86_pos, 1 - alt93_end: - alt94_0: -.annotate "line", 33 - set_addr $I10, alt94_1 - rx86_cur."!mark_push"(0, rx86_pos, $I10) + add $I11, rx78_pos, 1 + gt $I11, rx78_eos, rx78_fail + sub $I11, rx78_pos, rx78_off + substr $S10, rx78_tgt, $I11, 1 + ne $S10, "|", rx78_fail + add rx78_pos, 1 + alt85_end: + alt86_0: +.annotate "line", 32 + set_addr $I10, alt86_1 + rx78_cur."!mark_push"(0, rx78_pos, $I10) # rx subrule "termish" subtype=capture negate= - rx86_cur."!cursor_pos"(rx86_pos) - $P10 = rx86_cur."termish"() - unless $P10, rx86_fail - rx86_cur."!mark_push"(0, -1, 0, $P10) + rx78_cur."!cursor_pos"(rx78_pos) + $P10 = rx78_cur."termish"() + unless $P10, rx78_fail + rx78_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("termish") - rx86_pos = $P10."pos"() - goto alt94_end - alt94_1: + rx78_pos = $P10."pos"() + goto alt86_end + alt86_1: # rx subrule "panic" subtype=method negate= - rx86_cur."!cursor_pos"(rx86_pos) - $P10 = rx86_cur."panic"("Null pattern not allowed") - unless $P10, rx86_fail - rx86_pos = $P10."pos"() - alt94_end: -.annotate "line", 34 - (rx86_rep) = rx86_cur."!mark_commit"($I95) - rx86_cur."!mark_push"(rx86_rep, rx86_pos, $I95) - goto rxquantr92_loop - rxquantr92_done: -.annotate "line", 28 + rx78_cur."!cursor_pos"(rx78_pos) + $P10 = rx78_cur."panic"("Null pattern not allowed") + unless $P10, rx78_fail + rx78_pos = $P10."pos"() + alt86_end: +.annotate "line", 33 + (rx78_rep) = rx78_cur."!mark_commit"($I87) + rx78_cur."!mark_push"(rx78_rep, rx78_pos, $I87) + goto rxquantr84_loop + rxquantr84_done: +.annotate "line", 27 # rx pass - rx86_cur."!cursor_pass"(rx86_pos, "nibbler") - rx86_cur."!cursor_debug"("PASS ", "nibbler", " at pos=", rx86_pos) - .return (rx86_cur) - rx86_fail: -.annotate "line", 3 - (rx86_rep, rx86_pos, $I10, $P10) = rx86_cur."!mark_fail"(0) - lt rx86_pos, -1, rx86_done - eq rx86_pos, -1, rx86_fail + rx78_cur."!cursor_pass"(rx78_pos, "nibbler") + rx78_cur."!cursor_debug"("PASS ", "nibbler", " at pos=", rx78_pos) + .return (rx78_cur) + rx78_fail: +.annotate "line", 3 + (rx78_rep, rx78_pos, $I10, $P10) = rx78_cur."!mark_fail"(0) + lt rx78_pos, -1, rx78_done + eq rx78_pos, -1, rx78_fail jump $I10 - rx86_done: - rx86_cur."!cursor_fail"() - rx86_cur."!cursor_debug"("FAIL ", "nibbler") - .return (rx86_cur) + rx78_done: + rx78_cur."!cursor_fail"() + rx78_cur."!cursor_debug"("FAIL ", "nibbler") + .return (rx78_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__nibbler" :subid("27_1258208089.76063") :method +.sub "!PREFIX__nibbler" :subid("25_1258264421.2958") :method .annotate "line", 3 - new $P88, "ResizablePMCArray" - push $P88, "" - .return ($P88) + new $P80, "ResizablePMCArray" + push $P80, "" + .return ($P80) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "termish" :subid("28_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "termish" :subid("26_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx97_tgt - .local int rx97_pos - .local int rx97_off - .local int rx97_eos - .local int rx97_rep - .local pmc rx97_cur - (rx97_cur, rx97_pos, rx97_tgt, $I10) = self."!cursor_start"() - rx97_cur."!cursor_debug"("START ", "termish") - rx97_cur."!cursor_caparray"("noun") - .lex unicode:"$\x{a2}", rx97_cur + .local string rx89_tgt + .local int rx89_pos + .local int rx89_off + .local int rx89_eos + .local int rx89_rep + .local pmc rx89_cur + (rx89_cur, rx89_pos, rx89_tgt, $I10) = self."!cursor_start"() + rx89_cur."!cursor_debug"("START ", "termish") + rx89_cur."!cursor_caparray"("noun") + .lex unicode:"$\x{a2}", rx89_cur .local pmc match .lex "$/", match - length rx97_eos, rx97_tgt - set rx97_off, 0 - lt $I10, 2, rx97_start - sub rx97_off, $I10, 1 - substr rx97_tgt, rx97_tgt, rx97_off - rx97_start: -.annotate "line", 38 - # rx rxquantr100 ** 1..* - set_addr $I101, rxquantr100_done - rx97_cur."!mark_push"(0, -1, $I101) - rxquantr100_loop: + length rx89_eos, rx89_tgt + set rx89_off, 0 + lt $I10, 2, rx89_start + sub rx89_off, $I10, 1 + substr rx89_tgt, rx89_tgt, rx89_off + rx89_start: +.annotate "line", 37 + # rx rxquantr92 ** 1..* + set_addr $I93, rxquantr92_done + rx89_cur."!mark_push"(0, -1, $I93) + rxquantr92_loop: # rx subrule "quantified_atom" subtype=capture negate= - rx97_cur."!cursor_pos"(rx97_pos) - $P10 = rx97_cur."quantified_atom"() - unless $P10, rx97_fail - rx97_cur."!mark_push"(0, -1, 0, $P10) + rx89_cur."!cursor_pos"(rx89_pos) + $P10 = rx89_cur."quantified_atom"() + unless $P10, rx89_fail + rx89_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("noun") - rx97_pos = $P10."pos"() - (rx97_rep) = rx97_cur."!mark_commit"($I101) - rx97_cur."!mark_push"(rx97_rep, rx97_pos, $I101) - goto rxquantr100_loop - rxquantr100_done: -.annotate "line", 37 + rx89_pos = $P10."pos"() + (rx89_rep) = rx89_cur."!mark_commit"($I93) + rx89_cur."!mark_push"(rx89_rep, rx89_pos, $I93) + goto rxquantr92_loop + rxquantr92_done: +.annotate "line", 36 # rx pass - rx97_cur."!cursor_pass"(rx97_pos, "termish") - rx97_cur."!cursor_debug"("PASS ", "termish", " at pos=", rx97_pos) - .return (rx97_cur) - rx97_fail: -.annotate "line", 3 - (rx97_rep, rx97_pos, $I10, $P10) = rx97_cur."!mark_fail"(0) - lt rx97_pos, -1, rx97_done - eq rx97_pos, -1, rx97_fail + rx89_cur."!cursor_pass"(rx89_pos, "termish") + rx89_cur."!cursor_debug"("PASS ", "termish", " at pos=", rx89_pos) + .return (rx89_cur) + rx89_fail: +.annotate "line", 3 + (rx89_rep, rx89_pos, $I10, $P10) = rx89_cur."!mark_fail"(0) + lt rx89_pos, -1, rx89_done + eq rx89_pos, -1, rx89_fail jump $I10 - rx97_done: - rx97_cur."!cursor_fail"() - rx97_cur."!cursor_debug"("FAIL ", "termish") - .return (rx97_cur) + rx89_done: + rx89_cur."!cursor_fail"() + rx89_cur."!cursor_debug"("FAIL ", "termish") + .return (rx89_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__termish" :subid("29_1258208089.76063") :method +.sub "!PREFIX__termish" :subid("27_1258264421.2958") :method .annotate "line", 3 - new $P99, "ResizablePMCArray" - push $P99, "" - .return ($P99) + new $P91, "ResizablePMCArray" + push $P91, "" + .return ($P91) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "quantified_atom" :subid("30_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "quantified_atom" :subid("28_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P110 = "32_1258208089.76063" - capture_lex $P110 - .local string rx103_tgt - .local int rx103_pos - .local int rx103_off - .local int rx103_eos - .local int rx103_rep - .local pmc rx103_cur - (rx103_cur, rx103_pos, rx103_tgt, $I10) = self."!cursor_start"() - rx103_cur."!cursor_debug"("START ", "quantified_atom") - rx103_cur."!cursor_caparray"("backmod", "quantifier") - .lex unicode:"$\x{a2}", rx103_cur + .const 'Sub' $P102 = "30_1258264421.2958" + capture_lex $P102 + .local string rx95_tgt + .local int rx95_pos + .local int rx95_off + .local int rx95_eos + .local int rx95_rep + .local pmc rx95_cur + (rx95_cur, rx95_pos, rx95_tgt, $I10) = self."!cursor_start"() + rx95_cur."!cursor_debug"("START ", "quantified_atom") + rx95_cur."!cursor_caparray"("quantifier", "backmod") + .lex unicode:"$\x{a2}", rx95_cur .local pmc match .lex "$/", match - length rx103_eos, rx103_tgt - set rx103_off, 0 - lt $I10, 2, rx103_start - sub rx103_off, $I10, 1 - substr rx103_tgt, rx103_tgt, rx103_off - rx103_start: -.annotate "line", 42 + length rx95_eos, rx95_tgt + set rx95_off, 0 + lt $I10, 2, rx95_start + sub rx95_off, $I10, 1 + substr rx95_tgt, rx95_tgt, rx95_off + rx95_start: +.annotate "line", 41 # rx subrule "atom" subtype=capture negate= - rx103_cur."!cursor_pos"(rx103_pos) - $P10 = rx103_cur."atom"() - unless $P10, rx103_fail - rx103_cur."!mark_push"(0, -1, 0, $P10) + rx95_cur."!cursor_pos"(rx95_pos) + $P10 = rx95_cur."atom"() + unless $P10, rx95_fail + rx95_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("atom") - rx103_pos = $P10."pos"() - # rx rxquantr107 ** 0..1 - set_addr $I113, rxquantr107_done - rx103_cur."!mark_push"(0, rx103_pos, $I113) - rxquantr107_loop: + rx95_pos = $P10."pos"() + # rx rxquantr99 ** 0..1 + set_addr $I105, rxquantr99_done + rx95_cur."!mark_push"(0, rx95_pos, $I105) + rxquantr99_loop: # rx subrule "ws" subtype=method negate= - rx103_cur."!cursor_pos"(rx103_pos) - $P10 = rx103_cur."ws"() - unless $P10, rx103_fail - rx103_pos = $P10."pos"() - alt108_0: - set_addr $I10, alt108_1 - rx103_cur."!mark_push"(0, rx103_pos, $I10) + rx95_cur."!cursor_pos"(rx95_pos) + $P10 = rx95_cur."ws"() + unless $P10, rx95_fail + rx95_pos = $P10."pos"() + alt100_0: + set_addr $I10, alt100_1 + rx95_cur."!mark_push"(0, rx95_pos, $I10) # rx subrule "quantifier" subtype=capture negate= - rx103_cur."!cursor_pos"(rx103_pos) - $P10 = rx103_cur."quantifier"() - unless $P10, rx103_fail - rx103_cur."!mark_push"(0, -1, 0, $P10) + rx95_cur."!cursor_pos"(rx95_pos) + $P10 = rx95_cur."quantifier"() + unless $P10, rx95_fail + rx95_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("quantifier") - rx103_pos = $P10."pos"() - goto alt108_end - alt108_1: + rx95_pos = $P10."pos"() + goto alt100_end + alt100_1: # rx subrule "before" subtype=zerowidth negate= - rx103_cur."!cursor_pos"(rx103_pos) - .const 'Sub' $P110 = "32_1258208089.76063" - capture_lex $P110 - $P10 = rx103_cur."before"($P110) - unless $P10, rx103_fail + rx95_cur."!cursor_pos"(rx95_pos) + .const 'Sub' $P102 = "30_1258264421.2958" + capture_lex $P102 + $P10 = rx95_cur."before"($P102) + unless $P10, rx95_fail # rx subrule "backmod" subtype=capture negate= - rx103_cur."!cursor_pos"(rx103_pos) - $P10 = rx103_cur."backmod"() - unless $P10, rx103_fail - rx103_cur."!mark_push"(0, -1, 0, $P10) + rx95_cur."!cursor_pos"(rx95_pos) + $P10 = rx95_cur."backmod"() + unless $P10, rx95_fail + rx95_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("backmod") - rx103_pos = $P10."pos"() + rx95_pos = $P10."pos"() # rx subrule "alpha" subtype=zerowidth negate=1 - rx103_cur."!cursor_pos"(rx103_pos) - $P10 = rx103_cur."alpha"() - if $P10, rx103_fail - alt108_end: - (rx103_rep) = rx103_cur."!mark_commit"($I113) - rxquantr107_done: -.annotate "line", 41 + rx95_cur."!cursor_pos"(rx95_pos) + $P10 = rx95_cur."alpha"() + if $P10, rx95_fail + alt100_end: + (rx95_rep) = rx95_cur."!mark_commit"($I105) + rxquantr99_done: +.annotate "line", 40 # rx pass - rx103_cur."!cursor_pass"(rx103_pos, "quantified_atom") - rx103_cur."!cursor_debug"("PASS ", "quantified_atom", " at pos=", rx103_pos) - .return (rx103_cur) - rx103_fail: -.annotate "line", 3 - (rx103_rep, rx103_pos, $I10, $P10) = rx103_cur."!mark_fail"(0) - lt rx103_pos, -1, rx103_done - eq rx103_pos, -1, rx103_fail + rx95_cur."!cursor_pass"(rx95_pos, "quantified_atom") + rx95_cur."!cursor_debug"("PASS ", "quantified_atom", " at pos=", rx95_pos) + .return (rx95_cur) + rx95_fail: +.annotate "line", 3 + (rx95_rep, rx95_pos, $I10, $P10) = rx95_cur."!mark_fail"(0) + lt rx95_pos, -1, rx95_done + eq rx95_pos, -1, rx95_fail jump $I10 - rx103_done: - rx103_cur."!cursor_fail"() - rx103_cur."!cursor_debug"("FAIL ", "quantified_atom") - .return (rx103_cur) + rx95_done: + rx95_cur."!cursor_fail"() + rx95_cur."!cursor_debug"("FAIL ", "quantified_atom") + .return (rx95_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__quantified_atom" :subid("31_1258208089.76063") :method +.sub "!PREFIX__quantified_atom" :subid("29_1258264421.2958") :method .annotate "line", 3 - $P105 = self."!PREFIX__!subrule"("atom", "") - new $P106, "ResizablePMCArray" - push $P106, $P105 - .return ($P106) + $P97 = self."!PREFIX__!subrule"("atom", "") + new $P98, "ResizablePMCArray" + push $P98, $P97 + .return ($P98) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block109" :anon :subid("32_1258208089.76063") :method :outer("30_1258208089.76063") -.annotate "line", 42 - .local string rx111_tgt - .local int rx111_pos - .local int rx111_off - .local int rx111_eos - .local int rx111_rep - .local pmc rx111_cur - (rx111_cur, rx111_pos, rx111_tgt, $I10) = self."!cursor_start"() - rx111_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx111_cur +.sub "_block101" :anon :subid("30_1258264421.2958") :method :outer("28_1258264421.2958") +.annotate "line", 41 + .local string rx103_tgt + .local int rx103_pos + .local int rx103_off + .local int rx103_eos + .local int rx103_rep + .local pmc rx103_cur + (rx103_cur, rx103_pos, rx103_tgt, $I10) = self."!cursor_start"() + rx103_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx103_cur .local pmc match .lex "$/", match - length rx111_eos, rx111_tgt - set rx111_off, 0 - lt $I10, 2, rx111_start - sub rx111_off, $I10, 1 - substr rx111_tgt, rx111_tgt, rx111_off - rx111_start: - ge rx111_pos, 0, rxscan112_done - rxscan112_loop: - ($P10) = rx111_cur."from"() + length rx103_eos, rx103_tgt + set rx103_off, 0 + lt $I10, 2, rx103_start + sub rx103_off, $I10, 1 + substr rx103_tgt, rx103_tgt, rx103_off + rx103_start: + ge rx103_pos, 0, rxscan104_done + rxscan104_loop: + ($P10) = rx103_cur."from"() inc $P10 - set rx111_pos, $P10 - ge rx111_pos, rx111_eos, rxscan112_done - set_addr $I10, rxscan112_loop - rx111_cur."!mark_push"(0, rx111_pos, $I10) - rxscan112_done: + set rx103_pos, $P10 + ge rx103_pos, rx103_eos, rxscan104_done + set_addr $I10, rxscan104_loop + rx103_cur."!mark_push"(0, rx103_pos, $I10) + rxscan104_done: # rx literal ":" - add $I11, rx111_pos, 1 - gt $I11, rx111_eos, rx111_fail - sub $I11, rx111_pos, rx111_off - substr $S10, rx111_tgt, $I11, 1 - ne $S10, ":", rx111_fail - add rx111_pos, 1 + add $I11, rx103_pos, 1 + gt $I11, rx103_eos, rx103_fail + sub $I11, rx103_pos, rx103_off + substr $S10, rx103_tgt, $I11, 1 + ne $S10, ":", rx103_fail + add rx103_pos, 1 # rx pass - rx111_cur."!cursor_pass"(rx111_pos, "") - rx111_cur."!cursor_debug"("PASS ", "", " at pos=", rx111_pos) - .return (rx111_cur) - rx111_fail: - (rx111_rep, rx111_pos, $I10, $P10) = rx111_cur."!mark_fail"(0) - lt rx111_pos, -1, rx111_done - eq rx111_pos, -1, rx111_fail + rx103_cur."!cursor_pass"(rx103_pos, "") + rx103_cur."!cursor_debug"("PASS ", "", " at pos=", rx103_pos) + .return (rx103_cur) + rx103_fail: + (rx103_rep, rx103_pos, $I10, $P10) = rx103_cur."!mark_fail"(0) + lt rx103_pos, -1, rx103_done + eq rx103_pos, -1, rx103_fail jump $I10 - rx111_done: - rx111_cur."!cursor_fail"() - rx111_cur."!cursor_debug"("FAIL ", "") - .return (rx111_cur) + rx103_done: + rx103_cur."!cursor_fail"() + rx103_cur."!cursor_debug"("FAIL ", "") + .return (rx103_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "atom" :subid("33_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "atom" :subid("31_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P124 = "35_1258208089.76063" - capture_lex $P124 - .local string rx115_tgt - .local int rx115_pos - .local int rx115_off - .local int rx115_eos - .local int rx115_rep - .local pmc rx115_cur - (rx115_cur, rx115_pos, rx115_tgt, $I10) = self."!cursor_start"() - rx115_cur."!cursor_debug"("START ", "atom") - .lex unicode:"$\x{a2}", rx115_cur + .const 'Sub' $P116 = "33_1258264421.2958" + capture_lex $P116 + .local string rx107_tgt + .local int rx107_pos + .local int rx107_off + .local int rx107_eos + .local int rx107_rep + .local pmc rx107_cur + (rx107_cur, rx107_pos, rx107_tgt, $I10) = self."!cursor_start"() + rx107_cur."!cursor_debug"("START ", "atom") + .lex unicode:"$\x{a2}", rx107_cur .local pmc match .lex "$/", match - length rx115_eos, rx115_tgt - set rx115_off, 0 - lt $I10, 2, rx115_start - sub rx115_off, $I10, 1 - substr rx115_tgt, rx115_tgt, rx115_off - rx115_start: - alt119_0: + length rx107_eos, rx107_tgt + set rx107_off, 0 + lt $I10, 2, rx107_start + sub rx107_off, $I10, 1 + substr rx107_tgt, rx107_tgt, rx107_off + rx107_start: + alt111_0: +.annotate "line", 46 + set_addr $I10, alt111_1 + rx107_cur."!mark_push"(0, rx107_pos, $I10) .annotate "line", 47 - set_addr $I10, alt119_1 - rx115_cur."!mark_push"(0, rx115_pos, $I10) -.annotate "line", 48 # rx charclass w - ge rx115_pos, rx115_eos, rx115_fail - sub $I10, rx115_pos, rx115_off - is_cclass $I11, 8192, rx115_tgt, $I10 - unless $I11, rx115_fail - inc rx115_pos - # rx rxquantr120 ** 0..1 - set_addr $I127, rxquantr120_done - rx115_cur."!mark_push"(0, rx115_pos, $I127) - rxquantr120_loop: - # rx rxquantg121 ** 1..* - set_addr $I122, rxquantg121_done - rxquantg121_loop: + ge rx107_pos, rx107_eos, rx107_fail + sub $I10, rx107_pos, rx107_off + is_cclass $I11, 8192, rx107_tgt, $I10 + unless $I11, rx107_fail + inc rx107_pos + # rx rxquantr112 ** 0..1 + set_addr $I119, rxquantr112_done + rx107_cur."!mark_push"(0, rx107_pos, $I119) + rxquantr112_loop: + # rx rxquantg113 ** 1..* + set_addr $I114, rxquantg113_done + rxquantg113_loop: # rx charclass w - ge rx115_pos, rx115_eos, rx115_fail - sub $I10, rx115_pos, rx115_off - is_cclass $I11, 8192, rx115_tgt, $I10 - unless $I11, rx115_fail - inc rx115_pos - rx115_cur."!mark_push"(rx115_rep, rx115_pos, $I122) - goto rxquantg121_loop - rxquantg121_done: + ge rx107_pos, rx107_eos, rx107_fail + sub $I10, rx107_pos, rx107_off + is_cclass $I11, 8192, rx107_tgt, $I10 + unless $I11, rx107_fail + inc rx107_pos + rx107_cur."!mark_push"(rx107_rep, rx107_pos, $I114) + goto rxquantg113_loop + rxquantg113_done: # rx subrule "before" subtype=zerowidth negate= - rx115_cur."!cursor_pos"(rx115_pos) - .const 'Sub' $P124 = "35_1258208089.76063" - capture_lex $P124 - $P10 = rx115_cur."before"($P124) - unless $P10, rx115_fail - (rx115_rep) = rx115_cur."!mark_commit"($I127) - rxquantr120_done: - goto alt119_end - alt119_1: -.annotate "line", 49 + rx107_cur."!cursor_pos"(rx107_pos) + .const 'Sub' $P116 = "33_1258264421.2958" + capture_lex $P116 + $P10 = rx107_cur."before"($P116) + unless $P10, rx107_fail + (rx107_rep) = rx107_cur."!mark_commit"($I119) + rxquantr112_done: + goto alt111_end + alt111_1: +.annotate "line", 48 # rx subrule "metachar" subtype=capture negate= - rx115_cur."!cursor_pos"(rx115_pos) - $P10 = rx115_cur."metachar"() - unless $P10, rx115_fail - rx115_cur."!mark_push"(0, -1, 0, $P10) + rx107_cur."!cursor_pos"(rx107_pos) + $P10 = rx107_cur."metachar"() + unless $P10, rx107_fail + rx107_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("metachar") - rx115_pos = $P10."pos"() - alt119_end: -.annotate "line", 45 + rx107_pos = $P10."pos"() + alt111_end: +.annotate "line", 44 # rx pass - rx115_cur."!cursor_pass"(rx115_pos, "atom") - rx115_cur."!cursor_debug"("PASS ", "atom", " at pos=", rx115_pos) - .return (rx115_cur) - rx115_fail: -.annotate "line", 3 - (rx115_rep, rx115_pos, $I10, $P10) = rx115_cur."!mark_fail"(0) - lt rx115_pos, -1, rx115_done - eq rx115_pos, -1, rx115_fail + rx107_cur."!cursor_pass"(rx107_pos, "atom") + rx107_cur."!cursor_debug"("PASS ", "atom", " at pos=", rx107_pos) + .return (rx107_cur) + rx107_fail: +.annotate "line", 3 + (rx107_rep, rx107_pos, $I10, $P10) = rx107_cur."!mark_fail"(0) + lt rx107_pos, -1, rx107_done + eq rx107_pos, -1, rx107_fail jump $I10 - rx115_done: - rx115_cur."!cursor_fail"() - rx115_cur."!cursor_debug"("FAIL ", "atom") - .return (rx115_cur) + rx107_done: + rx107_cur."!cursor_fail"() + rx107_cur."!cursor_debug"("FAIL ", "atom") + .return (rx107_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__atom" :subid("34_1258208089.76063") :method +.sub "!PREFIX__atom" :subid("32_1258264421.2958") :method .annotate "line", 3 - $P117 = self."!PREFIX__!subrule"("metachar", "") - new $P118, "ResizablePMCArray" - push $P118, $P117 - push $P118, "" - .return ($P118) + $P109 = self."!PREFIX__!subrule"("metachar", "") + new $P110, "ResizablePMCArray" + push $P110, $P109 + push $P110, "" + .return ($P110) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block123" :anon :subid("35_1258208089.76063") :method :outer("33_1258208089.76063") -.annotate "line", 48 - .local string rx125_tgt - .local int rx125_pos - .local int rx125_off - .local int rx125_eos - .local int rx125_rep - .local pmc rx125_cur - (rx125_cur, rx125_pos, rx125_tgt, $I10) = self."!cursor_start"() - rx125_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx125_cur +.sub "_block115" :anon :subid("33_1258264421.2958") :method :outer("31_1258264421.2958") +.annotate "line", 47 + .local string rx117_tgt + .local int rx117_pos + .local int rx117_off + .local int rx117_eos + .local int rx117_rep + .local pmc rx117_cur + (rx117_cur, rx117_pos, rx117_tgt, $I10) = self."!cursor_start"() + rx117_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx117_cur .local pmc match .lex "$/", match - length rx125_eos, rx125_tgt - set rx125_off, 0 - lt $I10, 2, rx125_start - sub rx125_off, $I10, 1 - substr rx125_tgt, rx125_tgt, rx125_off - rx125_start: - ge rx125_pos, 0, rxscan126_done - rxscan126_loop: - ($P10) = rx125_cur."from"() + length rx117_eos, rx117_tgt + set rx117_off, 0 + lt $I10, 2, rx117_start + sub rx117_off, $I10, 1 + substr rx117_tgt, rx117_tgt, rx117_off + rx117_start: + ge rx117_pos, 0, rxscan118_done + rxscan118_loop: + ($P10) = rx117_cur."from"() inc $P10 - set rx125_pos, $P10 - ge rx125_pos, rx125_eos, rxscan126_done - set_addr $I10, rxscan126_loop - rx125_cur."!mark_push"(0, rx125_pos, $I10) - rxscan126_done: + set rx117_pos, $P10 + ge rx117_pos, rx117_eos, rxscan118_done + set_addr $I10, rxscan118_loop + rx117_cur."!mark_push"(0, rx117_pos, $I10) + rxscan118_done: # rx charclass w - ge rx125_pos, rx125_eos, rx125_fail - sub $I10, rx125_pos, rx125_off - is_cclass $I11, 8192, rx125_tgt, $I10 - unless $I11, rx125_fail - inc rx125_pos + ge rx117_pos, rx117_eos, rx117_fail + sub $I10, rx117_pos, rx117_off + is_cclass $I11, 8192, rx117_tgt, $I10 + unless $I11, rx117_fail + inc rx117_pos # rx pass - rx125_cur."!cursor_pass"(rx125_pos, "") - rx125_cur."!cursor_debug"("PASS ", "", " at pos=", rx125_pos) - .return (rx125_cur) - rx125_fail: - (rx125_rep, rx125_pos, $I10, $P10) = rx125_cur."!mark_fail"(0) - lt rx125_pos, -1, rx125_done - eq rx125_pos, -1, rx125_fail + rx117_cur."!cursor_pass"(rx117_pos, "") + rx117_cur."!cursor_debug"("PASS ", "", " at pos=", rx117_pos) + .return (rx117_cur) + rx117_fail: + (rx117_rep, rx117_pos, $I10, $P10) = rx117_cur."!mark_fail"(0) + lt rx117_pos, -1, rx117_done + eq rx117_pos, -1, rx117_fail jump $I10 - rx125_done: - rx125_cur."!cursor_fail"() - rx125_cur."!cursor_debug"("FAIL ", "") - .return (rx125_cur) + rx117_done: + rx117_cur."!cursor_fail"() + rx117_cur."!cursor_debug"("FAIL ", "") + .return (rx117_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "quantifier" :subid("36_1258208089.76063") :method -.annotate "line", 53 - $P129 = self."!protoregex"("quantifier") - .return ($P129) +.sub "quantifier" :subid("34_1258264421.2958") :method +.annotate "line", 52 + $P121 = self."!protoregex"("quantifier") + .return ($P121) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__quantifier" :subid("37_1258208089.76063") :method -.annotate "line", 53 - $P131 = self."!PREFIX__!protoregex"("quantifier") - .return ($P131) +.sub "!PREFIX__quantifier" :subid("35_1258264421.2958") :method +.annotate "line", 52 + $P123 = self."!PREFIX__!protoregex"("quantifier") + .return ($P123) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "quantifier:sym<*>" :subid("38_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "quantifier:sym<*>" :subid("36_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx133_tgt - .local int rx133_pos - .local int rx133_off - .local int rx133_eos - .local int rx133_rep - .local pmc rx133_cur - (rx133_cur, rx133_pos, rx133_tgt, $I10) = self."!cursor_start"() - rx133_cur."!cursor_debug"("START ", "quantifier:sym<*>") - .lex unicode:"$\x{a2}", rx133_cur + .local string rx125_tgt + .local int rx125_pos + .local int rx125_off + .local int rx125_eos + .local int rx125_rep + .local pmc rx125_cur + (rx125_cur, rx125_pos, rx125_tgt, $I10) = self."!cursor_start"() + rx125_cur."!cursor_debug"("START ", "quantifier:sym<*>") + .lex unicode:"$\x{a2}", rx125_cur .local pmc match .lex "$/", match - length rx133_eos, rx133_tgt - set rx133_off, 0 - lt $I10, 2, rx133_start - sub rx133_off, $I10, 1 - substr rx133_tgt, rx133_tgt, rx133_off - rx133_start: -.annotate "line", 54 + length rx125_eos, rx125_tgt + set rx125_off, 0 + lt $I10, 2, rx125_start + sub rx125_off, $I10, 1 + substr rx125_tgt, rx125_tgt, rx125_off + rx125_start: +.annotate "line", 53 # rx subcapture "sym" - set_addr $I10, rxcap_137_fail - rx133_cur."!mark_push"(0, rx133_pos, $I10) + set_addr $I10, rxcap_129_fail + rx125_cur."!mark_push"(0, rx125_pos, $I10) # rx literal "*" - add $I11, rx133_pos, 1 - gt $I11, rx133_eos, rx133_fail - sub $I11, rx133_pos, rx133_off - substr $S10, rx133_tgt, $I11, 1 - ne $S10, "*", rx133_fail - add rx133_pos, 1 - set_addr $I10, rxcap_137_fail - ($I12, $I11) = rx133_cur."!mark_peek"($I10) - rx133_cur."!cursor_pos"($I11) - ($P10) = rx133_cur."!cursor_start"() - $P10."!cursor_pass"(rx133_pos, "") - rx133_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx125_pos, 1 + gt $I11, rx125_eos, rx125_fail + sub $I11, rx125_pos, rx125_off + substr $S10, rx125_tgt, $I11, 1 + ne $S10, "*", rx125_fail + add rx125_pos, 1 + set_addr $I10, rxcap_129_fail + ($I12, $I11) = rx125_cur."!mark_peek"($I10) + rx125_cur."!cursor_pos"($I11) + ($P10) = rx125_cur."!cursor_start"() + $P10."!cursor_pass"(rx125_pos, "") + rx125_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_137_done - rxcap_137_fail: - goto rx133_fail - rxcap_137_done: + goto rxcap_129_done + rxcap_129_fail: + goto rx125_fail + rxcap_129_done: # rx subrule "backmod" subtype=capture negate= - rx133_cur."!cursor_pos"(rx133_pos) - $P10 = rx133_cur."backmod"() - unless $P10, rx133_fail - rx133_cur."!mark_push"(0, -1, 0, $P10) + rx125_cur."!cursor_pos"(rx125_pos) + $P10 = rx125_cur."backmod"() + unless $P10, rx125_fail + rx125_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("backmod") - rx133_pos = $P10."pos"() + rx125_pos = $P10."pos"() # rx pass - rx133_cur."!cursor_pass"(rx133_pos, "quantifier:sym<*>") - rx133_cur."!cursor_debug"("PASS ", "quantifier:sym<*>", " at pos=", rx133_pos) - .return (rx133_cur) - rx133_fail: -.annotate "line", 3 - (rx133_rep, rx133_pos, $I10, $P10) = rx133_cur."!mark_fail"(0) - lt rx133_pos, -1, rx133_done - eq rx133_pos, -1, rx133_fail + rx125_cur."!cursor_pass"(rx125_pos, "quantifier:sym<*>") + rx125_cur."!cursor_debug"("PASS ", "quantifier:sym<*>", " at pos=", rx125_pos) + .return (rx125_cur) + rx125_fail: +.annotate "line", 3 + (rx125_rep, rx125_pos, $I10, $P10) = rx125_cur."!mark_fail"(0) + lt rx125_pos, -1, rx125_done + eq rx125_pos, -1, rx125_fail jump $I10 - rx133_done: - rx133_cur."!cursor_fail"() - rx133_cur."!cursor_debug"("FAIL ", "quantifier:sym<*>") - .return (rx133_cur) + rx125_done: + rx125_cur."!cursor_fail"() + rx125_cur."!cursor_debug"("FAIL ", "quantifier:sym<*>") + .return (rx125_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__quantifier:sym<*>" :subid("39_1258208089.76063") :method +.sub "!PREFIX__quantifier:sym<*>" :subid("37_1258264421.2958") :method .annotate "line", 3 - $P135 = self."!PREFIX__!subrule"("backmod", "*") - new $P136, "ResizablePMCArray" - push $P136, $P135 - .return ($P136) + $P127 = self."!PREFIX__!subrule"("backmod", "*") + new $P128, "ResizablePMCArray" + push $P128, $P127 + .return ($P128) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "quantifier:sym<+>" :subid("40_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "quantifier:sym<+>" :subid("38_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx139_tgt - .local int rx139_pos - .local int rx139_off - .local int rx139_eos - .local int rx139_rep - .local pmc rx139_cur - (rx139_cur, rx139_pos, rx139_tgt, $I10) = self."!cursor_start"() - rx139_cur."!cursor_debug"("START ", "quantifier:sym<+>") - .lex unicode:"$\x{a2}", rx139_cur + .local string rx131_tgt + .local int rx131_pos + .local int rx131_off + .local int rx131_eos + .local int rx131_rep + .local pmc rx131_cur + (rx131_cur, rx131_pos, rx131_tgt, $I10) = self."!cursor_start"() + rx131_cur."!cursor_debug"("START ", "quantifier:sym<+>") + .lex unicode:"$\x{a2}", rx131_cur .local pmc match .lex "$/", match - length rx139_eos, rx139_tgt - set rx139_off, 0 - lt $I10, 2, rx139_start - sub rx139_off, $I10, 1 - substr rx139_tgt, rx139_tgt, rx139_off - rx139_start: -.annotate "line", 55 + length rx131_eos, rx131_tgt + set rx131_off, 0 + lt $I10, 2, rx131_start + sub rx131_off, $I10, 1 + substr rx131_tgt, rx131_tgt, rx131_off + rx131_start: +.annotate "line", 54 # rx subcapture "sym" - set_addr $I10, rxcap_143_fail - rx139_cur."!mark_push"(0, rx139_pos, $I10) + set_addr $I10, rxcap_135_fail + rx131_cur."!mark_push"(0, rx131_pos, $I10) # rx literal "+" - add $I11, rx139_pos, 1 - gt $I11, rx139_eos, rx139_fail - sub $I11, rx139_pos, rx139_off - substr $S10, rx139_tgt, $I11, 1 - ne $S10, "+", rx139_fail - add rx139_pos, 1 - set_addr $I10, rxcap_143_fail - ($I12, $I11) = rx139_cur."!mark_peek"($I10) - rx139_cur."!cursor_pos"($I11) - ($P10) = rx139_cur."!cursor_start"() - $P10."!cursor_pass"(rx139_pos, "") - rx139_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx131_pos, 1 + gt $I11, rx131_eos, rx131_fail + sub $I11, rx131_pos, rx131_off + substr $S10, rx131_tgt, $I11, 1 + ne $S10, "+", rx131_fail + add rx131_pos, 1 + set_addr $I10, rxcap_135_fail + ($I12, $I11) = rx131_cur."!mark_peek"($I10) + rx131_cur."!cursor_pos"($I11) + ($P10) = rx131_cur."!cursor_start"() + $P10."!cursor_pass"(rx131_pos, "") + rx131_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_143_done - rxcap_143_fail: - goto rx139_fail - rxcap_143_done: + goto rxcap_135_done + rxcap_135_fail: + goto rx131_fail + rxcap_135_done: # rx subrule "backmod" subtype=capture negate= - rx139_cur."!cursor_pos"(rx139_pos) - $P10 = rx139_cur."backmod"() - unless $P10, rx139_fail - rx139_cur."!mark_push"(0, -1, 0, $P10) + rx131_cur."!cursor_pos"(rx131_pos) + $P10 = rx131_cur."backmod"() + unless $P10, rx131_fail + rx131_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("backmod") - rx139_pos = $P10."pos"() + rx131_pos = $P10."pos"() # rx pass - rx139_cur."!cursor_pass"(rx139_pos, "quantifier:sym<+>") - rx139_cur."!cursor_debug"("PASS ", "quantifier:sym<+>", " at pos=", rx139_pos) - .return (rx139_cur) - rx139_fail: -.annotate "line", 3 - (rx139_rep, rx139_pos, $I10, $P10) = rx139_cur."!mark_fail"(0) - lt rx139_pos, -1, rx139_done - eq rx139_pos, -1, rx139_fail + rx131_cur."!cursor_pass"(rx131_pos, "quantifier:sym<+>") + rx131_cur."!cursor_debug"("PASS ", "quantifier:sym<+>", " at pos=", rx131_pos) + .return (rx131_cur) + rx131_fail: +.annotate "line", 3 + (rx131_rep, rx131_pos, $I10, $P10) = rx131_cur."!mark_fail"(0) + lt rx131_pos, -1, rx131_done + eq rx131_pos, -1, rx131_fail jump $I10 - rx139_done: - rx139_cur."!cursor_fail"() - rx139_cur."!cursor_debug"("FAIL ", "quantifier:sym<+>") - .return (rx139_cur) + rx131_done: + rx131_cur."!cursor_fail"() + rx131_cur."!cursor_debug"("FAIL ", "quantifier:sym<+>") + .return (rx131_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__quantifier:sym<+>" :subid("41_1258208089.76063") :method +.sub "!PREFIX__quantifier:sym<+>" :subid("39_1258264421.2958") :method .annotate "line", 3 - $P141 = self."!PREFIX__!subrule"("backmod", "+") - new $P142, "ResizablePMCArray" - push $P142, $P141 - .return ($P142) + $P133 = self."!PREFIX__!subrule"("backmod", "+") + new $P134, "ResizablePMCArray" + push $P134, $P133 + .return ($P134) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "quantifier:sym" :subid("42_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "quantifier:sym" :subid("40_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx145_tgt - .local int rx145_pos - .local int rx145_off - .local int rx145_eos - .local int rx145_rep - .local pmc rx145_cur - (rx145_cur, rx145_pos, rx145_tgt, $I10) = self."!cursor_start"() - rx145_cur."!cursor_debug"("START ", "quantifier:sym") - .lex unicode:"$\x{a2}", rx145_cur + .local string rx137_tgt + .local int rx137_pos + .local int rx137_off + .local int rx137_eos + .local int rx137_rep + .local pmc rx137_cur + (rx137_cur, rx137_pos, rx137_tgt, $I10) = self."!cursor_start"() + rx137_cur."!cursor_debug"("START ", "quantifier:sym") + .lex unicode:"$\x{a2}", rx137_cur .local pmc match .lex "$/", match - length rx145_eos, rx145_tgt - set rx145_off, 0 - lt $I10, 2, rx145_start - sub rx145_off, $I10, 1 - substr rx145_tgt, rx145_tgt, rx145_off - rx145_start: -.annotate "line", 56 + length rx137_eos, rx137_tgt + set rx137_off, 0 + lt $I10, 2, rx137_start + sub rx137_off, $I10, 1 + substr rx137_tgt, rx137_tgt, rx137_off + rx137_start: +.annotate "line", 55 # rx subcapture "sym" - set_addr $I10, rxcap_149_fail - rx145_cur."!mark_push"(0, rx145_pos, $I10) + set_addr $I10, rxcap_141_fail + rx137_cur."!mark_push"(0, rx137_pos, $I10) # rx literal "?" - add $I11, rx145_pos, 1 - gt $I11, rx145_eos, rx145_fail - sub $I11, rx145_pos, rx145_off - substr $S10, rx145_tgt, $I11, 1 - ne $S10, "?", rx145_fail - add rx145_pos, 1 - set_addr $I10, rxcap_149_fail - ($I12, $I11) = rx145_cur."!mark_peek"($I10) - rx145_cur."!cursor_pos"($I11) - ($P10) = rx145_cur."!cursor_start"() - $P10."!cursor_pass"(rx145_pos, "") - rx145_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx137_pos, 1 + gt $I11, rx137_eos, rx137_fail + sub $I11, rx137_pos, rx137_off + substr $S10, rx137_tgt, $I11, 1 + ne $S10, "?", rx137_fail + add rx137_pos, 1 + set_addr $I10, rxcap_141_fail + ($I12, $I11) = rx137_cur."!mark_peek"($I10) + rx137_cur."!cursor_pos"($I11) + ($P10) = rx137_cur."!cursor_start"() + $P10."!cursor_pass"(rx137_pos, "") + rx137_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_149_done - rxcap_149_fail: - goto rx145_fail - rxcap_149_done: + goto rxcap_141_done + rxcap_141_fail: + goto rx137_fail + rxcap_141_done: # rx subrule "backmod" subtype=capture negate= - rx145_cur."!cursor_pos"(rx145_pos) - $P10 = rx145_cur."backmod"() - unless $P10, rx145_fail - rx145_cur."!mark_push"(0, -1, 0, $P10) + rx137_cur."!cursor_pos"(rx137_pos) + $P10 = rx137_cur."backmod"() + unless $P10, rx137_fail + rx137_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("backmod") - rx145_pos = $P10."pos"() + rx137_pos = $P10."pos"() # rx pass - rx145_cur."!cursor_pass"(rx145_pos, "quantifier:sym") - rx145_cur."!cursor_debug"("PASS ", "quantifier:sym", " at pos=", rx145_pos) - .return (rx145_cur) - rx145_fail: -.annotate "line", 3 - (rx145_rep, rx145_pos, $I10, $P10) = rx145_cur."!mark_fail"(0) - lt rx145_pos, -1, rx145_done - eq rx145_pos, -1, rx145_fail + rx137_cur."!cursor_pass"(rx137_pos, "quantifier:sym") + rx137_cur."!cursor_debug"("PASS ", "quantifier:sym", " at pos=", rx137_pos) + .return (rx137_cur) + rx137_fail: +.annotate "line", 3 + (rx137_rep, rx137_pos, $I10, $P10) = rx137_cur."!mark_fail"(0) + lt rx137_pos, -1, rx137_done + eq rx137_pos, -1, rx137_fail jump $I10 - rx145_done: - rx145_cur."!cursor_fail"() - rx145_cur."!cursor_debug"("FAIL ", "quantifier:sym") - .return (rx145_cur) + rx137_done: + rx137_cur."!cursor_fail"() + rx137_cur."!cursor_debug"("FAIL ", "quantifier:sym") + .return (rx137_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__quantifier:sym" :subid("43_1258208089.76063") :method +.sub "!PREFIX__quantifier:sym" :subid("41_1258264421.2958") :method .annotate "line", 3 - $P147 = self."!PREFIX__!subrule"("backmod", "?") - new $P148, "ResizablePMCArray" - push $P148, $P147 - .return ($P148) + $P139 = self."!PREFIX__!subrule"("backmod", "?") + new $P140, "ResizablePMCArray" + push $P140, $P139 + .return ($P140) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "quantifier:sym<**>" :subid("44_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "quantifier:sym<**>" :subid("42_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx151_tgt - .local int rx151_pos - .local int rx151_off - .local int rx151_eos - .local int rx151_rep - .local pmc rx151_cur - (rx151_cur, rx151_pos, rx151_tgt, $I10) = self."!cursor_start"() - rx151_cur."!cursor_debug"("START ", "quantifier:sym<**>") - rx151_cur."!cursor_caparray"("max") - .lex unicode:"$\x{a2}", rx151_cur + .local string rx143_tgt + .local int rx143_pos + .local int rx143_off + .local int rx143_eos + .local int rx143_rep + .local pmc rx143_cur + (rx143_cur, rx143_pos, rx143_tgt, $I10) = self."!cursor_start"() + rx143_cur."!cursor_debug"("START ", "quantifier:sym<**>") + rx143_cur."!cursor_caparray"("max") + .lex unicode:"$\x{a2}", rx143_cur .local pmc match .lex "$/", match - length rx151_eos, rx151_tgt - set rx151_off, 0 - lt $I10, 2, rx151_start - sub rx151_off, $I10, 1 - substr rx151_tgt, rx151_tgt, rx151_off - rx151_start: -.annotate "line", 58 + length rx143_eos, rx143_tgt + set rx143_off, 0 + lt $I10, 2, rx143_start + sub rx143_off, $I10, 1 + substr rx143_tgt, rx143_tgt, rx143_off + rx143_start: +.annotate "line", 57 # rx subcapture "sym" - set_addr $I10, rxcap_154_fail - rx151_cur."!mark_push"(0, rx151_pos, $I10) + set_addr $I10, rxcap_146_fail + rx143_cur."!mark_push"(0, rx143_pos, $I10) # rx literal "**" - add $I11, rx151_pos, 2 - gt $I11, rx151_eos, rx151_fail - sub $I11, rx151_pos, rx151_off - substr $S10, rx151_tgt, $I11, 2 - ne $S10, "**", rx151_fail - add rx151_pos, 2 - set_addr $I10, rxcap_154_fail - ($I12, $I11) = rx151_cur."!mark_peek"($I10) - rx151_cur."!cursor_pos"($I11) - ($P10) = rx151_cur."!cursor_start"() - $P10."!cursor_pass"(rx151_pos, "") - rx151_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx143_pos, 2 + gt $I11, rx143_eos, rx143_fail + sub $I11, rx143_pos, rx143_off + substr $S10, rx143_tgt, $I11, 2 + ne $S10, "**", rx143_fail + add rx143_pos, 2 + set_addr $I10, rxcap_146_fail + ($I12, $I11) = rx143_cur."!mark_peek"($I10) + rx143_cur."!cursor_pos"($I11) + ($P10) = rx143_cur."!cursor_start"() + $P10."!cursor_pass"(rx143_pos, "") + rx143_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_154_done - rxcap_154_fail: - goto rx151_fail - rxcap_154_done: + goto rxcap_146_done + rxcap_146_fail: + goto rx143_fail + rxcap_146_done: # rx charclass_q s r 0..-1 - sub $I10, rx151_pos, rx151_off - find_not_cclass $I11, 32, rx151_tgt, $I10, rx151_eos - add rx151_pos, rx151_off, $I11 + sub $I10, rx143_pos, rx143_off + find_not_cclass $I11, 32, rx143_tgt, $I10, rx143_eos + add rx143_pos, rx143_off, $I11 # rx subrule "backmod" subtype=capture negate= - rx151_cur."!cursor_pos"(rx151_pos) - $P10 = rx151_cur."backmod"() - unless $P10, rx151_fail - rx151_cur."!mark_push"(0, -1, 0, $P10) + rx143_cur."!cursor_pos"(rx143_pos) + $P10 = rx143_cur."backmod"() + unless $P10, rx143_fail + rx143_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("backmod") - rx151_pos = $P10."pos"() + rx143_pos = $P10."pos"() # rx charclass_q s r 0..-1 - sub $I10, rx151_pos, rx151_off - find_not_cclass $I11, 32, rx151_tgt, $I10, rx151_eos - add rx151_pos, rx151_off, $I11 - alt155_0: + sub $I10, rx143_pos, rx143_off + find_not_cclass $I11, 32, rx143_tgt, $I10, rx143_eos + add rx143_pos, rx143_off, $I11 + alt147_0: +.annotate "line", 58 + set_addr $I10, alt147_1 + rx143_cur."!mark_push"(0, rx143_pos, $I10) .annotate "line", 59 - set_addr $I10, alt155_1 - rx151_cur."!mark_push"(0, rx151_pos, $I10) -.annotate "line", 60 # rx subcapture "min" - set_addr $I10, rxcap_156_fail - rx151_cur."!mark_push"(0, rx151_pos, $I10) + set_addr $I10, rxcap_148_fail + rx143_cur."!mark_push"(0, rx143_pos, $I10) # rx charclass_q d r 1..-1 - sub $I10, rx151_pos, rx151_off - find_not_cclass $I11, 8, rx151_tgt, $I10, rx151_eos + sub $I10, rx143_pos, rx143_off + find_not_cclass $I11, 8, rx143_tgt, $I10, rx143_eos add $I12, $I10, 1 - lt $I11, $I12, rx151_fail - add rx151_pos, rx151_off, $I11 - set_addr $I10, rxcap_156_fail - ($I12, $I11) = rx151_cur."!mark_peek"($I10) - rx151_cur."!cursor_pos"($I11) - ($P10) = rx151_cur."!cursor_start"() - $P10."!cursor_pass"(rx151_pos, "") - rx151_cur."!mark_push"(0, -1, 0, $P10) + lt $I11, $I12, rx143_fail + add rx143_pos, rx143_off, $I11 + set_addr $I10, rxcap_148_fail + ($I12, $I11) = rx143_cur."!mark_peek"($I10) + rx143_cur."!cursor_pos"($I11) + ($P10) = rx143_cur."!cursor_start"() + $P10."!cursor_pass"(rx143_pos, "") + rx143_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("min") - goto rxcap_156_done - rxcap_156_fail: - goto rx151_fail - rxcap_156_done: - # rx rxquantr157 ** 0..1 - set_addr $I160, rxquantr157_done - rx151_cur."!mark_push"(0, rx151_pos, $I160) - rxquantr157_loop: + goto rxcap_148_done + rxcap_148_fail: + goto rx143_fail + rxcap_148_done: + # rx rxquantr149 ** 0..1 + set_addr $I152, rxquantr149_done + rx143_cur."!mark_push"(0, rx143_pos, $I152) + rxquantr149_loop: # rx literal ".." - add $I11, rx151_pos, 2 - gt $I11, rx151_eos, rx151_fail - sub $I11, rx151_pos, rx151_off - substr $S10, rx151_tgt, $I11, 2 - ne $S10, "..", rx151_fail - add rx151_pos, 2 + add $I11, rx143_pos, 2 + gt $I11, rx143_eos, rx143_fail + sub $I11, rx143_pos, rx143_off + substr $S10, rx143_tgt, $I11, 2 + ne $S10, "..", rx143_fail + add rx143_pos, 2 # rx subcapture "max" - set_addr $I10, rxcap_159_fail - rx151_cur."!mark_push"(0, rx151_pos, $I10) - alt158_0: - set_addr $I10, alt158_1 - rx151_cur."!mark_push"(0, rx151_pos, $I10) + set_addr $I10, rxcap_151_fail + rx143_cur."!mark_push"(0, rx143_pos, $I10) + alt150_0: + set_addr $I10, alt150_1 + rx143_cur."!mark_push"(0, rx143_pos, $I10) # rx charclass_q d r 1..-1 - sub $I10, rx151_pos, rx151_off - find_not_cclass $I11, 8, rx151_tgt, $I10, rx151_eos + sub $I10, rx143_pos, rx143_off + find_not_cclass $I11, 8, rx143_tgt, $I10, rx143_eos add $I12, $I10, 1 - lt $I11, $I12, rx151_fail - add rx151_pos, rx151_off, $I11 - goto alt158_end - alt158_1: + lt $I11, $I12, rx143_fail + add rx143_pos, rx143_off, $I11 + goto alt150_end + alt150_1: # rx literal "*" - add $I11, rx151_pos, 1 - gt $I11, rx151_eos, rx151_fail - sub $I11, rx151_pos, rx151_off - substr $S10, rx151_tgt, $I11, 1 - ne $S10, "*", rx151_fail - add rx151_pos, 1 - alt158_end: - set_addr $I10, rxcap_159_fail - ($I12, $I11) = rx151_cur."!mark_peek"($I10) - rx151_cur."!cursor_pos"($I11) - ($P10) = rx151_cur."!cursor_start"() - $P10."!cursor_pass"(rx151_pos, "") - rx151_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx143_pos, 1 + gt $I11, rx143_eos, rx143_fail + sub $I11, rx143_pos, rx143_off + substr $S10, rx143_tgt, $I11, 1 + ne $S10, "*", rx143_fail + add rx143_pos, 1 + alt150_end: + set_addr $I10, rxcap_151_fail + ($I12, $I11) = rx143_cur."!mark_peek"($I10) + rx143_cur."!cursor_pos"($I11) + ($P10) = rx143_cur."!cursor_start"() + $P10."!cursor_pass"(rx143_pos, "") + rx143_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("max") - goto rxcap_159_done - rxcap_159_fail: - goto rx151_fail - rxcap_159_done: - (rx151_rep) = rx151_cur."!mark_commit"($I160) - rxquantr157_done: - goto alt155_end - alt155_1: -.annotate "line", 61 + goto rxcap_151_done + rxcap_151_fail: + goto rx143_fail + rxcap_151_done: + (rx143_rep) = rx143_cur."!mark_commit"($I152) + rxquantr149_done: + goto alt147_end + alt147_1: +.annotate "line", 60 # rx subrule "quantified_atom" subtype=capture negate= - rx151_cur."!cursor_pos"(rx151_pos) - $P10 = rx151_cur."quantified_atom"() - unless $P10, rx151_fail - rx151_cur."!mark_push"(0, -1, 0, $P10) + rx143_cur."!cursor_pos"(rx143_pos) + $P10 = rx143_cur."quantified_atom"() + unless $P10, rx143_fail + rx143_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("quantified_atom") - rx151_pos = $P10."pos"() - alt155_end: -.annotate "line", 57 + rx143_pos = $P10."pos"() + alt147_end: +.annotate "line", 56 # rx pass - rx151_cur."!cursor_pass"(rx151_pos, "quantifier:sym<**>") - rx151_cur."!cursor_debug"("PASS ", "quantifier:sym<**>", " at pos=", rx151_pos) - .return (rx151_cur) - rx151_fail: -.annotate "line", 3 - (rx151_rep, rx151_pos, $I10, $P10) = rx151_cur."!mark_fail"(0) - lt rx151_pos, -1, rx151_done - eq rx151_pos, -1, rx151_fail + rx143_cur."!cursor_pass"(rx143_pos, "quantifier:sym<**>") + rx143_cur."!cursor_debug"("PASS ", "quantifier:sym<**>", " at pos=", rx143_pos) + .return (rx143_cur) + rx143_fail: +.annotate "line", 3 + (rx143_rep, rx143_pos, $I10, $P10) = rx143_cur."!mark_fail"(0) + lt rx143_pos, -1, rx143_done + eq rx143_pos, -1, rx143_fail jump $I10 - rx151_done: - rx151_cur."!cursor_fail"() - rx151_cur."!cursor_debug"("FAIL ", "quantifier:sym<**>") - .return (rx151_cur) + rx143_done: + rx143_cur."!cursor_fail"() + rx143_cur."!cursor_debug"("FAIL ", "quantifier:sym<**>") + .return (rx143_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__quantifier:sym<**>" :subid("45_1258208089.76063") :method +.sub "!PREFIX__quantifier:sym<**>" :subid("43_1258264421.2958") :method .annotate "line", 3 - new $P153, "ResizablePMCArray" - push $P153, "**" - .return ($P153) + new $P145, "ResizablePMCArray" + push $P145, "**" + .return ($P145) +.end + + +.namespace ["Regex";"P6Regex";"Grammar"] +.sub "backmod" :subid("44_1258264421.2958") :method :outer("11_1258264421.2958") +.annotate "line", 3 + .const 'Sub' $P161 = "46_1258264421.2958" + capture_lex $P161 + .local string rx154_tgt + .local int rx154_pos + .local int rx154_off + .local int rx154_eos + .local int rx154_rep + .local pmc rx154_cur + (rx154_cur, rx154_pos, rx154_tgt, $I10) = self."!cursor_start"() + rx154_cur."!cursor_debug"("START ", "backmod") + .lex unicode:"$\x{a2}", rx154_cur + .local pmc match + .lex "$/", match + length rx154_eos, rx154_tgt + set rx154_off, 0 + lt $I10, 2, rx154_start + sub rx154_off, $I10, 1 + substr rx154_tgt, rx154_tgt, rx154_off + rx154_start: +.annotate "line", 64 + # rx rxquantr157 ** 0..1 + set_addr $I158, rxquantr157_done + rx154_cur."!mark_push"(0, rx154_pos, $I158) + rxquantr157_loop: + # rx literal ":" + add $I11, rx154_pos, 1 + gt $I11, rx154_eos, rx154_fail + sub $I11, rx154_pos, rx154_off + substr $S10, rx154_tgt, $I11, 1 + ne $S10, ":", rx154_fail + add rx154_pos, 1 + (rx154_rep) = rx154_cur."!mark_commit"($I158) + rxquantr157_done: + alt159_0: + set_addr $I10, alt159_1 + rx154_cur."!mark_push"(0, rx154_pos, $I10) + # rx literal "?" + add $I11, rx154_pos, 1 + gt $I11, rx154_eos, rx154_fail + sub $I11, rx154_pos, rx154_off + substr $S10, rx154_tgt, $I11, 1 + ne $S10, "?", rx154_fail + add rx154_pos, 1 + goto alt159_end + alt159_1: + set_addr $I10, alt159_2 + rx154_cur."!mark_push"(0, rx154_pos, $I10) + # rx literal "!" + add $I11, rx154_pos, 1 + gt $I11, rx154_eos, rx154_fail + sub $I11, rx154_pos, rx154_off + substr $S10, rx154_tgt, $I11, 1 + ne $S10, "!", rx154_fail + add rx154_pos, 1 + goto alt159_end + alt159_2: + # rx subrule "before" subtype=zerowidth negate=1 + rx154_cur."!cursor_pos"(rx154_pos) + .const 'Sub' $P161 = "46_1258264421.2958" + capture_lex $P161 + $P10 = rx154_cur."before"($P161) + if $P10, rx154_fail + alt159_end: + # rx pass + rx154_cur."!cursor_pass"(rx154_pos, "backmod") + rx154_cur."!cursor_debug"("PASS ", "backmod", " at pos=", rx154_pos) + .return (rx154_cur) + rx154_fail: +.annotate "line", 3 + (rx154_rep, rx154_pos, $I10, $P10) = rx154_cur."!mark_fail"(0) + lt rx154_pos, -1, rx154_done + eq rx154_pos, -1, rx154_fail + jump $I10 + rx154_done: + rx154_cur."!cursor_fail"() + rx154_cur."!cursor_debug"("FAIL ", "backmod") + .return (rx154_cur) + .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backmod" :subid("46_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "!PREFIX__backmod" :subid("45_1258264421.2958") :method .annotate "line", 3 - .const 'Sub' $P169 = "48_1258208089.76063" - capture_lex $P169 + new $P156, "ResizablePMCArray" + push $P156, "" + .return ($P156) +.end + + +.namespace ["Regex";"P6Regex";"Grammar"] +.sub "_block160" :anon :subid("46_1258264421.2958") :method :outer("44_1258264421.2958") +.annotate "line", 64 .local string rx162_tgt .local int rx162_pos .local int rx162_off @@ -1739,7 +1763,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx162_rep .local pmc rx162_cur (rx162_cur, rx162_pos, rx162_tgt, $I10) = self."!cursor_start"() - rx162_cur."!cursor_debug"("START ", "backmod") + rx162_cur."!cursor_debug"("START ", "") .lex unicode:"$\x{a2}", rx162_cur .local pmc match .lex "$/", match @@ -1749,11 +1773,15 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx162_off, $I10, 1 substr rx162_tgt, rx162_tgt, rx162_off rx162_start: -.annotate "line", 65 - # rx rxquantr165 ** 0..1 - set_addr $I166, rxquantr165_done - rx162_cur."!mark_push"(0, rx162_pos, $I166) - rxquantr165_loop: + ge rx162_pos, 0, rxscan163_done + rxscan163_loop: + ($P10) = rx162_cur."from"() + inc $P10 + set rx162_pos, $P10 + ge rx162_pos, rx162_eos, rxscan163_done + set_addr $I10, rxscan163_loop + rx162_cur."!mark_push"(0, rx162_pos, $I10) + rxscan163_done: # rx literal ":" add $I11, rx162_pos, 1 gt $I11, rx162_eos, rx162_fail @@ -1761,330 +1789,357 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes substr $S10, rx162_tgt, $I11, 1 ne $S10, ":", rx162_fail add rx162_pos, 1 - (rx162_rep) = rx162_cur."!mark_commit"($I166) - rxquantr165_done: - alt167_0: - set_addr $I10, alt167_1 - rx162_cur."!mark_push"(0, rx162_pos, $I10) - # rx literal "?" - add $I11, rx162_pos, 1 - gt $I11, rx162_eos, rx162_fail - sub $I11, rx162_pos, rx162_off - substr $S10, rx162_tgt, $I11, 1 - ne $S10, "?", rx162_fail - add rx162_pos, 1 - goto alt167_end - alt167_1: - set_addr $I10, alt167_2 - rx162_cur."!mark_push"(0, rx162_pos, $I10) - # rx literal "!" - add $I11, rx162_pos, 1 - gt $I11, rx162_eos, rx162_fail - sub $I11, rx162_pos, rx162_off - substr $S10, rx162_tgt, $I11, 1 - ne $S10, "!", rx162_fail - add rx162_pos, 1 - goto alt167_end - alt167_2: - # rx subrule "before" subtype=zerowidth negate=1 - rx162_cur."!cursor_pos"(rx162_pos) - .const 'Sub' $P169 = "48_1258208089.76063" - capture_lex $P169 - $P10 = rx162_cur."before"($P169) - if $P10, rx162_fail - alt167_end: # rx pass - rx162_cur."!cursor_pass"(rx162_pos, "backmod") - rx162_cur."!cursor_debug"("PASS ", "backmod", " at pos=", rx162_pos) + rx162_cur."!cursor_pass"(rx162_pos, "") + rx162_cur."!cursor_debug"("PASS ", "", " at pos=", rx162_pos) .return (rx162_cur) rx162_fail: -.annotate "line", 3 (rx162_rep, rx162_pos, $I10, $P10) = rx162_cur."!mark_fail"(0) lt rx162_pos, -1, rx162_done eq rx162_pos, -1, rx162_fail jump $I10 rx162_done: rx162_cur."!cursor_fail"() - rx162_cur."!cursor_debug"("FAIL ", "backmod") + rx162_cur."!cursor_debug"("FAIL ", "") .return (rx162_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backmod" :subid("47_1258208089.76063") :method -.annotate "line", 3 - new $P164, "ResizablePMCArray" - push $P164, "" - .return ($P164) +.sub "metachar" :subid("47_1258264421.2958") :method +.annotate "line", 66 + $P165 = self."!protoregex"("metachar") + .return ($P165) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block168" :anon :subid("48_1258208089.76063") :method :outer("46_1258208089.76063") -.annotate "line", 65 - .local string rx170_tgt - .local int rx170_pos - .local int rx170_off - .local int rx170_eos - .local int rx170_rep - .local pmc rx170_cur - (rx170_cur, rx170_pos, rx170_tgt, $I10) = self."!cursor_start"() - rx170_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx170_cur - .local pmc match - .lex "$/", match - length rx170_eos, rx170_tgt - set rx170_off, 0 - lt $I10, 2, rx170_start - sub rx170_off, $I10, 1 - substr rx170_tgt, rx170_tgt, rx170_off - rx170_start: - ge rx170_pos, 0, rxscan171_done - rxscan171_loop: - ($P10) = rx170_cur."from"() - inc $P10 - set rx170_pos, $P10 - ge rx170_pos, rx170_eos, rxscan171_done - set_addr $I10, rxscan171_loop - rx170_cur."!mark_push"(0, rx170_pos, $I10) - rxscan171_done: - # rx literal ":" - add $I11, rx170_pos, 1 - gt $I11, rx170_eos, rx170_fail - sub $I11, rx170_pos, rx170_off - substr $S10, rx170_tgt, $I11, 1 - ne $S10, ":", rx170_fail - add rx170_pos, 1 - # rx pass - rx170_cur."!cursor_pass"(rx170_pos, "") - rx170_cur."!cursor_debug"("PASS ", "", " at pos=", rx170_pos) - .return (rx170_cur) - rx170_fail: - (rx170_rep, rx170_pos, $I10, $P10) = rx170_cur."!mark_fail"(0) - lt rx170_pos, -1, rx170_done - eq rx170_pos, -1, rx170_fail - jump $I10 - rx170_done: - rx170_cur."!cursor_fail"() - rx170_cur."!cursor_debug"("FAIL ", "") - .return (rx170_cur) - .return () +.sub "!PREFIX__metachar" :subid("48_1258264421.2958") :method +.annotate "line", 66 + $P167 = self."!PREFIX__!protoregex"("metachar") + .return ($P167) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar" :subid("49_1258208089.76063") :method +.sub "metachar:sym" :subid("49_1258264421.2958") :method :outer("11_1258264421.2958") +.annotate "line", 3 + .local string rx169_tgt + .local int rx169_pos + .local int rx169_off + .local int rx169_eos + .local int rx169_rep + .local pmc rx169_cur + (rx169_cur, rx169_pos, rx169_tgt, $I10) = self."!cursor_start"() + rx169_cur."!cursor_debug"("START ", "metachar:sym") + .lex unicode:"$\x{a2}", rx169_cur + .local pmc match + .lex "$/", match + length rx169_eos, rx169_tgt + set rx169_off, 0 + lt $I10, 2, rx169_start + sub rx169_off, $I10, 1 + substr rx169_tgt, rx169_tgt, rx169_off + rx169_start: .annotate "line", 67 - $P173 = self."!protoregex"("metachar") - .return ($P173) + # rx subrule "normspace" subtype=method negate= + rx169_cur."!cursor_pos"(rx169_pos) + $P10 = rx169_cur."normspace"() + unless $P10, rx169_fail + rx169_pos = $P10."pos"() + # rx pass + rx169_cur."!cursor_pass"(rx169_pos, "metachar:sym") + rx169_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx169_pos) + .return (rx169_cur) + rx169_fail: +.annotate "line", 3 + (rx169_rep, rx169_pos, $I10, $P10) = rx169_cur."!mark_fail"(0) + lt rx169_pos, -1, rx169_done + eq rx169_pos, -1, rx169_fail + jump $I10 + rx169_done: + rx169_cur."!cursor_fail"() + rx169_cur."!cursor_debug"("FAIL ", "metachar:sym") + .return (rx169_cur) + .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar" :subid("50_1258208089.76063") :method -.annotate "line", 67 - $P175 = self."!PREFIX__!protoregex"("metachar") - .return ($P175) +.sub "!PREFIX__metachar:sym" :subid("50_1258264421.2958") :method +.annotate "line", 3 + $P171 = self."!PREFIX__!subrule"("", "") + new $P172, "ResizablePMCArray" + push $P172, $P171 + .return ($P172) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym" :subid("51_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<[ ]>" :subid("51_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx177_tgt - .local int rx177_pos - .local int rx177_off - .local int rx177_eos - .local int rx177_rep - .local pmc rx177_cur - (rx177_cur, rx177_pos, rx177_tgt, $I10) = self."!cursor_start"() - rx177_cur."!cursor_debug"("START ", "metachar:sym") - .lex unicode:"$\x{a2}", rx177_cur + .local string rx174_tgt + .local int rx174_pos + .local int rx174_off + .local int rx174_eos + .local int rx174_rep + .local pmc rx174_cur + (rx174_cur, rx174_pos, rx174_tgt, $I10) = self."!cursor_start"() + rx174_cur."!cursor_debug"("START ", "metachar:sym<[ ]>") + .lex unicode:"$\x{a2}", rx174_cur .local pmc match .lex "$/", match - length rx177_eos, rx177_tgt - set rx177_off, 0 - lt $I10, 2, rx177_start - sub rx177_off, $I10, 1 - substr rx177_tgt, rx177_tgt, rx177_off - rx177_start: + length rx174_eos, rx174_tgt + set rx174_off, 0 + lt $I10, 2, rx174_start + sub rx174_off, $I10, 1 + substr rx174_tgt, rx174_tgt, rx174_off + rx174_start: .annotate "line", 68 - # rx subrule "normspace" subtype=method negate= - rx177_cur."!cursor_pos"(rx177_pos) - $P10 = rx177_cur."normspace"() - unless $P10, rx177_fail - rx177_pos = $P10."pos"() + # rx literal "[" + add $I11, rx174_pos, 1 + gt $I11, rx174_eos, rx174_fail + sub $I11, rx174_pos, rx174_off + substr $S10, rx174_tgt, $I11, 1 + ne $S10, "[", rx174_fail + add rx174_pos, 1 + # rx subrule "nibbler" subtype=capture negate= + rx174_cur."!cursor_pos"(rx174_pos) + $P10 = rx174_cur."nibbler"() + unless $P10, rx174_fail + rx174_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("nibbler") + rx174_pos = $P10."pos"() + # rx literal "]" + add $I11, rx174_pos, 1 + gt $I11, rx174_eos, rx174_fail + sub $I11, rx174_pos, rx174_off + substr $S10, rx174_tgt, $I11, 1 + ne $S10, "]", rx174_fail + add rx174_pos, 1 # rx pass - rx177_cur."!cursor_pass"(rx177_pos, "metachar:sym") - rx177_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx177_pos) - .return (rx177_cur) - rx177_fail: -.annotate "line", 3 - (rx177_rep, rx177_pos, $I10, $P10) = rx177_cur."!mark_fail"(0) - lt rx177_pos, -1, rx177_done - eq rx177_pos, -1, rx177_fail + rx174_cur."!cursor_pass"(rx174_pos, "metachar:sym<[ ]>") + rx174_cur."!cursor_debug"("PASS ", "metachar:sym<[ ]>", " at pos=", rx174_pos) + .return (rx174_cur) + rx174_fail: +.annotate "line", 3 + (rx174_rep, rx174_pos, $I10, $P10) = rx174_cur."!mark_fail"(0) + lt rx174_pos, -1, rx174_done + eq rx174_pos, -1, rx174_fail jump $I10 - rx177_done: - rx177_cur."!cursor_fail"() - rx177_cur."!cursor_debug"("FAIL ", "metachar:sym") - .return (rx177_cur) + rx174_done: + rx174_cur."!cursor_fail"() + rx174_cur."!cursor_debug"("FAIL ", "metachar:sym<[ ]>") + .return (rx174_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym" :subid("52_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<[ ]>" :subid("52_1258264421.2958") :method .annotate "line", 3 - $P179 = self."!PREFIX__!subrule"("", "") - new $P180, "ResizablePMCArray" - push $P180, $P179 - .return ($P180) + $P176 = self."!PREFIX__!subrule"("nibbler", "[") + new $P177, "ResizablePMCArray" + push $P177, $P176 + .return ($P177) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<[ ]>" :subid("53_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<( )>" :subid("53_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx182_tgt - .local int rx182_pos - .local int rx182_off - .local int rx182_eos - .local int rx182_rep - .local pmc rx182_cur - (rx182_cur, rx182_pos, rx182_tgt, $I10) = self."!cursor_start"() - rx182_cur."!cursor_debug"("START ", "metachar:sym<[ ]>") - .lex unicode:"$\x{a2}", rx182_cur + .local string rx179_tgt + .local int rx179_pos + .local int rx179_off + .local int rx179_eos + .local int rx179_rep + .local pmc rx179_cur + (rx179_cur, rx179_pos, rx179_tgt, $I10) = self."!cursor_start"() + rx179_cur."!cursor_debug"("START ", "metachar:sym<( )>") + .lex unicode:"$\x{a2}", rx179_cur .local pmc match .lex "$/", match - length rx182_eos, rx182_tgt - set rx182_off, 0 - lt $I10, 2, rx182_start - sub rx182_off, $I10, 1 - substr rx182_tgt, rx182_tgt, rx182_off - rx182_start: + length rx179_eos, rx179_tgt + set rx179_off, 0 + lt $I10, 2, rx179_start + sub rx179_off, $I10, 1 + substr rx179_tgt, rx179_tgt, rx179_off + rx179_start: .annotate "line", 69 - # rx literal "[" - add $I11, rx182_pos, 1 - gt $I11, rx182_eos, rx182_fail - sub $I11, rx182_pos, rx182_off - substr $S10, rx182_tgt, $I11, 1 - ne $S10, "[", rx182_fail - add rx182_pos, 1 + # rx literal "(" + add $I11, rx179_pos, 1 + gt $I11, rx179_eos, rx179_fail + sub $I11, rx179_pos, rx179_off + substr $S10, rx179_tgt, $I11, 1 + ne $S10, "(", rx179_fail + add rx179_pos, 1 # rx subrule "nibbler" subtype=capture negate= - rx182_cur."!cursor_pos"(rx182_pos) - $P10 = rx182_cur."nibbler"() - unless $P10, rx182_fail - rx182_cur."!mark_push"(0, -1, 0, $P10) + rx179_cur."!cursor_pos"(rx179_pos) + $P10 = rx179_cur."nibbler"() + unless $P10, rx179_fail + rx179_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("nibbler") - rx182_pos = $P10."pos"() - # rx literal "]" - add $I11, rx182_pos, 1 - gt $I11, rx182_eos, rx182_fail - sub $I11, rx182_pos, rx182_off - substr $S10, rx182_tgt, $I11, 1 - ne $S10, "]", rx182_fail - add rx182_pos, 1 + rx179_pos = $P10."pos"() + # rx literal ")" + add $I11, rx179_pos, 1 + gt $I11, rx179_eos, rx179_fail + sub $I11, rx179_pos, rx179_off + substr $S10, rx179_tgt, $I11, 1 + ne $S10, ")", rx179_fail + add rx179_pos, 1 # rx pass - rx182_cur."!cursor_pass"(rx182_pos, "metachar:sym<[ ]>") - rx182_cur."!cursor_debug"("PASS ", "metachar:sym<[ ]>", " at pos=", rx182_pos) - .return (rx182_cur) - rx182_fail: -.annotate "line", 3 - (rx182_rep, rx182_pos, $I10, $P10) = rx182_cur."!mark_fail"(0) - lt rx182_pos, -1, rx182_done - eq rx182_pos, -1, rx182_fail + rx179_cur."!cursor_pass"(rx179_pos, "metachar:sym<( )>") + rx179_cur."!cursor_debug"("PASS ", "metachar:sym<( )>", " at pos=", rx179_pos) + .return (rx179_cur) + rx179_fail: +.annotate "line", 3 + (rx179_rep, rx179_pos, $I10, $P10) = rx179_cur."!mark_fail"(0) + lt rx179_pos, -1, rx179_done + eq rx179_pos, -1, rx179_fail jump $I10 - rx182_done: - rx182_cur."!cursor_fail"() - rx182_cur."!cursor_debug"("FAIL ", "metachar:sym<[ ]>") - .return (rx182_cur) + rx179_done: + rx179_cur."!cursor_fail"() + rx179_cur."!cursor_debug"("FAIL ", "metachar:sym<( )>") + .return (rx179_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<[ ]>" :subid("54_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<( )>" :subid("54_1258264421.2958") :method .annotate "line", 3 - $P184 = self."!PREFIX__!subrule"("nibbler", "[") - new $P185, "ResizablePMCArray" - push $P185, $P184 - .return ($P185) + $P181 = self."!PREFIX__!subrule"("nibbler", "(") + new $P182, "ResizablePMCArray" + push $P182, $P181 + .return ($P182) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<( )>" :subid("55_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<'>" :subid("55_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx187_tgt - .local int rx187_pos - .local int rx187_off - .local int rx187_eos - .local int rx187_rep - .local pmc rx187_cur - (rx187_cur, rx187_pos, rx187_tgt, $I10) = self."!cursor_start"() - rx187_cur."!cursor_debug"("START ", "metachar:sym<( )>") - .lex unicode:"$\x{a2}", rx187_cur + .local string rx184_tgt + .local int rx184_pos + .local int rx184_off + .local int rx184_eos + .local int rx184_rep + .local pmc rx184_cur + (rx184_cur, rx184_pos, rx184_tgt, $I10) = self."!cursor_start"() + rx184_cur."!cursor_debug"("START ", "metachar:sym<'>") + .lex unicode:"$\x{a2}", rx184_cur .local pmc match .lex "$/", match - length rx187_eos, rx187_tgt - set rx187_off, 0 - lt $I10, 2, rx187_start - sub rx187_off, $I10, 1 - substr rx187_tgt, rx187_tgt, rx187_off - rx187_start: + length rx184_eos, rx184_tgt + set rx184_off, 0 + lt $I10, 2, rx184_start + sub rx184_off, $I10, 1 + substr rx184_tgt, rx184_tgt, rx184_off + rx184_start: .annotate "line", 70 - # rx literal "(" - add $I11, rx187_pos, 1 - gt $I11, rx187_eos, rx187_fail - sub $I11, rx187_pos, rx187_off - substr $S10, rx187_tgt, $I11, 1 - ne $S10, "(", rx187_fail - add rx187_pos, 1 - # rx subrule "nibbler" subtype=capture negate= - rx187_cur."!cursor_pos"(rx187_pos) - $P10 = rx187_cur."nibbler"() - unless $P10, rx187_fail - rx187_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("nibbler") - rx187_pos = $P10."pos"() - # rx literal ")" - add $I11, rx187_pos, 1 - gt $I11, rx187_eos, rx187_fail - sub $I11, rx187_pos, rx187_off - substr $S10, rx187_tgt, $I11, 1 - ne $S10, ")", rx187_fail - add rx187_pos, 1 + # rx enumcharlist negate=0 zerowidth + ge rx184_pos, rx184_eos, rx184_fail + sub $I10, rx184_pos, rx184_off + substr $S10, rx184_tgt, $I10, 1 + index $I11, "'", $S10 + lt $I11, 0, rx184_fail + # rx subrule "quote_EXPR" subtype=capture negate= + rx184_cur."!cursor_pos"(rx184_pos) + $P10 = rx184_cur."quote_EXPR"(":q") + unless $P10, rx184_fail + rx184_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("quote_EXPR") + rx184_pos = $P10."pos"() # rx pass - rx187_cur."!cursor_pass"(rx187_pos, "metachar:sym<( )>") - rx187_cur."!cursor_debug"("PASS ", "metachar:sym<( )>", " at pos=", rx187_pos) - .return (rx187_cur) - rx187_fail: -.annotate "line", 3 - (rx187_rep, rx187_pos, $I10, $P10) = rx187_cur."!mark_fail"(0) - lt rx187_pos, -1, rx187_done - eq rx187_pos, -1, rx187_fail + rx184_cur."!cursor_pass"(rx184_pos, "metachar:sym<'>") + rx184_cur."!cursor_debug"("PASS ", "metachar:sym<'>", " at pos=", rx184_pos) + .return (rx184_cur) + rx184_fail: +.annotate "line", 3 + (rx184_rep, rx184_pos, $I10, $P10) = rx184_cur."!mark_fail"(0) + lt rx184_pos, -1, rx184_done + eq rx184_pos, -1, rx184_fail jump $I10 - rx187_done: - rx187_cur."!cursor_fail"() - rx187_cur."!cursor_debug"("FAIL ", "metachar:sym<( )>") - .return (rx187_cur) + rx184_done: + rx184_cur."!cursor_fail"() + rx184_cur."!cursor_debug"("FAIL ", "metachar:sym<'>") + .return (rx184_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<( )>" :subid("56_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<'>" :subid("56_1258264421.2958") :method +.annotate "line", 3 + new $P186, "ResizablePMCArray" + push $P186, "'" + .return ($P186) +.end + + +.namespace ["Regex";"P6Regex";"Grammar"] +.sub "metachar:sym<\">" :subid("57_1258264421.2958") :method :outer("11_1258264421.2958") +.annotate "line", 3 + .local string rx188_tgt + .local int rx188_pos + .local int rx188_off + .local int rx188_eos + .local int rx188_rep + .local pmc rx188_cur + (rx188_cur, rx188_pos, rx188_tgt, $I10) = self."!cursor_start"() + rx188_cur."!cursor_debug"("START ", "metachar:sym<\">") + .lex unicode:"$\x{a2}", rx188_cur + .local pmc match + .lex "$/", match + length rx188_eos, rx188_tgt + set rx188_off, 0 + lt $I10, 2, rx188_start + sub rx188_off, $I10, 1 + substr rx188_tgt, rx188_tgt, rx188_off + rx188_start: +.annotate "line", 71 + # rx enumcharlist negate=0 zerowidth + ge rx188_pos, rx188_eos, rx188_fail + sub $I10, rx188_pos, rx188_off + substr $S10, rx188_tgt, $I10, 1 + index $I11, "\"", $S10 + lt $I11, 0, rx188_fail + # rx subrule "quote_EXPR" subtype=capture negate= + rx188_cur."!cursor_pos"(rx188_pos) + $P10 = rx188_cur."quote_EXPR"(":qq") + unless $P10, rx188_fail + rx188_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("quote_EXPR") + rx188_pos = $P10."pos"() + # rx pass + rx188_cur."!cursor_pass"(rx188_pos, "metachar:sym<\">") + rx188_cur."!cursor_debug"("PASS ", "metachar:sym<\">", " at pos=", rx188_pos) + .return (rx188_cur) + rx188_fail: +.annotate "line", 3 + (rx188_rep, rx188_pos, $I10, $P10) = rx188_cur."!mark_fail"(0) + lt rx188_pos, -1, rx188_done + eq rx188_pos, -1, rx188_fail + jump $I10 + rx188_done: + rx188_cur."!cursor_fail"() + rx188_cur."!cursor_debug"("FAIL ", "metachar:sym<\">") + .return (rx188_cur) + .return () +.end + + +.namespace ["Regex";"P6Regex";"Grammar"] +.sub "!PREFIX__metachar:sym<\">" :subid("58_1258264421.2958") :method .annotate "line", 3 - $P189 = self."!PREFIX__!subrule"("nibbler", "(") new $P190, "ResizablePMCArray" - push $P190, $P189 + push $P190, "\"" .return ($P190) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<'>" :subid("57_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<.>" :subid("59_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx192_tgt .local int rx192_pos @@ -2093,7 +2148,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx192_rep .local pmc rx192_cur (rx192_cur, rx192_pos, rx192_tgt, $I10) = self."!cursor_start"() - rx192_cur."!cursor_debug"("START ", "metachar:sym<'>") + rx192_cur."!cursor_debug"("START ", "metachar:sym<.>") .lex unicode:"$\x{a2}", rx192_cur .local pmc match .lex "$/", match @@ -2103,17 +2158,31 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx192_off, $I10, 1 substr rx192_tgt, rx192_tgt, rx192_off rx192_start: -.annotate "line", 71 - # rx subrule "quote" subtype=capture negate= - rx192_cur."!cursor_pos"(rx192_pos) - $P10 = rx192_cur."quote"() - unless $P10, rx192_fail +.annotate "line", 72 + # rx subcapture "sym" + set_addr $I10, rxcap_195_fail + rx192_cur."!mark_push"(0, rx192_pos, $I10) + # rx literal "." + add $I11, rx192_pos, 1 + gt $I11, rx192_eos, rx192_fail + sub $I11, rx192_pos, rx192_off + substr $S10, rx192_tgt, $I11, 1 + ne $S10, ".", rx192_fail + add rx192_pos, 1 + set_addr $I10, rxcap_195_fail + ($I12, $I11) = rx192_cur."!mark_peek"($I10) + rx192_cur."!cursor_pos"($I11) + ($P10) = rx192_cur."!cursor_start"() + $P10."!cursor_pass"(rx192_pos, "") rx192_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("quote") - rx192_pos = $P10."pos"() + $P10."!cursor_names"("sym") + goto rxcap_195_done + rxcap_195_fail: + goto rx192_fail + rxcap_195_done: # rx pass - rx192_cur."!cursor_pass"(rx192_pos, "metachar:sym<'>") - rx192_cur."!cursor_debug"("PASS ", "metachar:sym<'>", " at pos=", rx192_pos) + rx192_cur."!cursor_pass"(rx192_pos, "metachar:sym<.>") + rx192_cur."!cursor_debug"("PASS ", "metachar:sym<.>", " at pos=", rx192_pos) .return (rx192_cur) rx192_fail: .annotate "line", 3 @@ -2123,24 +2192,23 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx192_done: rx192_cur."!cursor_fail"() - rx192_cur."!cursor_debug"("FAIL ", "metachar:sym<'>") + rx192_cur."!cursor_debug"("FAIL ", "metachar:sym<.>") .return (rx192_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<'>" :subid("58_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<.>" :subid("60_1258264421.2958") :method .annotate "line", 3 - $P194 = self."!PREFIX__!subrule"("quote", "") - new $P195, "ResizablePMCArray" - push $P195, $P194 - .return ($P195) + new $P194, "ResizablePMCArray" + push $P194, "." + .return ($P194) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<.>" :subid("59_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<^>" :subid("61_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx197_tgt .local int rx197_pos @@ -2149,7 +2217,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx197_rep .local pmc rx197_cur (rx197_cur, rx197_pos, rx197_tgt, $I10) = self."!cursor_start"() - rx197_cur."!cursor_debug"("START ", "metachar:sym<.>") + rx197_cur."!cursor_debug"("START ", "metachar:sym<^>") .lex unicode:"$\x{a2}", rx197_cur .local pmc match .lex "$/", match @@ -2159,16 +2227,16 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx197_off, $I10, 1 substr rx197_tgt, rx197_tgt, rx197_off rx197_start: -.annotate "line", 72 +.annotate "line", 73 # rx subcapture "sym" set_addr $I10, rxcap_200_fail rx197_cur."!mark_push"(0, rx197_pos, $I10) - # rx literal "." + # rx literal "^" add $I11, rx197_pos, 1 gt $I11, rx197_eos, rx197_fail sub $I11, rx197_pos, rx197_off substr $S10, rx197_tgt, $I11, 1 - ne $S10, ".", rx197_fail + ne $S10, "^", rx197_fail add rx197_pos, 1 set_addr $I10, rxcap_200_fail ($I12, $I11) = rx197_cur."!mark_peek"($I10) @@ -2182,8 +2250,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx197_fail rxcap_200_done: # rx pass - rx197_cur."!cursor_pass"(rx197_pos, "metachar:sym<.>") - rx197_cur."!cursor_debug"("PASS ", "metachar:sym<.>", " at pos=", rx197_pos) + rx197_cur."!cursor_pass"(rx197_pos, "metachar:sym<^>") + rx197_cur."!cursor_debug"("PASS ", "metachar:sym<^>", " at pos=", rx197_pos) .return (rx197_cur) rx197_fail: .annotate "line", 3 @@ -2193,23 +2261,23 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx197_done: rx197_cur."!cursor_fail"() - rx197_cur."!cursor_debug"("FAIL ", "metachar:sym<.>") + rx197_cur."!cursor_debug"("FAIL ", "metachar:sym<^>") .return (rx197_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<.>" :subid("60_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<^>" :subid("62_1258264421.2958") :method .annotate "line", 3 new $P199, "ResizablePMCArray" - push $P199, "." + push $P199, "^" .return ($P199) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<^>" :subid("61_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<^^>" :subid("63_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx202_tgt .local int rx202_pos @@ -2218,7 +2286,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx202_rep .local pmc rx202_cur (rx202_cur, rx202_pos, rx202_tgt, $I10) = self."!cursor_start"() - rx202_cur."!cursor_debug"("START ", "metachar:sym<^>") + rx202_cur."!cursor_debug"("START ", "metachar:sym<^^>") .lex unicode:"$\x{a2}", rx202_cur .local pmc match .lex "$/", match @@ -2228,17 +2296,17 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx202_off, $I10, 1 substr rx202_tgt, rx202_tgt, rx202_off rx202_start: -.annotate "line", 73 +.annotate "line", 74 # rx subcapture "sym" set_addr $I10, rxcap_205_fail rx202_cur."!mark_push"(0, rx202_pos, $I10) - # rx literal "^" - add $I11, rx202_pos, 1 + # rx literal "^^" + add $I11, rx202_pos, 2 gt $I11, rx202_eos, rx202_fail sub $I11, rx202_pos, rx202_off - substr $S10, rx202_tgt, $I11, 1 - ne $S10, "^", rx202_fail - add rx202_pos, 1 + substr $S10, rx202_tgt, $I11, 2 + ne $S10, "^^", rx202_fail + add rx202_pos, 2 set_addr $I10, rxcap_205_fail ($I12, $I11) = rx202_cur."!mark_peek"($I10) rx202_cur."!cursor_pos"($I11) @@ -2251,8 +2319,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx202_fail rxcap_205_done: # rx pass - rx202_cur."!cursor_pass"(rx202_pos, "metachar:sym<^>") - rx202_cur."!cursor_debug"("PASS ", "metachar:sym<^>", " at pos=", rx202_pos) + rx202_cur."!cursor_pass"(rx202_pos, "metachar:sym<^^>") + rx202_cur."!cursor_debug"("PASS ", "metachar:sym<^^>", " at pos=", rx202_pos) .return (rx202_cur) rx202_fail: .annotate "line", 3 @@ -2262,23 +2330,23 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx202_done: rx202_cur."!cursor_fail"() - rx202_cur."!cursor_debug"("FAIL ", "metachar:sym<^>") + rx202_cur."!cursor_debug"("FAIL ", "metachar:sym<^^>") .return (rx202_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<^>" :subid("62_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<^^>" :subid("64_1258264421.2958") :method .annotate "line", 3 new $P204, "ResizablePMCArray" - push $P204, "^" + push $P204, "^^" .return ($P204) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<^^>" :subid("63_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<$>" :subid("65_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx207_tgt .local int rx207_pos @@ -2287,7 +2355,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx207_rep .local pmc rx207_cur (rx207_cur, rx207_pos, rx207_tgt, $I10) = self."!cursor_start"() - rx207_cur."!cursor_debug"("START ", "metachar:sym<^^>") + rx207_cur."!cursor_debug"("START ", "metachar:sym<$>") .lex unicode:"$\x{a2}", rx207_cur .local pmc match .lex "$/", match @@ -2297,17 +2365,17 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx207_off, $I10, 1 substr rx207_tgt, rx207_tgt, rx207_off rx207_start: -.annotate "line", 74 +.annotate "line", 75 # rx subcapture "sym" set_addr $I10, rxcap_210_fail rx207_cur."!mark_push"(0, rx207_pos, $I10) - # rx literal "^^" - add $I11, rx207_pos, 2 + # rx literal "$" + add $I11, rx207_pos, 1 gt $I11, rx207_eos, rx207_fail sub $I11, rx207_pos, rx207_off - substr $S10, rx207_tgt, $I11, 2 - ne $S10, "^^", rx207_fail - add rx207_pos, 2 + substr $S10, rx207_tgt, $I11, 1 + ne $S10, "$", rx207_fail + add rx207_pos, 1 set_addr $I10, rxcap_210_fail ($I12, $I11) = rx207_cur."!mark_peek"($I10) rx207_cur."!cursor_pos"($I11) @@ -2320,8 +2388,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx207_fail rxcap_210_done: # rx pass - rx207_cur."!cursor_pass"(rx207_pos, "metachar:sym<^^>") - rx207_cur."!cursor_debug"("PASS ", "metachar:sym<^^>", " at pos=", rx207_pos) + rx207_cur."!cursor_pass"(rx207_pos, "metachar:sym<$>") + rx207_cur."!cursor_debug"("PASS ", "metachar:sym<$>", " at pos=", rx207_pos) .return (rx207_cur) rx207_fail: .annotate "line", 3 @@ -2331,23 +2399,23 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx207_done: rx207_cur."!cursor_fail"() - rx207_cur."!cursor_debug"("FAIL ", "metachar:sym<^^>") + rx207_cur."!cursor_debug"("FAIL ", "metachar:sym<$>") .return (rx207_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<^^>" :subid("64_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<$>" :subid("66_1258264421.2958") :method .annotate "line", 3 new $P209, "ResizablePMCArray" - push $P209, "^^" + push $P209, "$" .return ($P209) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<$>" :subid("65_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<$$>" :subid("67_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx212_tgt .local int rx212_pos @@ -2356,7 +2424,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx212_rep .local pmc rx212_cur (rx212_cur, rx212_pos, rx212_tgt, $I10) = self."!cursor_start"() - rx212_cur."!cursor_debug"("START ", "metachar:sym<$>") + rx212_cur."!cursor_debug"("START ", "metachar:sym<$$>") .lex unicode:"$\x{a2}", rx212_cur .local pmc match .lex "$/", match @@ -2366,17 +2434,17 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx212_off, $I10, 1 substr rx212_tgt, rx212_tgt, rx212_off rx212_start: -.annotate "line", 75 +.annotate "line", 76 # rx subcapture "sym" set_addr $I10, rxcap_215_fail rx212_cur."!mark_push"(0, rx212_pos, $I10) - # rx literal "$" - add $I11, rx212_pos, 1 + # rx literal "$$" + add $I11, rx212_pos, 2 gt $I11, rx212_eos, rx212_fail sub $I11, rx212_pos, rx212_off - substr $S10, rx212_tgt, $I11, 1 - ne $S10, "$", rx212_fail - add rx212_pos, 1 + substr $S10, rx212_tgt, $I11, 2 + ne $S10, "$$", rx212_fail + add rx212_pos, 2 set_addr $I10, rxcap_215_fail ($I12, $I11) = rx212_cur."!mark_peek"($I10) rx212_cur."!cursor_pos"($I11) @@ -2389,8 +2457,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx212_fail rxcap_215_done: # rx pass - rx212_cur."!cursor_pass"(rx212_pos, "metachar:sym<$>") - rx212_cur."!cursor_debug"("PASS ", "metachar:sym<$>", " at pos=", rx212_pos) + rx212_cur."!cursor_pass"(rx212_pos, "metachar:sym<$$>") + rx212_cur."!cursor_debug"("PASS ", "metachar:sym<$$>", " at pos=", rx212_pos) .return (rx212_cur) rx212_fail: .annotate "line", 3 @@ -2400,23 +2468,23 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx212_done: rx212_cur."!cursor_fail"() - rx212_cur."!cursor_debug"("FAIL ", "metachar:sym<$>") + rx212_cur."!cursor_debug"("FAIL ", "metachar:sym<$$>") .return (rx212_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<$>" :subid("66_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<$$>" :subid("68_1258264421.2958") :method .annotate "line", 3 new $P214, "ResizablePMCArray" - push $P214, "$" + push $P214, "$$" .return ($P214) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<$$>" :subid("67_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<:::>" :subid("69_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx217_tgt .local int rx217_pos @@ -2425,7 +2493,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx217_rep .local pmc rx217_cur (rx217_cur, rx217_pos, rx217_tgt, $I10) = self."!cursor_start"() - rx217_cur."!cursor_debug"("START ", "metachar:sym<$$>") + rx217_cur."!cursor_debug"("START ", "metachar:sym<:::>") .lex unicode:"$\x{a2}", rx217_cur .local pmc match .lex "$/", match @@ -2435,31 +2503,36 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx217_off, $I10, 1 substr rx217_tgt, rx217_tgt, rx217_off rx217_start: -.annotate "line", 76 +.annotate "line", 77 # rx subcapture "sym" - set_addr $I10, rxcap_220_fail + set_addr $I10, rxcap_221_fail rx217_cur."!mark_push"(0, rx217_pos, $I10) - # rx literal "$$" - add $I11, rx217_pos, 2 + # rx literal ":::" + add $I11, rx217_pos, 3 gt $I11, rx217_eos, rx217_fail sub $I11, rx217_pos, rx217_off - substr $S10, rx217_tgt, $I11, 2 - ne $S10, "$$", rx217_fail - add rx217_pos, 2 - set_addr $I10, rxcap_220_fail + substr $S10, rx217_tgt, $I11, 3 + ne $S10, ":::", rx217_fail + add rx217_pos, 3 + set_addr $I10, rxcap_221_fail ($I12, $I11) = rx217_cur."!mark_peek"($I10) rx217_cur."!cursor_pos"($I11) ($P10) = rx217_cur."!cursor_start"() $P10."!cursor_pass"(rx217_pos, "") rx217_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_220_done - rxcap_220_fail: + goto rxcap_221_done + rxcap_221_fail: goto rx217_fail - rxcap_220_done: + rxcap_221_done: + # rx subrule "panic" subtype=method negate= + rx217_cur."!cursor_pos"(rx217_pos) + $P10 = rx217_cur."panic"("::: not yet implemented") + unless $P10, rx217_fail + rx217_pos = $P10."pos"() # rx pass - rx217_cur."!cursor_pass"(rx217_pos, "metachar:sym<$$>") - rx217_cur."!cursor_debug"("PASS ", "metachar:sym<$$>", " at pos=", rx217_pos) + rx217_cur."!cursor_pass"(rx217_pos, "metachar:sym<:::>") + rx217_cur."!cursor_debug"("PASS ", "metachar:sym<:::>", " at pos=", rx217_pos) .return (rx217_cur) rx217_fail: .annotate "line", 3 @@ -2469,339 +2542,328 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx217_done: rx217_cur."!cursor_fail"() - rx217_cur."!cursor_debug"("FAIL ", "metachar:sym<$$>") + rx217_cur."!cursor_debug"("FAIL ", "metachar:sym<:::>") .return (rx217_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<$$>" :subid("68_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<:::>" :subid("70_1258264421.2958") :method .annotate "line", 3 - new $P219, "ResizablePMCArray" - push $P219, "$$" - .return ($P219) + $P219 = self."!PREFIX__!subrule"("", ":::") + new $P220, "ResizablePMCArray" + push $P220, $P219 + .return ($P220) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<:::>" :subid("69_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<::>" :subid("71_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx222_tgt - .local int rx222_pos - .local int rx222_off - .local int rx222_eos - .local int rx222_rep - .local pmc rx222_cur - (rx222_cur, rx222_pos, rx222_tgt, $I10) = self."!cursor_start"() - rx222_cur."!cursor_debug"("START ", "metachar:sym<:::>") - .lex unicode:"$\x{a2}", rx222_cur + .local string rx223_tgt + .local int rx223_pos + .local int rx223_off + .local int rx223_eos + .local int rx223_rep + .local pmc rx223_cur + (rx223_cur, rx223_pos, rx223_tgt, $I10) = self."!cursor_start"() + rx223_cur."!cursor_debug"("START ", "metachar:sym<::>") + .lex unicode:"$\x{a2}", rx223_cur .local pmc match .lex "$/", match - length rx222_eos, rx222_tgt - set rx222_off, 0 - lt $I10, 2, rx222_start - sub rx222_off, $I10, 1 - substr rx222_tgt, rx222_tgt, rx222_off - rx222_start: -.annotate "line", 77 + length rx223_eos, rx223_tgt + set rx223_off, 0 + lt $I10, 2, rx223_start + sub rx223_off, $I10, 1 + substr rx223_tgt, rx223_tgt, rx223_off + rx223_start: +.annotate "line", 78 # rx subcapture "sym" - set_addr $I10, rxcap_226_fail - rx222_cur."!mark_push"(0, rx222_pos, $I10) - # rx literal ":::" - add $I11, rx222_pos, 3 - gt $I11, rx222_eos, rx222_fail - sub $I11, rx222_pos, rx222_off - substr $S10, rx222_tgt, $I11, 3 - ne $S10, ":::", rx222_fail - add rx222_pos, 3 - set_addr $I10, rxcap_226_fail - ($I12, $I11) = rx222_cur."!mark_peek"($I10) - rx222_cur."!cursor_pos"($I11) - ($P10) = rx222_cur."!cursor_start"() - $P10."!cursor_pass"(rx222_pos, "") - rx222_cur."!mark_push"(0, -1, 0, $P10) + set_addr $I10, rxcap_227_fail + rx223_cur."!mark_push"(0, rx223_pos, $I10) + # rx literal "::" + add $I11, rx223_pos, 2 + gt $I11, rx223_eos, rx223_fail + sub $I11, rx223_pos, rx223_off + substr $S10, rx223_tgt, $I11, 2 + ne $S10, "::", rx223_fail + add rx223_pos, 2 + set_addr $I10, rxcap_227_fail + ($I12, $I11) = rx223_cur."!mark_peek"($I10) + rx223_cur."!cursor_pos"($I11) + ($P10) = rx223_cur."!cursor_start"() + $P10."!cursor_pass"(rx223_pos, "") + rx223_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_226_done - rxcap_226_fail: - goto rx222_fail - rxcap_226_done: + goto rxcap_227_done + rxcap_227_fail: + goto rx223_fail + rxcap_227_done: # rx subrule "panic" subtype=method negate= - rx222_cur."!cursor_pos"(rx222_pos) - $P10 = rx222_cur."panic"("::: not yet implemented") - unless $P10, rx222_fail - rx222_pos = $P10."pos"() + rx223_cur."!cursor_pos"(rx223_pos) + $P10 = rx223_cur."panic"(":: not yet implemented") + unless $P10, rx223_fail + rx223_pos = $P10."pos"() # rx pass - rx222_cur."!cursor_pass"(rx222_pos, "metachar:sym<:::>") - rx222_cur."!cursor_debug"("PASS ", "metachar:sym<:::>", " at pos=", rx222_pos) - .return (rx222_cur) - rx222_fail: -.annotate "line", 3 - (rx222_rep, rx222_pos, $I10, $P10) = rx222_cur."!mark_fail"(0) - lt rx222_pos, -1, rx222_done - eq rx222_pos, -1, rx222_fail + rx223_cur."!cursor_pass"(rx223_pos, "metachar:sym<::>") + rx223_cur."!cursor_debug"("PASS ", "metachar:sym<::>", " at pos=", rx223_pos) + .return (rx223_cur) + rx223_fail: +.annotate "line", 3 + (rx223_rep, rx223_pos, $I10, $P10) = rx223_cur."!mark_fail"(0) + lt rx223_pos, -1, rx223_done + eq rx223_pos, -1, rx223_fail jump $I10 - rx222_done: - rx222_cur."!cursor_fail"() - rx222_cur."!cursor_debug"("FAIL ", "metachar:sym<:::>") - .return (rx222_cur) + rx223_done: + rx223_cur."!cursor_fail"() + rx223_cur."!cursor_debug"("FAIL ", "metachar:sym<::>") + .return (rx223_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<:::>" :subid("70_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<::>" :subid("72_1258264421.2958") :method .annotate "line", 3 - $P224 = self."!PREFIX__!subrule"("", ":::") - new $P225, "ResizablePMCArray" - push $P225, $P224 - .return ($P225) + $P225 = self."!PREFIX__!subrule"("", "::") + new $P226, "ResizablePMCArray" + push $P226, $P225 + .return ($P226) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<::>" :subid("71_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym" :subid("73_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx228_tgt - .local int rx228_pos - .local int rx228_off - .local int rx228_eos - .local int rx228_rep - .local pmc rx228_cur - (rx228_cur, rx228_pos, rx228_tgt, $I10) = self."!cursor_start"() - rx228_cur."!cursor_debug"("START ", "metachar:sym<::>") - .lex unicode:"$\x{a2}", rx228_cur + .local string rx229_tgt + .local int rx229_pos + .local int rx229_off + .local int rx229_eos + .local int rx229_rep + .local pmc rx229_cur + (rx229_cur, rx229_pos, rx229_tgt, $I10) = self."!cursor_start"() + rx229_cur."!cursor_debug"("START ", "metachar:sym") + .lex unicode:"$\x{a2}", rx229_cur .local pmc match .lex "$/", match - length rx228_eos, rx228_tgt - set rx228_off, 0 - lt $I10, 2, rx228_start - sub rx228_off, $I10, 1 - substr rx228_tgt, rx228_tgt, rx228_off - rx228_start: -.annotate "line", 78 + length rx229_eos, rx229_tgt + set rx229_off, 0 + lt $I10, 2, rx229_start + sub rx229_off, $I10, 1 + substr rx229_tgt, rx229_tgt, rx229_off + rx229_start: +.annotate "line", 79 # rx subcapture "sym" - set_addr $I10, rxcap_232_fail - rx228_cur."!mark_push"(0, rx228_pos, $I10) - # rx literal "::" - add $I11, rx228_pos, 2 - gt $I11, rx228_eos, rx228_fail - sub $I11, rx228_pos, rx228_off - substr $S10, rx228_tgt, $I11, 2 - ne $S10, "::", rx228_fail - add rx228_pos, 2 - set_addr $I10, rxcap_232_fail - ($I12, $I11) = rx228_cur."!mark_peek"($I10) - rx228_cur."!cursor_pos"($I11) - ($P10) = rx228_cur."!cursor_start"() - $P10."!cursor_pass"(rx228_pos, "") - rx228_cur."!mark_push"(0, -1, 0, $P10) + set_addr $I10, rxcap_233_fail + rx229_cur."!mark_push"(0, rx229_pos, $I10) + alt232_0: + set_addr $I10, alt232_1 + rx229_cur."!mark_push"(0, rx229_pos, $I10) + # rx literal "<<" + add $I11, rx229_pos, 2 + gt $I11, rx229_eos, rx229_fail + sub $I11, rx229_pos, rx229_off + substr $S10, rx229_tgt, $I11, 2 + ne $S10, "<<", rx229_fail + add rx229_pos, 2 + goto alt232_end + alt232_1: + # rx literal unicode:"\x{ab}" + add $I11, rx229_pos, 1 + gt $I11, rx229_eos, rx229_fail + sub $I11, rx229_pos, rx229_off + substr $S10, rx229_tgt, $I11, 1 + ne $S10, unicode:"\x{ab}", rx229_fail + add rx229_pos, 1 + alt232_end: + set_addr $I10, rxcap_233_fail + ($I12, $I11) = rx229_cur."!mark_peek"($I10) + rx229_cur."!cursor_pos"($I11) + ($P10) = rx229_cur."!cursor_start"() + $P10."!cursor_pass"(rx229_pos, "") + rx229_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_232_done - rxcap_232_fail: - goto rx228_fail - rxcap_232_done: - # rx subrule "panic" subtype=method negate= - rx228_cur."!cursor_pos"(rx228_pos) - $P10 = rx228_cur."panic"(":: not yet implemented") - unless $P10, rx228_fail - rx228_pos = $P10."pos"() + goto rxcap_233_done + rxcap_233_fail: + goto rx229_fail + rxcap_233_done: # rx pass - rx228_cur."!cursor_pass"(rx228_pos, "metachar:sym<::>") - rx228_cur."!cursor_debug"("PASS ", "metachar:sym<::>", " at pos=", rx228_pos) - .return (rx228_cur) - rx228_fail: -.annotate "line", 3 - (rx228_rep, rx228_pos, $I10, $P10) = rx228_cur."!mark_fail"(0) - lt rx228_pos, -1, rx228_done - eq rx228_pos, -1, rx228_fail + rx229_cur."!cursor_pass"(rx229_pos, "metachar:sym") + rx229_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx229_pos) + .return (rx229_cur) + rx229_fail: +.annotate "line", 3 + (rx229_rep, rx229_pos, $I10, $P10) = rx229_cur."!mark_fail"(0) + lt rx229_pos, -1, rx229_done + eq rx229_pos, -1, rx229_fail jump $I10 - rx228_done: - rx228_cur."!cursor_fail"() - rx228_cur."!cursor_debug"("FAIL ", "metachar:sym<::>") - .return (rx228_cur) + rx229_done: + rx229_cur."!cursor_fail"() + rx229_cur."!cursor_debug"("FAIL ", "metachar:sym") + .return (rx229_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<::>" :subid("72_1258208089.76063") :method +.sub "!PREFIX__metachar:sym" :subid("74_1258264421.2958") :method .annotate "line", 3 - $P230 = self."!PREFIX__!subrule"("", "::") new $P231, "ResizablePMCArray" - push $P231, $P230 + push $P231, unicode:"\x{ab}" + push $P231, "<<" .return ($P231) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym" :subid("73_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym" :subid("75_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx234_tgt - .local int rx234_pos - .local int rx234_off - .local int rx234_eos - .local int rx234_rep - .local pmc rx234_cur - (rx234_cur, rx234_pos, rx234_tgt, $I10) = self."!cursor_start"() - rx234_cur."!cursor_debug"("START ", "metachar:sym") - .lex unicode:"$\x{a2}", rx234_cur + .local string rx235_tgt + .local int rx235_pos + .local int rx235_off + .local int rx235_eos + .local int rx235_rep + .local pmc rx235_cur + (rx235_cur, rx235_pos, rx235_tgt, $I10) = self."!cursor_start"() + rx235_cur."!cursor_debug"("START ", "metachar:sym") + .lex unicode:"$\x{a2}", rx235_cur .local pmc match .lex "$/", match - length rx234_eos, rx234_tgt - set rx234_off, 0 - lt $I10, 2, rx234_start - sub rx234_off, $I10, 1 - substr rx234_tgt, rx234_tgt, rx234_off - rx234_start: -.annotate "line", 79 + length rx235_eos, rx235_tgt + set rx235_off, 0 + lt $I10, 2, rx235_start + sub rx235_off, $I10, 1 + substr rx235_tgt, rx235_tgt, rx235_off + rx235_start: +.annotate "line", 80 # rx subcapture "sym" - set_addr $I10, rxcap_238_fail - rx234_cur."!mark_push"(0, rx234_pos, $I10) - alt237_0: - set_addr $I10, alt237_1 - rx234_cur."!mark_push"(0, rx234_pos, $I10) - # rx literal "<<" - add $I11, rx234_pos, 2 - gt $I11, rx234_eos, rx234_fail - sub $I11, rx234_pos, rx234_off - substr $S10, rx234_tgt, $I11, 2 - ne $S10, "<<", rx234_fail - add rx234_pos, 2 - goto alt237_end - alt237_1: - # rx literal unicode:"\x{ab}" - add $I11, rx234_pos, 1 - gt $I11, rx234_eos, rx234_fail - sub $I11, rx234_pos, rx234_off - substr $S10, rx234_tgt, $I11, 1 - ne $S10, unicode:"\x{ab}", rx234_fail - add rx234_pos, 1 - alt237_end: - set_addr $I10, rxcap_238_fail - ($I12, $I11) = rx234_cur."!mark_peek"($I10) - rx234_cur."!cursor_pos"($I11) - ($P10) = rx234_cur."!cursor_start"() - $P10."!cursor_pass"(rx234_pos, "") - rx234_cur."!mark_push"(0, -1, 0, $P10) + set_addr $I10, rxcap_239_fail + rx235_cur."!mark_push"(0, rx235_pos, $I10) + alt238_0: + set_addr $I10, alt238_1 + rx235_cur."!mark_push"(0, rx235_pos, $I10) + # rx literal ">>" + add $I11, rx235_pos, 2 + gt $I11, rx235_eos, rx235_fail + sub $I11, rx235_pos, rx235_off + substr $S10, rx235_tgt, $I11, 2 + ne $S10, ">>", rx235_fail + add rx235_pos, 2 + goto alt238_end + alt238_1: + # rx literal unicode:"\x{bb}" + add $I11, rx235_pos, 1 + gt $I11, rx235_eos, rx235_fail + sub $I11, rx235_pos, rx235_off + substr $S10, rx235_tgt, $I11, 1 + ne $S10, unicode:"\x{bb}", rx235_fail + add rx235_pos, 1 + alt238_end: + set_addr $I10, rxcap_239_fail + ($I12, $I11) = rx235_cur."!mark_peek"($I10) + rx235_cur."!cursor_pos"($I11) + ($P10) = rx235_cur."!cursor_start"() + $P10."!cursor_pass"(rx235_pos, "") + rx235_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_238_done - rxcap_238_fail: - goto rx234_fail - rxcap_238_done: + goto rxcap_239_done + rxcap_239_fail: + goto rx235_fail + rxcap_239_done: # rx pass - rx234_cur."!cursor_pass"(rx234_pos, "metachar:sym") - rx234_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx234_pos) - .return (rx234_cur) - rx234_fail: -.annotate "line", 3 - (rx234_rep, rx234_pos, $I10, $P10) = rx234_cur."!mark_fail"(0) - lt rx234_pos, -1, rx234_done - eq rx234_pos, -1, rx234_fail + rx235_cur."!cursor_pass"(rx235_pos, "metachar:sym") + rx235_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx235_pos) + .return (rx235_cur) + rx235_fail: +.annotate "line", 3 + (rx235_rep, rx235_pos, $I10, $P10) = rx235_cur."!mark_fail"(0) + lt rx235_pos, -1, rx235_done + eq rx235_pos, -1, rx235_fail jump $I10 - rx234_done: - rx234_cur."!cursor_fail"() - rx234_cur."!cursor_debug"("FAIL ", "metachar:sym") - .return (rx234_cur) + rx235_done: + rx235_cur."!cursor_fail"() + rx235_cur."!cursor_debug"("FAIL ", "metachar:sym") + .return (rx235_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym" :subid("74_1258208089.76063") :method +.sub "!PREFIX__metachar:sym" :subid("76_1258264421.2958") :method .annotate "line", 3 - new $P236, "ResizablePMCArray" - push $P236, unicode:"\x{ab}" - push $P236, "<<" - .return ($P236) + new $P237, "ResizablePMCArray" + push $P237, unicode:"\x{bb}" + push $P237, ">>" + .return ($P237) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym" :subid("75_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym" :subid("77_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx240_tgt - .local int rx240_pos - .local int rx240_off - .local int rx240_eos - .local int rx240_rep - .local pmc rx240_cur - (rx240_cur, rx240_pos, rx240_tgt, $I10) = self."!cursor_start"() - rx240_cur."!cursor_debug"("START ", "metachar:sym") - .lex unicode:"$\x{a2}", rx240_cur + .local string rx241_tgt + .local int rx241_pos + .local int rx241_off + .local int rx241_eos + .local int rx241_rep + .local pmc rx241_cur + (rx241_cur, rx241_pos, rx241_tgt, $I10) = self."!cursor_start"() + rx241_cur."!cursor_debug"("START ", "metachar:sym") + .lex unicode:"$\x{a2}", rx241_cur .local pmc match .lex "$/", match - length rx240_eos, rx240_tgt - set rx240_off, 0 - lt $I10, 2, rx240_start - sub rx240_off, $I10, 1 - substr rx240_tgt, rx240_tgt, rx240_off - rx240_start: -.annotate "line", 80 - # rx subcapture "sym" - set_addr $I10, rxcap_244_fail - rx240_cur."!mark_push"(0, rx240_pos, $I10) - alt243_0: - set_addr $I10, alt243_1 - rx240_cur."!mark_push"(0, rx240_pos, $I10) - # rx literal ">>" - add $I11, rx240_pos, 2 - gt $I11, rx240_eos, rx240_fail - sub $I11, rx240_pos, rx240_off - substr $S10, rx240_tgt, $I11, 2 - ne $S10, ">>", rx240_fail - add rx240_pos, 2 - goto alt243_end - alt243_1: - # rx literal unicode:"\x{bb}" - add $I11, rx240_pos, 1 - gt $I11, rx240_eos, rx240_fail - sub $I11, rx240_pos, rx240_off - substr $S10, rx240_tgt, $I11, 1 - ne $S10, unicode:"\x{bb}", rx240_fail - add rx240_pos, 1 - alt243_end: - set_addr $I10, rxcap_244_fail - ($I12, $I11) = rx240_cur."!mark_peek"($I10) - rx240_cur."!cursor_pos"($I11) - ($P10) = rx240_cur."!cursor_start"() - $P10."!cursor_pass"(rx240_pos, "") - rx240_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("sym") - goto rxcap_244_done - rxcap_244_fail: - goto rx240_fail - rxcap_244_done: + length rx241_eos, rx241_tgt + set rx241_off, 0 + lt $I10, 2, rx241_start + sub rx241_off, $I10, 1 + substr rx241_tgt, rx241_tgt, rx241_off + rx241_start: +.annotate "line", 81 + # rx literal "\\" + add $I11, rx241_pos, 1 + gt $I11, rx241_eos, rx241_fail + sub $I11, rx241_pos, rx241_off + substr $S10, rx241_tgt, $I11, 1 + ne $S10, "\\", rx241_fail + add rx241_pos, 1 + # rx subrule "backslash" subtype=capture negate= + rx241_cur."!cursor_pos"(rx241_pos) + $P10 = rx241_cur."backslash"() + unless $P10, rx241_fail + rx241_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("backslash") + rx241_pos = $P10."pos"() # rx pass - rx240_cur."!cursor_pass"(rx240_pos, "metachar:sym") - rx240_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx240_pos) - .return (rx240_cur) - rx240_fail: -.annotate "line", 3 - (rx240_rep, rx240_pos, $I10, $P10) = rx240_cur."!mark_fail"(0) - lt rx240_pos, -1, rx240_done - eq rx240_pos, -1, rx240_fail + rx241_cur."!cursor_pass"(rx241_pos, "metachar:sym") + rx241_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx241_pos) + .return (rx241_cur) + rx241_fail: +.annotate "line", 3 + (rx241_rep, rx241_pos, $I10, $P10) = rx241_cur."!mark_fail"(0) + lt rx241_pos, -1, rx241_done + eq rx241_pos, -1, rx241_fail jump $I10 - rx240_done: - rx240_cur."!cursor_fail"() - rx240_cur."!cursor_debug"("FAIL ", "metachar:sym") - .return (rx240_cur) + rx241_done: + rx241_cur."!cursor_fail"() + rx241_cur."!cursor_debug"("FAIL ", "metachar:sym") + .return (rx241_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym" :subid("76_1258208089.76063") :method +.sub "!PREFIX__metachar:sym" :subid("78_1258264421.2958") :method .annotate "line", 3 - new $P242, "ResizablePMCArray" - push $P242, unicode:"\x{bb}" - push $P242, ">>" - .return ($P242) + $P243 = self."!PREFIX__!subrule"("backslash", "\\") + new $P244, "ResizablePMCArray" + push $P244, $P243 + .return ($P244) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym" :subid("77_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym" :subid("79_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx246_tgt .local int rx246_pos @@ -2810,7 +2872,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx246_rep .local pmc rx246_cur (rx246_cur, rx246_pos, rx246_tgt, $I10) = self."!cursor_start"() - rx246_cur."!cursor_debug"("START ", "metachar:sym") + rx246_cur."!cursor_debug"("START ", "metachar:sym") .lex unicode:"$\x{a2}", rx246_cur .local pmc match .lex "$/", match @@ -2820,24 +2882,17 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx246_off, $I10, 1 substr rx246_tgt, rx246_tgt, rx246_off rx246_start: -.annotate "line", 81 - # rx literal "\\" - add $I11, rx246_pos, 1 - gt $I11, rx246_eos, rx246_fail - sub $I11, rx246_pos, rx246_off - substr $S10, rx246_tgt, $I11, 1 - ne $S10, "\\", rx246_fail - add rx246_pos, 1 - # rx subrule "backslash" subtype=capture negate= +.annotate "line", 82 + # rx subrule "mod_internal" subtype=capture negate= rx246_cur."!cursor_pos"(rx246_pos) - $P10 = rx246_cur."backslash"() + $P10 = rx246_cur."mod_internal"() unless $P10, rx246_fail rx246_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("backslash") + $P10."!cursor_names"("mod_internal") rx246_pos = $P10."pos"() # rx pass - rx246_cur."!cursor_pass"(rx246_pos, "metachar:sym") - rx246_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx246_pos) + rx246_cur."!cursor_pass"(rx246_pos, "metachar:sym") + rx246_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx246_pos) .return (rx246_cur) rx246_fail: .annotate "line", 3 @@ -2847,16 +2902,16 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx246_done: rx246_cur."!cursor_fail"() - rx246_cur."!cursor_debug"("FAIL ", "metachar:sym") + rx246_cur."!cursor_debug"("FAIL ", "metachar:sym") .return (rx246_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym" :subid("78_1258208089.76063") :method +.sub "!PREFIX__metachar:sym" :subid("80_1258264421.2958") :method .annotate "line", 3 - $P248 = self."!PREFIX__!subrule"("backslash", "\\") + $P248 = self."!PREFIX__!subrule"("mod_internal", "") new $P249, "ResizablePMCArray" push $P249, $P248 .return ($P249) @@ -2864,7 +2919,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym" :subid("79_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<~>" :subid("81_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx251_tgt .local int rx251_pos @@ -2873,7 +2928,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx251_rep .local pmc rx251_cur (rx251_cur, rx251_pos, rx251_tgt, $I10) = self."!cursor_start"() - rx251_cur."!cursor_debug"("START ", "metachar:sym") + rx251_cur."!cursor_debug"("START ", "metachar:sym<~>") .lex unicode:"$\x{a2}", rx251_cur .local pmc match .lex "$/", match @@ -2883,17 +2938,58 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx251_off, $I10, 1 substr rx251_tgt, rx251_tgt, rx251_off rx251_start: -.annotate "line", 82 - # rx subrule "mod_internal" subtype=capture negate= +.annotate "line", 86 + # rx subcapture "sym" + set_addr $I10, rxcap_255_fail + rx251_cur."!mark_push"(0, rx251_pos, $I10) + # rx literal "~" + add $I11, rx251_pos, 1 + gt $I11, rx251_eos, rx251_fail + sub $I11, rx251_pos, rx251_off + substr $S10, rx251_tgt, $I11, 1 + ne $S10, "~", rx251_fail + add rx251_pos, 1 + set_addr $I10, rxcap_255_fail + ($I12, $I11) = rx251_cur."!mark_peek"($I10) + rx251_cur."!cursor_pos"($I11) + ($P10) = rx251_cur."!cursor_start"() + $P10."!cursor_pass"(rx251_pos, "") + rx251_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("sym") + goto rxcap_255_done + rxcap_255_fail: + goto rx251_fail + rxcap_255_done: +.annotate "line", 87 + # rx subrule "ws" subtype=method negate= + rx251_cur."!cursor_pos"(rx251_pos) + $P10 = rx251_cur."ws"() + unless $P10, rx251_fail + rx251_pos = $P10."pos"() + # rx subrule "quantified_atom" subtype=capture negate= rx251_cur."!cursor_pos"(rx251_pos) - $P10 = rx251_cur."mod_internal"() + $P10 = rx251_cur."quantified_atom"() unless $P10, rx251_fail rx251_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("mod_internal") + $P10."!cursor_names"("GOAL") + rx251_pos = $P10."pos"() +.annotate "line", 88 + # rx subrule "ws" subtype=method negate= + rx251_cur."!cursor_pos"(rx251_pos) + $P10 = rx251_cur."ws"() + unless $P10, rx251_fail + rx251_pos = $P10."pos"() + # rx subrule "quantified_atom" subtype=capture negate= + rx251_cur."!cursor_pos"(rx251_pos) + $P10 = rx251_cur."quantified_atom"() + unless $P10, rx251_fail + rx251_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("EXPR") rx251_pos = $P10."pos"() +.annotate "line", 85 # rx pass - rx251_cur."!cursor_pass"(rx251_pos, "metachar:sym") - rx251_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx251_pos) + rx251_cur."!cursor_pass"(rx251_pos, "metachar:sym<~>") + rx251_cur."!cursor_debug"("PASS ", "metachar:sym<~>", " at pos=", rx251_pos) .return (rx251_cur) rx251_fail: .annotate "line", 3 @@ -2903,16 +2999,16 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx251_done: rx251_cur."!cursor_fail"() - rx251_cur."!cursor_debug"("FAIL ", "metachar:sym") + rx251_cur."!cursor_debug"("FAIL ", "metachar:sym<~>") .return (rx251_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym" :subid("80_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<~>" :subid("82_1258264421.2958") :method .annotate "line", 3 - $P253 = self."!PREFIX__!subrule"("mod_internal", "") + $P253 = self."!PREFIX__!subrule"("", "~") new $P254, "ResizablePMCArray" push $P254, $P253 .return ($P254) @@ -2920,615 +3016,594 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<~>" :subid("81_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym<{*}>" :subid("83_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx256_tgt - .local int rx256_pos - .local int rx256_off - .local int rx256_eos - .local int rx256_rep - .local pmc rx256_cur - (rx256_cur, rx256_pos, rx256_tgt, $I10) = self."!cursor_start"() - rx256_cur."!cursor_debug"("START ", "metachar:sym<~>") - .lex unicode:"$\x{a2}", rx256_cur + .local string rx257_tgt + .local int rx257_pos + .local int rx257_off + .local int rx257_eos + .local int rx257_rep + .local pmc rx257_cur + (rx257_cur, rx257_pos, rx257_tgt, $I10) = self."!cursor_start"() + rx257_cur."!cursor_debug"("START ", "metachar:sym<{*}>") + rx257_cur."!cursor_caparray"("key") + .lex unicode:"$\x{a2}", rx257_cur .local pmc match .lex "$/", match - length rx256_eos, rx256_tgt - set rx256_off, 0 - lt $I10, 2, rx256_start - sub rx256_off, $I10, 1 - substr rx256_tgt, rx256_tgt, rx256_off - rx256_start: -.annotate "line", 86 + length rx257_eos, rx257_tgt + set rx257_off, 0 + lt $I10, 2, rx257_start + sub rx257_off, $I10, 1 + substr rx257_tgt, rx257_tgt, rx257_off + rx257_start: +.annotate "line", 92 # rx subcapture "sym" set_addr $I10, rxcap_260_fail - rx256_cur."!mark_push"(0, rx256_pos, $I10) - # rx literal "~" - add $I11, rx256_pos, 1 - gt $I11, rx256_eos, rx256_fail - sub $I11, rx256_pos, rx256_off - substr $S10, rx256_tgt, $I11, 1 - ne $S10, "~", rx256_fail - add rx256_pos, 1 + rx257_cur."!mark_push"(0, rx257_pos, $I10) + # rx literal "{*}" + add $I11, rx257_pos, 3 + gt $I11, rx257_eos, rx257_fail + sub $I11, rx257_pos, rx257_off + substr $S10, rx257_tgt, $I11, 3 + ne $S10, "{*}", rx257_fail + add rx257_pos, 3 set_addr $I10, rxcap_260_fail - ($I12, $I11) = rx256_cur."!mark_peek"($I10) - rx256_cur."!cursor_pos"($I11) - ($P10) = rx256_cur."!cursor_start"() - $P10."!cursor_pass"(rx256_pos, "") - rx256_cur."!mark_push"(0, -1, 0, $P10) + ($I12, $I11) = rx257_cur."!mark_peek"($I10) + rx257_cur."!cursor_pos"($I11) + ($P10) = rx257_cur."!cursor_start"() + $P10."!cursor_pass"(rx257_pos, "") + rx257_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") goto rxcap_260_done rxcap_260_fail: - goto rx256_fail + goto rx257_fail rxcap_260_done: -.annotate "line", 87 - # rx subrule "ws" subtype=method negate= - rx256_cur."!cursor_pos"(rx256_pos) - $P10 = rx256_cur."ws"() - unless $P10, rx256_fail - rx256_pos = $P10."pos"() - # rx subrule "quantified_atom" subtype=capture negate= - rx256_cur."!cursor_pos"(rx256_pos) - $P10 = rx256_cur."quantified_atom"() - unless $P10, rx256_fail - rx256_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("GOAL") - rx256_pos = $P10."pos"() -.annotate "line", 88 - # rx subrule "ws" subtype=method negate= - rx256_cur."!cursor_pos"(rx256_pos) - $P10 = rx256_cur."ws"() - unless $P10, rx256_fail - rx256_pos = $P10."pos"() - # rx subrule "quantified_atom" subtype=capture negate= - rx256_cur."!cursor_pos"(rx256_pos) - $P10 = rx256_cur."quantified_atom"() - unless $P10, rx256_fail - rx256_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("EXPR") - rx256_pos = $P10."pos"() -.annotate "line", 85 - # rx pass - rx256_cur."!cursor_pass"(rx256_pos, "metachar:sym<~>") - rx256_cur."!cursor_debug"("PASS ", "metachar:sym<~>", " at pos=", rx256_pos) - .return (rx256_cur) - rx256_fail: -.annotate "line", 3 - (rx256_rep, rx256_pos, $I10, $P10) = rx256_cur."!mark_fail"(0) - lt rx256_pos, -1, rx256_done - eq rx256_pos, -1, rx256_fail - jump $I10 - rx256_done: - rx256_cur."!cursor_fail"() - rx256_cur."!cursor_debug"("FAIL ", "metachar:sym<~>") - .return (rx256_cur) - .return () -.end - - -.namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<~>" :subid("82_1258208089.76063") :method -.annotate "line", 3 - $P258 = self."!PREFIX__!subrule"("", "~") - new $P259, "ResizablePMCArray" - push $P259, $P258 - .return ($P259) -.end - - -.namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym<{*}>" :subid("83_1258208089.76063") :method :outer("11_1258208089.76063") -.annotate "line", 3 - .local string rx262_tgt - .local int rx262_pos - .local int rx262_off - .local int rx262_eos - .local int rx262_rep - .local pmc rx262_cur - (rx262_cur, rx262_pos, rx262_tgt, $I10) = self."!cursor_start"() - rx262_cur."!cursor_debug"("START ", "metachar:sym<{*}>") - rx262_cur."!cursor_caparray"("key") - .lex unicode:"$\x{a2}", rx262_cur - .local pmc match - .lex "$/", match - length rx262_eos, rx262_tgt - set rx262_off, 0 - lt $I10, 2, rx262_start - sub rx262_off, $I10, 1 - substr rx262_tgt, rx262_tgt, rx262_off - rx262_start: -.annotate "line", 92 - # rx subcapture "sym" - set_addr $I10, rxcap_265_fail - rx262_cur."!mark_push"(0, rx262_pos, $I10) - # rx literal "{*}" - add $I11, rx262_pos, 3 - gt $I11, rx262_eos, rx262_fail - sub $I11, rx262_pos, rx262_off - substr $S10, rx262_tgt, $I11, 3 - ne $S10, "{*}", rx262_fail - add rx262_pos, 3 - set_addr $I10, rxcap_265_fail - ($I12, $I11) = rx262_cur."!mark_peek"($I10) - rx262_cur."!cursor_pos"($I11) - ($P10) = rx262_cur."!cursor_start"() - $P10."!cursor_pass"(rx262_pos, "") - rx262_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("sym") - goto rxcap_265_done - rxcap_265_fail: - goto rx262_fail - rxcap_265_done: .annotate "line", 93 - # rx rxquantr266 ** 0..1 - set_addr $I276, rxquantr266_done - rx262_cur."!mark_push"(0, rx262_pos, $I276) - rxquantr266_loop: - # rx rxquantr267 ** 0..* - set_addr $I268, rxquantr267_done - rx262_cur."!mark_push"(0, rx262_pos, $I268) - rxquantr267_loop: + # rx rxquantr261 ** 0..1 + set_addr $I271, rxquantr261_done + rx257_cur."!mark_push"(0, rx257_pos, $I271) + rxquantr261_loop: + # rx rxquantr262 ** 0..* + set_addr $I263, rxquantr262_done + rx257_cur."!mark_push"(0, rx257_pos, $I263) + rxquantr262_loop: # rx enumcharlist negate=0 - ge rx262_pos, rx262_eos, rx262_fail - sub $I10, rx262_pos, rx262_off - substr $S10, rx262_tgt, $I10, 1 + ge rx257_pos, rx257_eos, rx257_fail + sub $I10, rx257_pos, rx257_off + substr $S10, rx257_tgt, $I10, 1 index $I11, unicode:"\t \x{a0}\u1680\u180e\u2000\u2001\u2002\u2003\u2004\u2005\u2006\u2007\u2008\u2009\u200a\u202f\u205f\u3000", $S10 - lt $I11, 0, rx262_fail - inc rx262_pos - (rx262_rep) = rx262_cur."!mark_commit"($I268) - rx262_cur."!mark_push"(rx262_rep, rx262_pos, $I268) - goto rxquantr267_loop - rxquantr267_done: + lt $I11, 0, rx257_fail + inc rx257_pos + (rx257_rep) = rx257_cur."!mark_commit"($I263) + rx257_cur."!mark_push"(rx257_rep, rx257_pos, $I263) + goto rxquantr262_loop + rxquantr262_done: # rx literal "#= " - add $I11, rx262_pos, 3 - gt $I11, rx262_eos, rx262_fail - sub $I11, rx262_pos, rx262_off - substr $S10, rx262_tgt, $I11, 3 - ne $S10, "#= ", rx262_fail - add rx262_pos, 3 - # rx rxquantr269 ** 0..* - set_addr $I270, rxquantr269_done - rx262_cur."!mark_push"(0, rx262_pos, $I270) - rxquantr269_loop: + add $I11, rx257_pos, 3 + gt $I11, rx257_eos, rx257_fail + sub $I11, rx257_pos, rx257_off + substr $S10, rx257_tgt, $I11, 3 + ne $S10, "#= ", rx257_fail + add rx257_pos, 3 + # rx rxquantr264 ** 0..* + set_addr $I265, rxquantr264_done + rx257_cur."!mark_push"(0, rx257_pos, $I265) + rxquantr264_loop: # rx enumcharlist negate=0 - ge rx262_pos, rx262_eos, rx262_fail - sub $I10, rx262_pos, rx262_off - substr $S10, rx262_tgt, $I10, 1 + ge rx257_pos, rx257_eos, rx257_fail + sub $I10, rx257_pos, rx257_off + substr $S10, rx257_tgt, $I10, 1 index $I11, unicode:"\t \x{a0}\u1680\u180e\u2000\u2001\u2002\u2003\u2004\u2005\u2006\u2007\u2008\u2009\u200a\u202f\u205f\u3000", $S10 - lt $I11, 0, rx262_fail - inc rx262_pos - (rx262_rep) = rx262_cur."!mark_commit"($I270) - rx262_cur."!mark_push"(rx262_rep, rx262_pos, $I270) - goto rxquantr269_loop - rxquantr269_done: + lt $I11, 0, rx257_fail + inc rx257_pos + (rx257_rep) = rx257_cur."!mark_commit"($I265) + rx257_cur."!mark_push"(rx257_rep, rx257_pos, $I265) + goto rxquantr264_loop + rxquantr264_done: # rx subcapture "key" - set_addr $I10, rxcap_275_fail - rx262_cur."!mark_push"(0, rx262_pos, $I10) + set_addr $I10, rxcap_270_fail + rx257_cur."!mark_push"(0, rx257_pos, $I10) # rx charclass_q S r 1..-1 - sub $I10, rx262_pos, rx262_off - find_cclass $I11, 32, rx262_tgt, $I10, rx262_eos + sub $I10, rx257_pos, rx257_off + find_cclass $I11, 32, rx257_tgt, $I10, rx257_eos add $I12, $I10, 1 - lt $I11, $I12, rx262_fail - add rx262_pos, rx262_off, $I11 - # rx rxquantr271 ** 0..* - set_addr $I274, rxquantr271_done - rx262_cur."!mark_push"(0, rx262_pos, $I274) - rxquantr271_loop: - # rx rxquantr272 ** 1..* - set_addr $I273, rxquantr272_done - rx262_cur."!mark_push"(0, -1, $I273) - rxquantr272_loop: + lt $I11, $I12, rx257_fail + add rx257_pos, rx257_off, $I11 + # rx rxquantr266 ** 0..* + set_addr $I269, rxquantr266_done + rx257_cur."!mark_push"(0, rx257_pos, $I269) + rxquantr266_loop: + # rx rxquantr267 ** 1..* + set_addr $I268, rxquantr267_done + rx257_cur."!mark_push"(0, -1, $I268) + rxquantr267_loop: # rx enumcharlist negate=0 - ge rx262_pos, rx262_eos, rx262_fail - sub $I10, rx262_pos, rx262_off - substr $S10, rx262_tgt, $I10, 1 + ge rx257_pos, rx257_eos, rx257_fail + sub $I10, rx257_pos, rx257_off + substr $S10, rx257_tgt, $I10, 1 index $I11, unicode:"\t \x{a0}\u1680\u180e\u2000\u2001\u2002\u2003\u2004\u2005\u2006\u2007\u2008\u2009\u200a\u202f\u205f\u3000", $S10 - lt $I11, 0, rx262_fail - inc rx262_pos - (rx262_rep) = rx262_cur."!mark_commit"($I273) - rx262_cur."!mark_push"(rx262_rep, rx262_pos, $I273) - goto rxquantr272_loop - rxquantr272_done: + lt $I11, 0, rx257_fail + inc rx257_pos + (rx257_rep) = rx257_cur."!mark_commit"($I268) + rx257_cur."!mark_push"(rx257_rep, rx257_pos, $I268) + goto rxquantr267_loop + rxquantr267_done: # rx charclass_q S r 1..-1 - sub $I10, rx262_pos, rx262_off - find_cclass $I11, 32, rx262_tgt, $I10, rx262_eos + sub $I10, rx257_pos, rx257_off + find_cclass $I11, 32, rx257_tgt, $I10, rx257_eos add $I12, $I10, 1 - lt $I11, $I12, rx262_fail - add rx262_pos, rx262_off, $I11 - (rx262_rep) = rx262_cur."!mark_commit"($I274) - rx262_cur."!mark_push"(rx262_rep, rx262_pos, $I274) - goto rxquantr271_loop - rxquantr271_done: - set_addr $I10, rxcap_275_fail - ($I12, $I11) = rx262_cur."!mark_peek"($I10) - rx262_cur."!cursor_pos"($I11) - ($P10) = rx262_cur."!cursor_start"() - $P10."!cursor_pass"(rx262_pos, "") - rx262_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("key") - goto rxcap_275_done - rxcap_275_fail: - goto rx262_fail - rxcap_275_done: - (rx262_rep) = rx262_cur."!mark_commit"($I276) + lt $I11, $I12, rx257_fail + add rx257_pos, rx257_off, $I11 + (rx257_rep) = rx257_cur."!mark_commit"($I269) + rx257_cur."!mark_push"(rx257_rep, rx257_pos, $I269) + goto rxquantr266_loop rxquantr266_done: + set_addr $I10, rxcap_270_fail + ($I12, $I11) = rx257_cur."!mark_peek"($I10) + rx257_cur."!cursor_pos"($I11) + ($P10) = rx257_cur."!cursor_start"() + $P10."!cursor_pass"(rx257_pos, "") + rx257_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("key") + goto rxcap_270_done + rxcap_270_fail: + goto rx257_fail + rxcap_270_done: + (rx257_rep) = rx257_cur."!mark_commit"($I271) + rxquantr261_done: .annotate "line", 91 # rx pass - rx262_cur."!cursor_pass"(rx262_pos, "metachar:sym<{*}>") - rx262_cur."!cursor_debug"("PASS ", "metachar:sym<{*}>", " at pos=", rx262_pos) - .return (rx262_cur) - rx262_fail: -.annotate "line", 3 - (rx262_rep, rx262_pos, $I10, $P10) = rx262_cur."!mark_fail"(0) - lt rx262_pos, -1, rx262_done - eq rx262_pos, -1, rx262_fail + rx257_cur."!cursor_pass"(rx257_pos, "metachar:sym<{*}>") + rx257_cur."!cursor_debug"("PASS ", "metachar:sym<{*}>", " at pos=", rx257_pos) + .return (rx257_cur) + rx257_fail: +.annotate "line", 3 + (rx257_rep, rx257_pos, $I10, $P10) = rx257_cur."!mark_fail"(0) + lt rx257_pos, -1, rx257_done + eq rx257_pos, -1, rx257_fail jump $I10 - rx262_done: - rx262_cur."!cursor_fail"() - rx262_cur."!cursor_debug"("FAIL ", "metachar:sym<{*}>") - .return (rx262_cur) + rx257_done: + rx257_cur."!cursor_fail"() + rx257_cur."!cursor_debug"("FAIL ", "metachar:sym<{*}>") + .return (rx257_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym<{*}>" :subid("84_1258208089.76063") :method +.sub "!PREFIX__metachar:sym<{*}>" :subid("84_1258264421.2958") :method .annotate "line", 3 - new $P264, "ResizablePMCArray" - push $P264, "{*}" - .return ($P264) + new $P259, "ResizablePMCArray" + push $P259, "{*}" + .return ($P259) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym" :subid("85_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym" :subid("85_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx278_tgt - .local int rx278_pos - .local int rx278_off - .local int rx278_eos - .local int rx278_rep - .local pmc rx278_cur - (rx278_cur, rx278_pos, rx278_tgt, $I10) = self."!cursor_start"() - rx278_cur."!cursor_debug"("START ", "metachar:sym") - .lex unicode:"$\x{a2}", rx278_cur + .local string rx273_tgt + .local int rx273_pos + .local int rx273_off + .local int rx273_eos + .local int rx273_rep + .local pmc rx273_cur + (rx273_cur, rx273_pos, rx273_tgt, $I10) = self."!cursor_start"() + rx273_cur."!cursor_debug"("START ", "metachar:sym") + .lex unicode:"$\x{a2}", rx273_cur .local pmc match .lex "$/", match - length rx278_eos, rx278_tgt - set rx278_off, 0 - lt $I10, 2, rx278_start - sub rx278_off, $I10, 1 - substr rx278_tgt, rx278_tgt, rx278_off - rx278_start: + length rx273_eos, rx273_tgt + set rx273_off, 0 + lt $I10, 2, rx273_start + sub rx273_off, $I10, 1 + substr rx273_tgt, rx273_tgt, rx273_off + rx273_start: .annotate "line", 96 # rx literal "<" - add $I11, rx278_pos, 1 - gt $I11, rx278_eos, rx278_fail - sub $I11, rx278_pos, rx278_off - substr $S10, rx278_tgt, $I11, 1 - ne $S10, "<", rx278_fail - add rx278_pos, 1 + add $I11, rx273_pos, 1 + gt $I11, rx273_eos, rx273_fail + sub $I11, rx273_pos, rx273_off + substr $S10, rx273_tgt, $I11, 1 + ne $S10, "<", rx273_fail + add rx273_pos, 1 # rx subrule "assertion" subtype=capture negate= - rx278_cur."!cursor_pos"(rx278_pos) - $P10 = rx278_cur."assertion"() - unless $P10, rx278_fail - rx278_cur."!mark_push"(0, -1, 0, $P10) + rx273_cur."!cursor_pos"(rx273_pos) + $P10 = rx273_cur."assertion"() + unless $P10, rx273_fail + rx273_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("assertion") - rx278_pos = $P10."pos"() - alt282_0: + rx273_pos = $P10."pos"() + alt277_0: .annotate "line", 97 - set_addr $I10, alt282_1 - rx278_cur."!mark_push"(0, rx278_pos, $I10) + set_addr $I10, alt277_1 + rx273_cur."!mark_push"(0, rx273_pos, $I10) # rx literal ">" - add $I11, rx278_pos, 1 - gt $I11, rx278_eos, rx278_fail - sub $I11, rx278_pos, rx278_off - substr $S10, rx278_tgt, $I11, 1 - ne $S10, ">", rx278_fail - add rx278_pos, 1 - goto alt282_end - alt282_1: + add $I11, rx273_pos, 1 + gt $I11, rx273_eos, rx273_fail + sub $I11, rx273_pos, rx273_off + substr $S10, rx273_tgt, $I11, 1 + ne $S10, ">", rx273_fail + add rx273_pos, 1 + goto alt277_end + alt277_1: # rx subrule "panic" subtype=method negate= - rx278_cur."!cursor_pos"(rx278_pos) - $P10 = rx278_cur."panic"("regex assertion not terminated by angle bracket") - unless $P10, rx278_fail - rx278_pos = $P10."pos"() - alt282_end: + rx273_cur."!cursor_pos"(rx273_pos) + $P10 = rx273_cur."panic"("regex assertion not terminated by angle bracket") + unless $P10, rx273_fail + rx273_pos = $P10."pos"() + alt277_end: .annotate "line", 95 # rx pass - rx278_cur."!cursor_pass"(rx278_pos, "metachar:sym") - rx278_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx278_pos) - .return (rx278_cur) - rx278_fail: -.annotate "line", 3 - (rx278_rep, rx278_pos, $I10, $P10) = rx278_cur."!mark_fail"(0) - lt rx278_pos, -1, rx278_done - eq rx278_pos, -1, rx278_fail + rx273_cur."!cursor_pass"(rx273_pos, "metachar:sym") + rx273_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx273_pos) + .return (rx273_cur) + rx273_fail: +.annotate "line", 3 + (rx273_rep, rx273_pos, $I10, $P10) = rx273_cur."!mark_fail"(0) + lt rx273_pos, -1, rx273_done + eq rx273_pos, -1, rx273_fail jump $I10 - rx278_done: - rx278_cur."!cursor_fail"() - rx278_cur."!cursor_debug"("FAIL ", "metachar:sym") - .return (rx278_cur) + rx273_done: + rx273_cur."!cursor_fail"() + rx273_cur."!cursor_debug"("FAIL ", "metachar:sym") + .return (rx273_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym" :subid("86_1258208089.76063") :method +.sub "!PREFIX__metachar:sym" :subid("86_1258264421.2958") :method .annotate "line", 3 - $P280 = self."!PREFIX__!subrule"("assertion", "<") - new $P281, "ResizablePMCArray" - push $P281, $P280 - .return ($P281) + $P275 = self."!PREFIX__!subrule"("assertion", "<") + new $P276, "ResizablePMCArray" + push $P276, $P275 + .return ($P276) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym" :subid("87_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym" :subid("87_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx284_tgt - .local int rx284_pos - .local int rx284_off - .local int rx284_eos - .local int rx284_rep - .local pmc rx284_cur - (rx284_cur, rx284_pos, rx284_tgt, $I10) = self."!cursor_start"() - rx284_cur."!cursor_debug"("START ", "metachar:sym") - rx284_cur."!cursor_caparray"("quantified_atom") - .lex unicode:"$\x{a2}", rx284_cur + .local string rx279_tgt + .local int rx279_pos + .local int rx279_off + .local int rx279_eos + .local int rx279_rep + .local pmc rx279_cur + (rx279_cur, rx279_pos, rx279_tgt, $I10) = self."!cursor_start"() + rx279_cur."!cursor_debug"("START ", "metachar:sym") + rx279_cur."!cursor_caparray"("quantified_atom") + .lex unicode:"$\x{a2}", rx279_cur .local pmc match .lex "$/", match - length rx284_eos, rx284_tgt - set rx284_off, 0 - lt $I10, 2, rx284_start - sub rx284_off, $I10, 1 - substr rx284_tgt, rx284_tgt, rx284_off - rx284_start: - alt287_0: + length rx279_eos, rx279_tgt + set rx279_off, 0 + lt $I10, 2, rx279_start + sub rx279_off, $I10, 1 + substr rx279_tgt, rx279_tgt, rx279_off + rx279_start: + alt282_0: .annotate "line", 101 - set_addr $I10, alt287_1 - rx284_cur."!mark_push"(0, rx284_pos, $I10) + set_addr $I10, alt282_1 + rx279_cur."!mark_push"(0, rx279_pos, $I10) .annotate "line", 102 # rx literal "$<" - add $I11, rx284_pos, 2 - gt $I11, rx284_eos, rx284_fail - sub $I11, rx284_pos, rx284_off - substr $S10, rx284_tgt, $I11, 2 - ne $S10, "$<", rx284_fail - add rx284_pos, 2 + add $I11, rx279_pos, 2 + gt $I11, rx279_eos, rx279_fail + sub $I11, rx279_pos, rx279_off + substr $S10, rx279_tgt, $I11, 2 + ne $S10, "$<", rx279_fail + add rx279_pos, 2 # rx subcapture "name" - set_addr $I10, rxcap_290_fail - rx284_cur."!mark_push"(0, rx284_pos, $I10) - # rx rxquantr288 ** 1..* - set_addr $I289, rxquantr288_done - rx284_cur."!mark_push"(0, -1, $I289) - rxquantr288_loop: + set_addr $I10, rxcap_285_fail + rx279_cur."!mark_push"(0, rx279_pos, $I10) + # rx rxquantr283 ** 1..* + set_addr $I284, rxquantr283_done + rx279_cur."!mark_push"(0, -1, $I284) + rxquantr283_loop: # rx enumcharlist negate=1 - ge rx284_pos, rx284_eos, rx284_fail - sub $I10, rx284_pos, rx284_off - substr $S10, rx284_tgt, $I10, 1 + ge rx279_pos, rx279_eos, rx279_fail + sub $I10, rx279_pos, rx279_off + substr $S10, rx279_tgt, $I10, 1 index $I11, ">", $S10 - ge $I11, 0, rx284_fail - inc rx284_pos - (rx284_rep) = rx284_cur."!mark_commit"($I289) - rx284_cur."!mark_push"(rx284_rep, rx284_pos, $I289) - goto rxquantr288_loop - rxquantr288_done: - set_addr $I10, rxcap_290_fail - ($I12, $I11) = rx284_cur."!mark_peek"($I10) - rx284_cur."!cursor_pos"($I11) - ($P10) = rx284_cur."!cursor_start"() - $P10."!cursor_pass"(rx284_pos, "") - rx284_cur."!mark_push"(0, -1, 0, $P10) + ge $I11, 0, rx279_fail + inc rx279_pos + (rx279_rep) = rx279_cur."!mark_commit"($I284) + rx279_cur."!mark_push"(rx279_rep, rx279_pos, $I284) + goto rxquantr283_loop + rxquantr283_done: + set_addr $I10, rxcap_285_fail + ($I12, $I11) = rx279_cur."!mark_peek"($I10) + rx279_cur."!cursor_pos"($I11) + ($P10) = rx279_cur."!cursor_start"() + $P10."!cursor_pass"(rx279_pos, "") + rx279_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("name") - goto rxcap_290_done - rxcap_290_fail: - goto rx284_fail - rxcap_290_done: + goto rxcap_285_done + rxcap_285_fail: + goto rx279_fail + rxcap_285_done: # rx literal ">" - add $I11, rx284_pos, 1 - gt $I11, rx284_eos, rx284_fail - sub $I11, rx284_pos, rx284_off - substr $S10, rx284_tgt, $I11, 1 - ne $S10, ">", rx284_fail - add rx284_pos, 1 - goto alt287_end - alt287_1: + add $I11, rx279_pos, 1 + gt $I11, rx279_eos, rx279_fail + sub $I11, rx279_pos, rx279_off + substr $S10, rx279_tgt, $I11, 1 + ne $S10, ">", rx279_fail + add rx279_pos, 1 + goto alt282_end + alt282_1: .annotate "line", 103 # rx literal "$" - add $I11, rx284_pos, 1 - gt $I11, rx284_eos, rx284_fail - sub $I11, rx284_pos, rx284_off - substr $S10, rx284_tgt, $I11, 1 - ne $S10, "$", rx284_fail - add rx284_pos, 1 + add $I11, rx279_pos, 1 + gt $I11, rx279_eos, rx279_fail + sub $I11, rx279_pos, rx279_off + substr $S10, rx279_tgt, $I11, 1 + ne $S10, "$", rx279_fail + add rx279_pos, 1 # rx subcapture "pos" - set_addr $I10, rxcap_291_fail - rx284_cur."!mark_push"(0, rx284_pos, $I10) + set_addr $I10, rxcap_286_fail + rx279_cur."!mark_push"(0, rx279_pos, $I10) # rx charclass_q d r 1..-1 - sub $I10, rx284_pos, rx284_off - find_not_cclass $I11, 8, rx284_tgt, $I10, rx284_eos + sub $I10, rx279_pos, rx279_off + find_not_cclass $I11, 8, rx279_tgt, $I10, rx279_eos add $I12, $I10, 1 - lt $I11, $I12, rx284_fail - add rx284_pos, rx284_off, $I11 - set_addr $I10, rxcap_291_fail - ($I12, $I11) = rx284_cur."!mark_peek"($I10) - rx284_cur."!cursor_pos"($I11) - ($P10) = rx284_cur."!cursor_start"() - $P10."!cursor_pass"(rx284_pos, "") - rx284_cur."!mark_push"(0, -1, 0, $P10) + lt $I11, $I12, rx279_fail + add rx279_pos, rx279_off, $I11 + set_addr $I10, rxcap_286_fail + ($I12, $I11) = rx279_cur."!mark_peek"($I10) + rx279_cur."!cursor_pos"($I11) + ($P10) = rx279_cur."!cursor_start"() + $P10."!cursor_pass"(rx279_pos, "") + rx279_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("pos") - goto rxcap_291_done - rxcap_291_fail: - goto rx284_fail - rxcap_291_done: - alt287_end: + goto rxcap_286_done + rxcap_286_fail: + goto rx279_fail + rxcap_286_done: + alt282_end: .annotate "line", 106 - # rx rxquantr292 ** 0..1 - set_addr $I293, rxquantr292_done - rx284_cur."!mark_push"(0, rx284_pos, $I293) - rxquantr292_loop: + # rx rxquantr287 ** 0..1 + set_addr $I288, rxquantr287_done + rx279_cur."!mark_push"(0, rx279_pos, $I288) + rxquantr287_loop: # rx subrule "ws" subtype=method negate= - rx284_cur."!cursor_pos"(rx284_pos) - $P10 = rx284_cur."ws"() - unless $P10, rx284_fail - rx284_pos = $P10."pos"() + rx279_cur."!cursor_pos"(rx279_pos) + $P10 = rx279_cur."ws"() + unless $P10, rx279_fail + rx279_pos = $P10."pos"() # rx literal "=" - add $I11, rx284_pos, 1 - gt $I11, rx284_eos, rx284_fail - sub $I11, rx284_pos, rx284_off - substr $S10, rx284_tgt, $I11, 1 - ne $S10, "=", rx284_fail - add rx284_pos, 1 + add $I11, rx279_pos, 1 + gt $I11, rx279_eos, rx279_fail + sub $I11, rx279_pos, rx279_off + substr $S10, rx279_tgt, $I11, 1 + ne $S10, "=", rx279_fail + add rx279_pos, 1 # rx subrule "ws" subtype=method negate= - rx284_cur."!cursor_pos"(rx284_pos) - $P10 = rx284_cur."ws"() - unless $P10, rx284_fail - rx284_pos = $P10."pos"() + rx279_cur."!cursor_pos"(rx279_pos) + $P10 = rx279_cur."ws"() + unless $P10, rx279_fail + rx279_pos = $P10."pos"() # rx subrule "quantified_atom" subtype=capture negate= - rx284_cur."!cursor_pos"(rx284_pos) - $P10 = rx284_cur."quantified_atom"() - unless $P10, rx284_fail - rx284_cur."!mark_push"(0, -1, 0, $P10) + rx279_cur."!cursor_pos"(rx279_pos) + $P10 = rx279_cur."quantified_atom"() + unless $P10, rx279_fail + rx279_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("quantified_atom") - rx284_pos = $P10."pos"() - (rx284_rep) = rx284_cur."!mark_commit"($I293) - rxquantr292_done: + rx279_pos = $P10."pos"() + (rx279_rep) = rx279_cur."!mark_commit"($I288) + rxquantr287_done: .annotate "line", 100 # rx pass - rx284_cur."!cursor_pass"(rx284_pos, "metachar:sym") - rx284_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx284_pos) - .return (rx284_cur) - rx284_fail: -.annotate "line", 3 - (rx284_rep, rx284_pos, $I10, $P10) = rx284_cur."!mark_fail"(0) - lt rx284_pos, -1, rx284_done - eq rx284_pos, -1, rx284_fail + rx279_cur."!cursor_pass"(rx279_pos, "metachar:sym") + rx279_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx279_pos) + .return (rx279_cur) + rx279_fail: +.annotate "line", 3 + (rx279_rep, rx279_pos, $I10, $P10) = rx279_cur."!mark_fail"(0) + lt rx279_pos, -1, rx279_done + eq rx279_pos, -1, rx279_fail jump $I10 - rx284_done: - rx284_cur."!cursor_fail"() - rx284_cur."!cursor_debug"("FAIL ", "metachar:sym") - .return (rx284_cur) + rx279_done: + rx279_cur."!cursor_fail"() + rx279_cur."!cursor_debug"("FAIL ", "metachar:sym") + .return (rx279_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym" :subid("88_1258208089.76063") :method +.sub "!PREFIX__metachar:sym" :subid("88_1258264421.2958") :method .annotate "line", 3 - new $P286, "ResizablePMCArray" - push $P286, "$" - push $P286, "$<" - .return ($P286) + new $P281, "ResizablePMCArray" + push $P281, "$" + push $P281, "$<" + .return ($P281) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "metachar:sym" :subid("89_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "metachar:sym" :subid("89_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx295_tgt - .local int rx295_pos - .local int rx295_off - .local int rx295_eos - .local int rx295_rep - .local pmc rx295_cur - (rx295_cur, rx295_pos, rx295_tgt, $I10) = self."!cursor_start"() - rx295_cur."!cursor_debug"("START ", "metachar:sym") - .lex unicode:"$\x{a2}", rx295_cur + .local string rx290_tgt + .local int rx290_pos + .local int rx290_off + .local int rx290_eos + .local int rx290_rep + .local pmc rx290_cur + (rx290_cur, rx290_pos, rx290_tgt, $I10) = self."!cursor_start"() + rx290_cur."!cursor_debug"("START ", "metachar:sym") + .lex unicode:"$\x{a2}", rx290_cur .local pmc match .lex "$/", match - length rx295_eos, rx295_tgt - set rx295_off, 0 - lt $I10, 2, rx295_start - sub rx295_off, $I10, 1 - substr rx295_tgt, rx295_tgt, rx295_off - rx295_start: + length rx290_eos, rx290_tgt + set rx290_off, 0 + lt $I10, 2, rx290_start + sub rx290_off, $I10, 1 + substr rx290_tgt, rx290_tgt, rx290_off + rx290_start: .annotate "line", 110 # rx literal ":PIR{{" - add $I11, rx295_pos, 6 - gt $I11, rx295_eos, rx295_fail - sub $I11, rx295_pos, rx295_off - substr $S10, rx295_tgt, $I11, 6 - ne $S10, ":PIR{{", rx295_fail - add rx295_pos, 6 + add $I11, rx290_pos, 6 + gt $I11, rx290_eos, rx290_fail + sub $I11, rx290_pos, rx290_off + substr $S10, rx290_tgt, $I11, 6 + ne $S10, ":PIR{{", rx290_fail + add rx290_pos, 6 # rx subcapture "pir" - set_addr $I10, rxcap_300_fail - rx295_cur."!mark_push"(0, rx295_pos, $I10) - # rx rxquantf298 ** 0..* - set_addr $I10, rxquantf298_loop - rx295_cur."!mark_push"(0, rx295_pos, $I10) - goto rxquantf298_done - rxquantf298_loop: + set_addr $I10, rxcap_295_fail + rx290_cur."!mark_push"(0, rx290_pos, $I10) + # rx rxquantf293 ** 0..* + set_addr $I10, rxquantf293_loop + rx290_cur."!mark_push"(0, rx290_pos, $I10) + goto rxquantf293_done + rxquantf293_loop: # rx charclass . - ge rx295_pos, rx295_eos, rx295_fail - inc rx295_pos - set_addr $I10, rxquantf298_loop - rx295_cur."!mark_push"($I299, rx295_pos, $I10) - rxquantf298_done: - set_addr $I10, rxcap_300_fail - ($I12, $I11) = rx295_cur."!mark_peek"($I10) - rx295_cur."!cursor_pos"($I11) - ($P10) = rx295_cur."!cursor_start"() - $P10."!cursor_pass"(rx295_pos, "") - rx295_cur."!mark_push"(0, -1, 0, $P10) + ge rx290_pos, rx290_eos, rx290_fail + inc rx290_pos + set_addr $I10, rxquantf293_loop + rx290_cur."!mark_push"($I294, rx290_pos, $I10) + rxquantf293_done: + set_addr $I10, rxcap_295_fail + ($I12, $I11) = rx290_cur."!mark_peek"($I10) + rx290_cur."!cursor_pos"($I11) + ($P10) = rx290_cur."!cursor_start"() + $P10."!cursor_pass"(rx290_pos, "") + rx290_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("pir") - goto rxcap_300_done - rxcap_300_fail: - goto rx295_fail - rxcap_300_done: + goto rxcap_295_done + rxcap_295_fail: + goto rx290_fail + rxcap_295_done: # rx literal "}}" - add $I11, rx295_pos, 2 - gt $I11, rx295_eos, rx295_fail - sub $I11, rx295_pos, rx295_off - substr $S10, rx295_tgt, $I11, 2 - ne $S10, "}}", rx295_fail - add rx295_pos, 2 + add $I11, rx290_pos, 2 + gt $I11, rx290_eos, rx290_fail + sub $I11, rx290_pos, rx290_off + substr $S10, rx290_tgt, $I11, 2 + ne $S10, "}}", rx290_fail + add rx290_pos, 2 .annotate "line", 109 # rx pass - rx295_cur."!cursor_pass"(rx295_pos, "metachar:sym") - rx295_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx295_pos) - .return (rx295_cur) - rx295_fail: -.annotate "line", 3 - (rx295_rep, rx295_pos, $I10, $P10) = rx295_cur."!mark_fail"(0) - lt rx295_pos, -1, rx295_done - eq rx295_pos, -1, rx295_fail + rx290_cur."!cursor_pass"(rx290_pos, "metachar:sym") + rx290_cur."!cursor_debug"("PASS ", "metachar:sym", " at pos=", rx290_pos) + .return (rx290_cur) + rx290_fail: +.annotate "line", 3 + (rx290_rep, rx290_pos, $I10, $P10) = rx290_cur."!mark_fail"(0) + lt rx290_pos, -1, rx290_done + eq rx290_pos, -1, rx290_fail jump $I10 - rx295_done: - rx295_cur."!cursor_fail"() - rx295_cur."!cursor_debug"("FAIL ", "metachar:sym") - .return (rx295_cur) + rx290_done: + rx290_cur."!cursor_fail"() + rx290_cur."!cursor_debug"("FAIL ", "metachar:sym") + .return (rx290_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__metachar:sym" :subid("90_1258208089.76063") :method +.sub "!PREFIX__metachar:sym" :subid("90_1258264421.2958") :method .annotate "line", 3 - new $P297, "ResizablePMCArray" - push $P297, ":PIR{{" - .return ($P297) + new $P292, "ResizablePMCArray" + push $P292, ":PIR{{" + .return ($P292) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash" :subid("91_1258208089.76063") :method +.sub "backslash" :subid("91_1258264421.2958") :method .annotate "line", 113 - $P302 = self."!protoregex"("backslash") - .return ($P302) + $P297 = self."!protoregex"("backslash") + .return ($P297) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash" :subid("92_1258208089.76063") :method +.sub "!PREFIX__backslash" :subid("92_1258264421.2958") :method .annotate "line", 113 - $P304 = self."!PREFIX__!protoregex"("backslash") - .return ($P304) + $P299 = self."!PREFIX__!protoregex"("backslash") + .return ($P299) +.end + + +.namespace ["Regex";"P6Regex";"Grammar"] +.sub "backslash:sym" :subid("93_1258264421.2958") :method :outer("11_1258264421.2958") +.annotate "line", 3 + .local string rx301_tgt + .local int rx301_pos + .local int rx301_off + .local int rx301_eos + .local int rx301_rep + .local pmc rx301_cur + (rx301_cur, rx301_pos, rx301_tgt, $I10) = self."!cursor_start"() + rx301_cur."!cursor_debug"("START ", "backslash:sym") + .lex unicode:"$\x{a2}", rx301_cur + .local pmc match + .lex "$/", match + length rx301_eos, rx301_tgt + set rx301_off, 0 + lt $I10, 2, rx301_start + sub rx301_off, $I10, 1 + substr rx301_tgt, rx301_tgt, rx301_off + rx301_start: +.annotate "line", 114 + # rx subcapture "sym" + set_addr $I10, rxcap_304_fail + rx301_cur."!mark_push"(0, rx301_pos, $I10) + # rx enumcharlist negate=0 + ge rx301_pos, rx301_eos, rx301_fail + sub $I10, rx301_pos, rx301_off + substr $S10, rx301_tgt, $I10, 1 + index $I11, "dswnDSWN", $S10 + lt $I11, 0, rx301_fail + inc rx301_pos + set_addr $I10, rxcap_304_fail + ($I12, $I11) = rx301_cur."!mark_peek"($I10) + rx301_cur."!cursor_pos"($I11) + ($P10) = rx301_cur."!cursor_start"() + $P10."!cursor_pass"(rx301_pos, "") + rx301_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("sym") + goto rxcap_304_done + rxcap_304_fail: + goto rx301_fail + rxcap_304_done: + # rx pass + rx301_cur."!cursor_pass"(rx301_pos, "backslash:sym") + rx301_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx301_pos) + .return (rx301_cur) + rx301_fail: +.annotate "line", 3 + (rx301_rep, rx301_pos, $I10, $P10) = rx301_cur."!mark_fail"(0) + lt rx301_pos, -1, rx301_done + eq rx301_pos, -1, rx301_fail + jump $I10 + rx301_done: + rx301_cur."!cursor_fail"() + rx301_cur."!cursor_debug"("FAIL ", "backslash:sym") + .return (rx301_cur) + .return () +.end + + +.namespace ["Regex";"P6Regex";"Grammar"] +.sub "!PREFIX__backslash:sym" :subid("94_1258264421.2958") :method +.annotate "line", 3 + new $P303, "ResizablePMCArray" + push $P303, "N" + push $P303, "W" + push $P303, "S" + push $P303, "D" + push $P303, "n" + push $P303, "w" + push $P303, "s" + push $P303, "d" + .return ($P303) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("93_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("95_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx306_tgt .local int rx306_pos @@ -3537,7 +3612,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx306_rep .local pmc rx306_cur (rx306_cur, rx306_pos, rx306_tgt, $I10) = self."!cursor_start"() - rx306_cur."!cursor_debug"("START ", "backslash:sym") + rx306_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx306_cur .local pmc match .lex "$/", match @@ -3547,7 +3622,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx306_off, $I10, 1 substr rx306_tgt, rx306_tgt, rx306_off rx306_start: -.annotate "line", 114 +.annotate "line", 115 # rx subcapture "sym" set_addr $I10, rxcap_309_fail rx306_cur."!mark_push"(0, rx306_pos, $I10) @@ -3555,7 +3630,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes ge rx306_pos, rx306_eos, rx306_fail sub $I10, rx306_pos, rx306_off substr $S10, rx306_tgt, $I10, 1 - index $I11, "dswnDSWN", $S10 + index $I11, "bB", $S10 lt $I11, 0, rx306_fail inc rx306_pos set_addr $I10, rxcap_309_fail @@ -3570,8 +3645,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx306_fail rxcap_309_done: # rx pass - rx306_cur."!cursor_pass"(rx306_pos, "backslash:sym") - rx306_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx306_pos) + rx306_cur."!cursor_pass"(rx306_pos, "backslash:sym") + rx306_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx306_pos) .return (rx306_cur) rx306_fail: .annotate "line", 3 @@ -3581,30 +3656,24 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx306_done: rx306_cur."!cursor_fail"() - rx306_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx306_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx306_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("94_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("96_1258264421.2958") :method .annotate "line", 3 new $P308, "ResizablePMCArray" - push $P308, "N" - push $P308, "W" - push $P308, "S" - push $P308, "D" - push $P308, "n" - push $P308, "w" - push $P308, "s" - push $P308, "d" + push $P308, "B" + push $P308, "b" .return ($P308) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("95_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("97_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx311_tgt .local int rx311_pos @@ -3613,7 +3682,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx311_rep .local pmc rx311_cur (rx311_cur, rx311_pos, rx311_tgt, $I10) = self."!cursor_start"() - rx311_cur."!cursor_debug"("START ", "backslash:sym") + rx311_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx311_cur .local pmc match .lex "$/", match @@ -3623,7 +3692,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx311_off, $I10, 1 substr rx311_tgt, rx311_tgt, rx311_off rx311_start: -.annotate "line", 115 +.annotate "line", 116 # rx subcapture "sym" set_addr $I10, rxcap_314_fail rx311_cur."!mark_push"(0, rx311_pos, $I10) @@ -3631,7 +3700,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes ge rx311_pos, rx311_eos, rx311_fail sub $I10, rx311_pos, rx311_off substr $S10, rx311_tgt, $I10, 1 - index $I11, "bB", $S10 + index $I11, "eE", $S10 lt $I11, 0, rx311_fail inc rx311_pos set_addr $I10, rxcap_314_fail @@ -3646,8 +3715,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx311_fail rxcap_314_done: # rx pass - rx311_cur."!cursor_pass"(rx311_pos, "backslash:sym") - rx311_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx311_pos) + rx311_cur."!cursor_pass"(rx311_pos, "backslash:sym") + rx311_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx311_pos) .return (rx311_cur) rx311_fail: .annotate "line", 3 @@ -3657,24 +3726,24 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx311_done: rx311_cur."!cursor_fail"() - rx311_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx311_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx311_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("96_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("98_1258264421.2958") :method .annotate "line", 3 new $P313, "ResizablePMCArray" - push $P313, "B" - push $P313, "b" + push $P313, "E" + push $P313, "e" .return ($P313) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("97_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("99_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx316_tgt .local int rx316_pos @@ -3683,7 +3752,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx316_rep .local pmc rx316_cur (rx316_cur, rx316_pos, rx316_tgt, $I10) = self."!cursor_start"() - rx316_cur."!cursor_debug"("START ", "backslash:sym") + rx316_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx316_cur .local pmc match .lex "$/", match @@ -3693,7 +3762,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx316_off, $I10, 1 substr rx316_tgt, rx316_tgt, rx316_off rx316_start: -.annotate "line", 116 +.annotate "line", 117 # rx subcapture "sym" set_addr $I10, rxcap_319_fail rx316_cur."!mark_push"(0, rx316_pos, $I10) @@ -3701,7 +3770,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes ge rx316_pos, rx316_eos, rx316_fail sub $I10, rx316_pos, rx316_off substr $S10, rx316_tgt, $I10, 1 - index $I11, "eE", $S10 + index $I11, "fF", $S10 lt $I11, 0, rx316_fail inc rx316_pos set_addr $I10, rxcap_319_fail @@ -3716,8 +3785,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx316_fail rxcap_319_done: # rx pass - rx316_cur."!cursor_pass"(rx316_pos, "backslash:sym") - rx316_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx316_pos) + rx316_cur."!cursor_pass"(rx316_pos, "backslash:sym") + rx316_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx316_pos) .return (rx316_cur) rx316_fail: .annotate "line", 3 @@ -3727,24 +3796,24 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx316_done: rx316_cur."!cursor_fail"() - rx316_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx316_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx316_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("98_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("100_1258264421.2958") :method .annotate "line", 3 new $P318, "ResizablePMCArray" - push $P318, "E" - push $P318, "e" + push $P318, "F" + push $P318, "f" .return ($P318) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("99_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("101_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx321_tgt .local int rx321_pos @@ -3753,7 +3822,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx321_rep .local pmc rx321_cur (rx321_cur, rx321_pos, rx321_tgt, $I10) = self."!cursor_start"() - rx321_cur."!cursor_debug"("START ", "backslash:sym") + rx321_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx321_cur .local pmc match .lex "$/", match @@ -3763,7 +3832,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx321_off, $I10, 1 substr rx321_tgt, rx321_tgt, rx321_off rx321_start: -.annotate "line", 117 +.annotate "line", 118 # rx subcapture "sym" set_addr $I10, rxcap_324_fail rx321_cur."!mark_push"(0, rx321_pos, $I10) @@ -3771,7 +3840,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes ge rx321_pos, rx321_eos, rx321_fail sub $I10, rx321_pos, rx321_off substr $S10, rx321_tgt, $I10, 1 - index $I11, "fF", $S10 + index $I11, "hH", $S10 lt $I11, 0, rx321_fail inc rx321_pos set_addr $I10, rxcap_324_fail @@ -3786,8 +3855,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx321_fail rxcap_324_done: # rx pass - rx321_cur."!cursor_pass"(rx321_pos, "backslash:sym") - rx321_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx321_pos) + rx321_cur."!cursor_pass"(rx321_pos, "backslash:sym") + rx321_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx321_pos) .return (rx321_cur) rx321_fail: .annotate "line", 3 @@ -3797,24 +3866,24 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx321_done: rx321_cur."!cursor_fail"() - rx321_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx321_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx321_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("100_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("102_1258264421.2958") :method .annotate "line", 3 new $P323, "ResizablePMCArray" - push $P323, "F" - push $P323, "f" + push $P323, "H" + push $P323, "h" .return ($P323) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("101_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("103_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx326_tgt .local int rx326_pos @@ -3823,7 +3892,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx326_rep .local pmc rx326_cur (rx326_cur, rx326_pos, rx326_tgt, $I10) = self."!cursor_start"() - rx326_cur."!cursor_debug"("START ", "backslash:sym") + rx326_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx326_cur .local pmc match .lex "$/", match @@ -3833,7 +3902,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx326_off, $I10, 1 substr rx326_tgt, rx326_tgt, rx326_off rx326_start: -.annotate "line", 118 +.annotate "line", 119 # rx subcapture "sym" set_addr $I10, rxcap_329_fail rx326_cur."!mark_push"(0, rx326_pos, $I10) @@ -3841,7 +3910,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes ge rx326_pos, rx326_eos, rx326_fail sub $I10, rx326_pos, rx326_off substr $S10, rx326_tgt, $I10, 1 - index $I11, "hH", $S10 + index $I11, "rR", $S10 lt $I11, 0, rx326_fail inc rx326_pos set_addr $I10, rxcap_329_fail @@ -3856,8 +3925,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx326_fail rxcap_329_done: # rx pass - rx326_cur."!cursor_pass"(rx326_pos, "backslash:sym") - rx326_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx326_pos) + rx326_cur."!cursor_pass"(rx326_pos, "backslash:sym") + rx326_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx326_pos) .return (rx326_cur) rx326_fail: .annotate "line", 3 @@ -3867,24 +3936,24 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx326_done: rx326_cur."!cursor_fail"() - rx326_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx326_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx326_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("102_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("104_1258264421.2958") :method .annotate "line", 3 new $P328, "ResizablePMCArray" - push $P328, "H" - push $P328, "h" + push $P328, "R" + push $P328, "r" .return ($P328) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("103_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("105_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx331_tgt .local int rx331_pos @@ -3893,7 +3962,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx331_rep .local pmc rx331_cur (rx331_cur, rx331_pos, rx331_tgt, $I10) = self."!cursor_start"() - rx331_cur."!cursor_debug"("START ", "backslash:sym") + rx331_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx331_cur .local pmc match .lex "$/", match @@ -3903,7 +3972,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx331_off, $I10, 1 substr rx331_tgt, rx331_tgt, rx331_off rx331_start: -.annotate "line", 119 +.annotate "line", 120 # rx subcapture "sym" set_addr $I10, rxcap_334_fail rx331_cur."!mark_push"(0, rx331_pos, $I10) @@ -3911,7 +3980,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes ge rx331_pos, rx331_eos, rx331_fail sub $I10, rx331_pos, rx331_off substr $S10, rx331_tgt, $I10, 1 - index $I11, "rR", $S10 + index $I11, "tT", $S10 lt $I11, 0, rx331_fail inc rx331_pos set_addr $I10, rxcap_334_fail @@ -3926,8 +3995,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx331_fail rxcap_334_done: # rx pass - rx331_cur."!cursor_pass"(rx331_pos, "backslash:sym") - rx331_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx331_pos) + rx331_cur."!cursor_pass"(rx331_pos, "backslash:sym") + rx331_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx331_pos) .return (rx331_cur) rx331_fail: .annotate "line", 3 @@ -3937,24 +4006,24 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx331_done: rx331_cur."!cursor_fail"() - rx331_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx331_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx331_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("104_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("106_1258264421.2958") :method .annotate "line", 3 new $P333, "ResizablePMCArray" - push $P333, "R" - push $P333, "r" + push $P333, "T" + push $P333, "t" .return ($P333) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("105_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("107_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx336_tgt .local int rx336_pos @@ -3963,7 +4032,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx336_rep .local pmc rx336_cur (rx336_cur, rx336_pos, rx336_tgt, $I10) = self."!cursor_start"() - rx336_cur."!cursor_debug"("START ", "backslash:sym") + rx336_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx336_cur .local pmc match .lex "$/", match @@ -3973,7 +4042,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx336_off, $I10, 1 substr rx336_tgt, rx336_tgt, rx336_off rx336_start: -.annotate "line", 120 +.annotate "line", 121 # rx subcapture "sym" set_addr $I10, rxcap_339_fail rx336_cur."!mark_push"(0, rx336_pos, $I10) @@ -3981,7 +4050,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes ge rx336_pos, rx336_eos, rx336_fail sub $I10, rx336_pos, rx336_off substr $S10, rx336_tgt, $I10, 1 - index $I11, "tT", $S10 + index $I11, "vV", $S10 lt $I11, 0, rx336_fail inc rx336_pos set_addr $I10, rxcap_339_fail @@ -3996,8 +4065,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto rx336_fail rxcap_339_done: # rx pass - rx336_cur."!cursor_pass"(rx336_pos, "backslash:sym") - rx336_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx336_pos) + rx336_cur."!cursor_pass"(rx336_pos, "backslash:sym") + rx336_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx336_pos) .return (rx336_cur) rx336_fail: .annotate "line", 3 @@ -4007,24 +4076,24 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx336_done: rx336_cur."!cursor_fail"() - rx336_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx336_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx336_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("106_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("108_1258264421.2958") :method .annotate "line", 3 new $P338, "ResizablePMCArray" - push $P338, "T" - push $P338, "t" + push $P338, "V" + push $P338, "v" .return ($P338) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("107_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("109_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx341_tgt .local int rx341_pos @@ -4033,7 +4102,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx341_rep .local pmc rx341_cur (rx341_cur, rx341_pos, rx341_tgt, $I10) = self."!cursor_start"() - rx341_cur."!cursor_debug"("START ", "backslash:sym") + rx341_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx341_cur .local pmc match .lex "$/", match @@ -4043,31 +4112,38 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx341_off, $I10, 1 substr rx341_tgt, rx341_tgt, rx341_off rx341_start: -.annotate "line", 121 +.annotate "line", 122 # rx subcapture "sym" - set_addr $I10, rxcap_344_fail + set_addr $I10, rxcap_346_fail rx341_cur."!mark_push"(0, rx341_pos, $I10) # rx enumcharlist negate=0 ge rx341_pos, rx341_eos, rx341_fail sub $I10, rx341_pos, rx341_off substr $S10, rx341_tgt, $I10, 1 - index $I11, "vV", $S10 + index $I11, "cC", $S10 lt $I11, 0, rx341_fail inc rx341_pos - set_addr $I10, rxcap_344_fail + set_addr $I10, rxcap_346_fail ($I12, $I11) = rx341_cur."!mark_peek"($I10) rx341_cur."!cursor_pos"($I11) ($P10) = rx341_cur."!cursor_start"() $P10."!cursor_pass"(rx341_pos, "") rx341_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_344_done - rxcap_344_fail: + goto rxcap_346_done + rxcap_346_fail: goto rx341_fail - rxcap_344_done: + rxcap_346_done: + # rx subrule "charspec" subtype=capture negate= + rx341_cur."!cursor_pos"(rx341_pos) + $P10 = rx341_cur."charspec"() + unless $P10, rx341_fail + rx341_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("charspec") + rx341_pos = $P10."pos"() # rx pass - rx341_cur."!cursor_pass"(rx341_pos, "backslash:sym") - rx341_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx341_pos) + rx341_cur."!cursor_pass"(rx341_pos, "backslash:sym") + rx341_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx341_pos) .return (rx341_cur) rx341_fail: .annotate "line", 3 @@ -4077,323 +4153,307 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx341_done: rx341_cur."!cursor_fail"() - rx341_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx341_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx341_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("108_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("110_1258264421.2958") :method .annotate "line", 3 - new $P343, "ResizablePMCArray" - push $P343, "V" - push $P343, "v" - .return ($P343) + $P343 = self."!PREFIX__!subrule"("charspec", "C") + $P344 = self."!PREFIX__!subrule"("charspec", "c") + new $P345, "ResizablePMCArray" + push $P345, $P343 + push $P345, $P344 + .return ($P345) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("109_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("111_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx346_tgt - .local int rx346_pos - .local int rx346_off - .local int rx346_eos - .local int rx346_rep - .local pmc rx346_cur - (rx346_cur, rx346_pos, rx346_tgt, $I10) = self."!cursor_start"() - rx346_cur."!cursor_debug"("START ", "backslash:sym") - .lex unicode:"$\x{a2}", rx346_cur + .local string rx348_tgt + .local int rx348_pos + .local int rx348_off + .local int rx348_eos + .local int rx348_rep + .local pmc rx348_cur + (rx348_cur, rx348_pos, rx348_tgt, $I10) = self."!cursor_start"() + rx348_cur."!cursor_debug"("START ", "backslash:sym") + .lex unicode:"$\x{a2}", rx348_cur .local pmc match .lex "$/", match - length rx346_eos, rx346_tgt - set rx346_off, 0 - lt $I10, 2, rx346_start - sub rx346_off, $I10, 1 - substr rx346_tgt, rx346_tgt, rx346_off - rx346_start: -.annotate "line", 122 + length rx348_eos, rx348_tgt + set rx348_off, 0 + lt $I10, 2, rx348_start + sub rx348_off, $I10, 1 + substr rx348_tgt, rx348_tgt, rx348_off + rx348_start: +.annotate "line", 123 # rx subcapture "sym" - set_addr $I10, rxcap_351_fail - rx346_cur."!mark_push"(0, rx346_pos, $I10) + set_addr $I10, rxcap_355_fail + rx348_cur."!mark_push"(0, rx348_pos, $I10) # rx enumcharlist negate=0 - ge rx346_pos, rx346_eos, rx346_fail - sub $I10, rx346_pos, rx346_off - substr $S10, rx346_tgt, $I10, 1 - index $I11, "cC", $S10 - lt $I11, 0, rx346_fail - inc rx346_pos - set_addr $I10, rxcap_351_fail - ($I12, $I11) = rx346_cur."!mark_peek"($I10) - rx346_cur."!cursor_pos"($I11) - ($P10) = rx346_cur."!cursor_start"() - $P10."!cursor_pass"(rx346_pos, "") - rx346_cur."!mark_push"(0, -1, 0, $P10) + ge rx348_pos, rx348_eos, rx348_fail + sub $I10, rx348_pos, rx348_off + substr $S10, rx348_tgt, $I10, 1 + index $I11, "oO", $S10 + lt $I11, 0, rx348_fail + inc rx348_pos + set_addr $I10, rxcap_355_fail + ($I12, $I11) = rx348_cur."!mark_peek"($I10) + rx348_cur."!cursor_pos"($I11) + ($P10) = rx348_cur."!cursor_start"() + $P10."!cursor_pass"(rx348_pos, "") + rx348_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_351_done - rxcap_351_fail: - goto rx346_fail - rxcap_351_done: - # rx subrule "charspec" subtype=capture negate= - rx346_cur."!cursor_pos"(rx346_pos) - $P10 = rx346_cur."charspec"() - unless $P10, rx346_fail - rx346_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("charspec") - rx346_pos = $P10."pos"() + goto rxcap_355_done + rxcap_355_fail: + goto rx348_fail + rxcap_355_done: + alt356_0: + set_addr $I10, alt356_1 + rx348_cur."!mark_push"(0, rx348_pos, $I10) + # rx subrule "octint" subtype=capture negate= + rx348_cur."!cursor_pos"(rx348_pos) + $P10 = rx348_cur."octint"() + unless $P10, rx348_fail + rx348_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("octint") + rx348_pos = $P10."pos"() + goto alt356_end + alt356_1: + # rx literal "[" + add $I11, rx348_pos, 1 + gt $I11, rx348_eos, rx348_fail + sub $I11, rx348_pos, rx348_off + substr $S10, rx348_tgt, $I11, 1 + ne $S10, "[", rx348_fail + add rx348_pos, 1 + # rx subrule "octints" subtype=capture negate= + rx348_cur."!cursor_pos"(rx348_pos) + $P10 = rx348_cur."octints"() + unless $P10, rx348_fail + rx348_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("octints") + rx348_pos = $P10."pos"() + # rx literal "]" + add $I11, rx348_pos, 1 + gt $I11, rx348_eos, rx348_fail + sub $I11, rx348_pos, rx348_off + substr $S10, rx348_tgt, $I11, 1 + ne $S10, "]", rx348_fail + add rx348_pos, 1 + alt356_end: # rx pass - rx346_cur."!cursor_pass"(rx346_pos, "backslash:sym") - rx346_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx346_pos) - .return (rx346_cur) - rx346_fail: -.annotate "line", 3 - (rx346_rep, rx346_pos, $I10, $P10) = rx346_cur."!mark_fail"(0) - lt rx346_pos, -1, rx346_done - eq rx346_pos, -1, rx346_fail + rx348_cur."!cursor_pass"(rx348_pos, "backslash:sym") + rx348_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx348_pos) + .return (rx348_cur) + rx348_fail: +.annotate "line", 3 + (rx348_rep, rx348_pos, $I10, $P10) = rx348_cur."!mark_fail"(0) + lt rx348_pos, -1, rx348_done + eq rx348_pos, -1, rx348_fail jump $I10 - rx346_done: - rx346_cur."!cursor_fail"() - rx346_cur."!cursor_debug"("FAIL ", "backslash:sym") - .return (rx346_cur) + rx348_done: + rx348_cur."!cursor_fail"() + rx348_cur."!cursor_debug"("FAIL ", "backslash:sym") + .return (rx348_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("110_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("112_1258264421.2958") :method .annotate "line", 3 - $P348 = self."!PREFIX__!subrule"("charspec", "C") - $P349 = self."!PREFIX__!subrule"("charspec", "c") - new $P350, "ResizablePMCArray" - push $P350, $P348 - push $P350, $P349 - .return ($P350) + $P350 = self."!PREFIX__!subrule"("octints", "O[") + $P351 = self."!PREFIX__!subrule"("octint", "O") + $P352 = self."!PREFIX__!subrule"("octints", "o[") + $P353 = self."!PREFIX__!subrule"("octint", "o") + new $P354, "ResizablePMCArray" + push $P354, $P350 + push $P354, $P351 + push $P354, $P352 + push $P354, $P353 + .return ($P354) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("111_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("113_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx353_tgt - .local int rx353_pos - .local int rx353_off - .local int rx353_eos - .local int rx353_rep - .local pmc rx353_cur - (rx353_cur, rx353_pos, rx353_tgt, $I10) = self."!cursor_start"() - rx353_cur."!cursor_debug"("START ", "backslash:sym") - .lex unicode:"$\x{a2}", rx353_cur + .local string rx358_tgt + .local int rx358_pos + .local int rx358_off + .local int rx358_eos + .local int rx358_rep + .local pmc rx358_cur + (rx358_cur, rx358_pos, rx358_tgt, $I10) = self."!cursor_start"() + rx358_cur."!cursor_debug"("START ", "backslash:sym") + .lex unicode:"$\x{a2}", rx358_cur .local pmc match .lex "$/", match - length rx353_eos, rx353_tgt - set rx353_off, 0 - lt $I10, 2, rx353_start - sub rx353_off, $I10, 1 - substr rx353_tgt, rx353_tgt, rx353_off - rx353_start: -.annotate "line", 123 + length rx358_eos, rx358_tgt + set rx358_off, 0 + lt $I10, 2, rx358_start + sub rx358_off, $I10, 1 + substr rx358_tgt, rx358_tgt, rx358_off + rx358_start: +.annotate "line", 124 # rx subcapture "sym" - set_addr $I10, rxcap_360_fail - rx353_cur."!mark_push"(0, rx353_pos, $I10) + set_addr $I10, rxcap_365_fail + rx358_cur."!mark_push"(0, rx358_pos, $I10) # rx enumcharlist negate=0 - ge rx353_pos, rx353_eos, rx353_fail - sub $I10, rx353_pos, rx353_off - substr $S10, rx353_tgt, $I10, 1 - index $I11, "oO", $S10 - lt $I11, 0, rx353_fail - inc rx353_pos - set_addr $I10, rxcap_360_fail - ($I12, $I11) = rx353_cur."!mark_peek"($I10) - rx353_cur."!cursor_pos"($I11) - ($P10) = rx353_cur."!cursor_start"() - $P10."!cursor_pass"(rx353_pos, "") - rx353_cur."!mark_push"(0, -1, 0, $P10) + ge rx358_pos, rx358_eos, rx358_fail + sub $I10, rx358_pos, rx358_off + substr $S10, rx358_tgt, $I10, 1 + index $I11, "xX", $S10 + lt $I11, 0, rx358_fail + inc rx358_pos + set_addr $I10, rxcap_365_fail + ($I12, $I11) = rx358_cur."!mark_peek"($I10) + rx358_cur."!cursor_pos"($I11) + ($P10) = rx358_cur."!cursor_start"() + $P10."!cursor_pass"(rx358_pos, "") + rx358_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_360_done - rxcap_360_fail: - goto rx353_fail - rxcap_360_done: - alt361_0: - set_addr $I10, alt361_1 - rx353_cur."!mark_push"(0, rx353_pos, $I10) - # rx subrule "octint" subtype=capture negate= - rx353_cur."!cursor_pos"(rx353_pos) - $P10 = rx353_cur."octint"() - unless $P10, rx353_fail - rx353_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("octint") - rx353_pos = $P10."pos"() - goto alt361_end - alt361_1: + goto rxcap_365_done + rxcap_365_fail: + goto rx358_fail + rxcap_365_done: + alt366_0: + set_addr $I10, alt366_1 + rx358_cur."!mark_push"(0, rx358_pos, $I10) + # rx subrule "hexint" subtype=capture negate= + rx358_cur."!cursor_pos"(rx358_pos) + $P10 = rx358_cur."hexint"() + unless $P10, rx358_fail + rx358_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("hexint") + rx358_pos = $P10."pos"() + goto alt366_end + alt366_1: # rx literal "[" - add $I11, rx353_pos, 1 - gt $I11, rx353_eos, rx353_fail - sub $I11, rx353_pos, rx353_off - substr $S10, rx353_tgt, $I11, 1 - ne $S10, "[", rx353_fail - add rx353_pos, 1 - # rx subrule "octints" subtype=capture negate= - rx353_cur."!cursor_pos"(rx353_pos) - $P10 = rx353_cur."octints"() - unless $P10, rx353_fail - rx353_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("octints") - rx353_pos = $P10."pos"() + add $I11, rx358_pos, 1 + gt $I11, rx358_eos, rx358_fail + sub $I11, rx358_pos, rx358_off + substr $S10, rx358_tgt, $I11, 1 + ne $S10, "[", rx358_fail + add rx358_pos, 1 + # rx subrule "hexints" subtype=capture negate= + rx358_cur."!cursor_pos"(rx358_pos) + $P10 = rx358_cur."hexints"() + unless $P10, rx358_fail + rx358_cur."!mark_push"(0, -1, 0, $P10) + $P10."!cursor_names"("hexints") + rx358_pos = $P10."pos"() # rx literal "]" - add $I11, rx353_pos, 1 - gt $I11, rx353_eos, rx353_fail - sub $I11, rx353_pos, rx353_off - substr $S10, rx353_tgt, $I11, 1 - ne $S10, "]", rx353_fail - add rx353_pos, 1 - alt361_end: + add $I11, rx358_pos, 1 + gt $I11, rx358_eos, rx358_fail + sub $I11, rx358_pos, rx358_off + substr $S10, rx358_tgt, $I11, 1 + ne $S10, "]", rx358_fail + add rx358_pos, 1 + alt366_end: # rx pass - rx353_cur."!cursor_pass"(rx353_pos, "backslash:sym") - rx353_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx353_pos) - .return (rx353_cur) - rx353_fail: -.annotate "line", 3 - (rx353_rep, rx353_pos, $I10, $P10) = rx353_cur."!mark_fail"(0) - lt rx353_pos, -1, rx353_done - eq rx353_pos, -1, rx353_fail + rx358_cur."!cursor_pass"(rx358_pos, "backslash:sym") + rx358_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx358_pos) + .return (rx358_cur) + rx358_fail: +.annotate "line", 3 + (rx358_rep, rx358_pos, $I10, $P10) = rx358_cur."!mark_fail"(0) + lt rx358_pos, -1, rx358_done + eq rx358_pos, -1, rx358_fail jump $I10 - rx353_done: - rx353_cur."!cursor_fail"() - rx353_cur."!cursor_debug"("FAIL ", "backslash:sym") - .return (rx353_cur) + rx358_done: + rx358_cur."!cursor_fail"() + rx358_cur."!cursor_debug"("FAIL ", "backslash:sym") + .return (rx358_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("112_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("114_1258264421.2958") :method .annotate "line", 3 - $P355 = self."!PREFIX__!subrule"("octints", "O[") - $P356 = self."!PREFIX__!subrule"("octint", "O") - $P357 = self."!PREFIX__!subrule"("octints", "o[") - $P358 = self."!PREFIX__!subrule"("octint", "o") - new $P359, "ResizablePMCArray" - push $P359, $P355 - push $P359, $P356 - push $P359, $P357 - push $P359, $P358 - .return ($P359) + $P360 = self."!PREFIX__!subrule"("hexints", "X[") + $P361 = self."!PREFIX__!subrule"("hexint", "X") + $P362 = self."!PREFIX__!subrule"("hexints", "x[") + $P363 = self."!PREFIX__!subrule"("hexint", "x") + new $P364, "ResizablePMCArray" + push $P364, $P360 + push $P364, $P361 + push $P364, $P362 + push $P364, $P363 + .return ($P364) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("113_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("115_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx363_tgt - .local int rx363_pos - .local int rx363_off - .local int rx363_eos - .local int rx363_rep - .local pmc rx363_cur - (rx363_cur, rx363_pos, rx363_tgt, $I10) = self."!cursor_start"() - rx363_cur."!cursor_debug"("START ", "backslash:sym") - .lex unicode:"$\x{a2}", rx363_cur + .local string rx368_tgt + .local int rx368_pos + .local int rx368_off + .local int rx368_eos + .local int rx368_rep + .local pmc rx368_cur + (rx368_cur, rx368_pos, rx368_tgt, $I10) = self."!cursor_start"() + rx368_cur."!cursor_debug"("START ", "backslash:sym") + .lex unicode:"$\x{a2}", rx368_cur .local pmc match .lex "$/", match - length rx363_eos, rx363_tgt - set rx363_off, 0 - lt $I10, 2, rx363_start - sub rx363_off, $I10, 1 - substr rx363_tgt, rx363_tgt, rx363_off - rx363_start: -.annotate "line", 124 - # rx subcapture "sym" - set_addr $I10, rxcap_370_fail - rx363_cur."!mark_push"(0, rx363_pos, $I10) - # rx enumcharlist negate=0 - ge rx363_pos, rx363_eos, rx363_fail - sub $I10, rx363_pos, rx363_off - substr $S10, rx363_tgt, $I10, 1 - index $I11, "xX", $S10 - lt $I11, 0, rx363_fail - inc rx363_pos - set_addr $I10, rxcap_370_fail - ($I12, $I11) = rx363_cur."!mark_peek"($I10) - rx363_cur."!cursor_pos"($I11) - ($P10) = rx363_cur."!cursor_start"() - $P10."!cursor_pass"(rx363_pos, "") - rx363_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("sym") - goto rxcap_370_done - rxcap_370_fail: - goto rx363_fail - rxcap_370_done: - alt371_0: - set_addr $I10, alt371_1 - rx363_cur."!mark_push"(0, rx363_pos, $I10) - # rx subrule "hexint" subtype=capture negate= - rx363_cur."!cursor_pos"(rx363_pos) - $P10 = rx363_cur."hexint"() - unless $P10, rx363_fail - rx363_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("hexint") - rx363_pos = $P10."pos"() - goto alt371_end - alt371_1: - # rx literal "[" - add $I11, rx363_pos, 1 - gt $I11, rx363_eos, rx363_fail - sub $I11, rx363_pos, rx363_off - substr $S10, rx363_tgt, $I11, 1 - ne $S10, "[", rx363_fail - add rx363_pos, 1 - # rx subrule "hexints" subtype=capture negate= - rx363_cur."!cursor_pos"(rx363_pos) - $P10 = rx363_cur."hexints"() - unless $P10, rx363_fail - rx363_cur."!mark_push"(0, -1, 0, $P10) - $P10."!cursor_names"("hexints") - rx363_pos = $P10."pos"() - # rx literal "]" - add $I11, rx363_pos, 1 - gt $I11, rx363_eos, rx363_fail - sub $I11, rx363_pos, rx363_off - substr $S10, rx363_tgt, $I11, 1 - ne $S10, "]", rx363_fail - add rx363_pos, 1 - alt371_end: + length rx368_eos, rx368_tgt + set rx368_off, 0 + lt $I10, 2, rx368_start + sub rx368_off, $I10, 1 + substr rx368_tgt, rx368_tgt, rx368_off + rx368_start: +.annotate "line", 125 + # rx literal "A" + add $I11, rx368_pos, 1 + gt $I11, rx368_eos, rx368_fail + sub $I11, rx368_pos, rx368_off + substr $S10, rx368_tgt, $I11, 1 + ne $S10, "A", rx368_fail + add rx368_pos, 1 + # rx subrule "obs" subtype=method negate= + rx368_cur."!cursor_pos"(rx368_pos) + $P10 = rx368_cur."obs"("\\A as beginning-of-string matcher", "^") + unless $P10, rx368_fail + rx368_pos = $P10."pos"() # rx pass - rx363_cur."!cursor_pass"(rx363_pos, "backslash:sym") - rx363_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx363_pos) - .return (rx363_cur) - rx363_fail: -.annotate "line", 3 - (rx363_rep, rx363_pos, $I10, $P10) = rx363_cur."!mark_fail"(0) - lt rx363_pos, -1, rx363_done - eq rx363_pos, -1, rx363_fail + rx368_cur."!cursor_pass"(rx368_pos, "backslash:sym") + rx368_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx368_pos) + .return (rx368_cur) + rx368_fail: +.annotate "line", 3 + (rx368_rep, rx368_pos, $I10, $P10) = rx368_cur."!mark_fail"(0) + lt rx368_pos, -1, rx368_done + eq rx368_pos, -1, rx368_fail jump $I10 - rx363_done: - rx363_cur."!cursor_fail"() - rx363_cur."!cursor_debug"("FAIL ", "backslash:sym") - .return (rx363_cur) + rx368_done: + rx368_cur."!cursor_fail"() + rx368_cur."!cursor_debug"("FAIL ", "backslash:sym") + .return (rx368_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("114_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("116_1258264421.2958") :method .annotate "line", 3 - $P365 = self."!PREFIX__!subrule"("hexints", "X[") - $P366 = self."!PREFIX__!subrule"("hexint", "X") - $P367 = self."!PREFIX__!subrule"("hexints", "x[") - $P368 = self."!PREFIX__!subrule"("hexint", "x") - new $P369, "ResizablePMCArray" - push $P369, $P365 - push $P369, $P366 - push $P369, $P367 - push $P369, $P368 - .return ($P369) + $P370 = self."!PREFIX__!subrule"("", "A") + new $P371, "ResizablePMCArray" + push $P371, $P370 + .return ($P371) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("115_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("117_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx373_tgt .local int rx373_pos @@ -4402,7 +4462,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx373_rep .local pmc rx373_cur (rx373_cur, rx373_pos, rx373_tgt, $I10) = self."!cursor_start"() - rx373_cur."!cursor_debug"("START ", "backslash:sym") + rx373_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx373_cur .local pmc match .lex "$/", match @@ -4412,22 +4472,22 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx373_off, $I10, 1 substr rx373_tgt, rx373_tgt, rx373_off rx373_start: -.annotate "line", 125 - # rx literal "A" +.annotate "line", 126 + # rx literal "z" add $I11, rx373_pos, 1 gt $I11, rx373_eos, rx373_fail sub $I11, rx373_pos, rx373_off substr $S10, rx373_tgt, $I11, 1 - ne $S10, "A", rx373_fail + ne $S10, "z", rx373_fail add rx373_pos, 1 # rx subrule "obs" subtype=method negate= rx373_cur."!cursor_pos"(rx373_pos) - $P10 = rx373_cur."obs"("\\\\A as beginning-of-string matcher", "^") + $P10 = rx373_cur."obs"("\\z as end-of-string matcher", "$") unless $P10, rx373_fail rx373_pos = $P10."pos"() # rx pass - rx373_cur."!cursor_pass"(rx373_pos, "backslash:sym") - rx373_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx373_pos) + rx373_cur."!cursor_pass"(rx373_pos, "backslash:sym") + rx373_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx373_pos) .return (rx373_cur) rx373_fail: .annotate "line", 3 @@ -4437,16 +4497,16 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx373_done: rx373_cur."!cursor_fail"() - rx373_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx373_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx373_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("116_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("118_1258264421.2958") :method .annotate "line", 3 - $P375 = self."!PREFIX__!subrule"("", "A") + $P375 = self."!PREFIX__!subrule"("", "z") new $P376, "ResizablePMCArray" push $P376, $P375 .return ($P376) @@ -4454,7 +4514,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("117_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("119_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx378_tgt .local int rx378_pos @@ -4463,7 +4523,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx378_rep .local pmc rx378_cur (rx378_cur, rx378_pos, rx378_tgt, $I10) = self."!cursor_start"() - rx378_cur."!cursor_debug"("START ", "backslash:sym") + rx378_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx378_cur .local pmc match .lex "$/", match @@ -4473,22 +4533,22 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx378_off, $I10, 1 substr rx378_tgt, rx378_tgt, rx378_off rx378_start: -.annotate "line", 126 - # rx literal "z" +.annotate "line", 127 + # rx literal "Z" add $I11, rx378_pos, 1 gt $I11, rx378_eos, rx378_fail sub $I11, rx378_pos, rx378_off substr $S10, rx378_tgt, $I11, 1 - ne $S10, "z", rx378_fail + ne $S10, "Z", rx378_fail add rx378_pos, 1 # rx subrule "obs" subtype=method negate= rx378_cur."!cursor_pos"(rx378_pos) - $P10 = rx378_cur."obs"("\\\\z as end-of-string matcher", "$") + $P10 = rx378_cur."obs"("\\Z as end-of-string matcher", "\\n?$") unless $P10, rx378_fail rx378_pos = $P10."pos"() # rx pass - rx378_cur."!cursor_pass"(rx378_pos, "backslash:sym") - rx378_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx378_pos) + rx378_cur."!cursor_pass"(rx378_pos, "backslash:sym") + rx378_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx378_pos) .return (rx378_cur) rx378_fail: .annotate "line", 3 @@ -4498,16 +4558,16 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx378_done: rx378_cur."!cursor_fail"() - rx378_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx378_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx378_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("118_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("120_1258264421.2958") :method .annotate "line", 3 - $P380 = self."!PREFIX__!subrule"("", "z") + $P380 = self."!PREFIX__!subrule"("", "Z") new $P381, "ResizablePMCArray" push $P381, $P380 .return ($P381) @@ -4515,7 +4575,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("119_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("121_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx383_tgt .local int rx383_pos @@ -4524,7 +4584,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx383_rep .local pmc rx383_cur (rx383_cur, rx383_pos, rx383_tgt, $I10) = self."!cursor_start"() - rx383_cur."!cursor_debug"("START ", "backslash:sym") + rx383_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx383_cur .local pmc match .lex "$/", match @@ -4534,22 +4594,22 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx383_off, $I10, 1 substr rx383_tgt, rx383_tgt, rx383_off rx383_start: -.annotate "line", 127 - # rx literal "Z" +.annotate "line", 128 + # rx literal "Q" add $I11, rx383_pos, 1 gt $I11, rx383_eos, rx383_fail sub $I11, rx383_pos, rx383_off substr $S10, rx383_tgt, $I11, 1 - ne $S10, "Z", rx383_fail + ne $S10, "Q", rx383_fail add rx383_pos, 1 # rx subrule "obs" subtype=method negate= rx383_cur."!cursor_pos"(rx383_pos) - $P10 = rx383_cur."obs"("\\\\Z as end-of-string matcher", "\\\\n?$") + $P10 = rx383_cur."obs"("\\Q as quotemeta", "quotes or literal variable match") unless $P10, rx383_fail rx383_pos = $P10."pos"() # rx pass - rx383_cur."!cursor_pass"(rx383_pos, "backslash:sym") - rx383_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx383_pos) + rx383_cur."!cursor_pass"(rx383_pos, "backslash:sym") + rx383_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx383_pos) .return (rx383_cur) rx383_fail: .annotate "line", 3 @@ -4559,16 +4619,16 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx383_done: rx383_cur."!cursor_fail"() - rx383_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx383_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx383_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("120_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("122_1258264421.2958") :method .annotate "line", 3 - $P385 = self."!PREFIX__!subrule"("", "Z") + $P385 = self."!PREFIX__!subrule"("", "Q") new $P386, "ResizablePMCArray" push $P386, $P385 .return ($P386) @@ -4576,7 +4636,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("121_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "backslash:sym" :subid("123_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 .local string rx388_tgt .local int rx388_pos @@ -4585,7 +4645,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .local int rx388_rep .local pmc rx388_cur (rx388_cur, rx388_pos, rx388_tgt, $I10) = self."!cursor_start"() - rx388_cur."!cursor_debug"("START ", "backslash:sym") + rx388_cur."!cursor_debug"("START ", "backslash:sym") .lex unicode:"$\x{a2}", rx388_cur .local pmc match .lex "$/", match @@ -4595,22 +4655,16 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes sub rx388_off, $I10, 1 substr rx388_tgt, rx388_tgt, rx388_off rx388_start: -.annotate "line", 128 - # rx literal "Q" - add $I11, rx388_pos, 1 - gt $I11, rx388_eos, rx388_fail - sub $I11, rx388_pos, rx388_off - substr $S10, rx388_tgt, $I11, 1 - ne $S10, "Q", rx388_fail - add rx388_pos, 1 - # rx subrule "obs" subtype=method negate= - rx388_cur."!cursor_pos"(rx388_pos) - $P10 = rx388_cur."obs"("\\\\Q as quotemeta", "quotes or literal variable match") - unless $P10, rx388_fail - rx388_pos = $P10."pos"() +.annotate "line", 129 + # rx charclass W + ge rx388_pos, rx388_eos, rx388_fail + sub $I10, rx388_pos, rx388_off + is_cclass $I11, 8192, rx388_tgt, $I10 + if $I11, rx388_fail + inc rx388_pos # rx pass - rx388_cur."!cursor_pass"(rx388_pos, "backslash:sym") - rx388_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx388_pos) + rx388_cur."!cursor_pass"(rx388_pos, "backslash:sym") + rx388_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx388_pos) .return (rx388_cur) rx388_fail: .annotate "line", 3 @@ -4620,1170 +4674,1168 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes jump $I10 rx388_done: rx388_cur."!cursor_fail"() - rx388_cur."!cursor_debug"("FAIL ", "backslash:sym") + rx388_cur."!cursor_debug"("FAIL ", "backslash:sym") .return (rx388_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("122_1258208089.76063") :method -.annotate "line", 3 - $P390 = self."!PREFIX__!subrule"("", "Q") - new $P391, "ResizablePMCArray" - push $P391, $P390 - .return ($P391) -.end - - -.namespace ["Regex";"P6Regex";"Grammar"] -.sub "backslash:sym" :subid("123_1258208089.76063") :method :outer("11_1258208089.76063") -.annotate "line", 3 - .local string rx393_tgt - .local int rx393_pos - .local int rx393_off - .local int rx393_eos - .local int rx393_rep - .local pmc rx393_cur - (rx393_cur, rx393_pos, rx393_tgt, $I10) = self."!cursor_start"() - rx393_cur."!cursor_debug"("START ", "backslash:sym") - .lex unicode:"$\x{a2}", rx393_cur - .local pmc match - .lex "$/", match - length rx393_eos, rx393_tgt - set rx393_off, 0 - lt $I10, 2, rx393_start - sub rx393_off, $I10, 1 - substr rx393_tgt, rx393_tgt, rx393_off - rx393_start: -.annotate "line", 129 - # rx charclass W - ge rx393_pos, rx393_eos, rx393_fail - sub $I10, rx393_pos, rx393_off - is_cclass $I11, 8192, rx393_tgt, $I10 - if $I11, rx393_fail - inc rx393_pos - # rx pass - rx393_cur."!cursor_pass"(rx393_pos, "backslash:sym") - rx393_cur."!cursor_debug"("PASS ", "backslash:sym", " at pos=", rx393_pos) - .return (rx393_cur) - rx393_fail: -.annotate "line", 3 - (rx393_rep, rx393_pos, $I10, $P10) = rx393_cur."!mark_fail"(0) - lt rx393_pos, -1, rx393_done - eq rx393_pos, -1, rx393_fail - jump $I10 - rx393_done: - rx393_cur."!cursor_fail"() - rx393_cur."!cursor_debug"("FAIL ", "backslash:sym") - .return (rx393_cur) - .return () -.end - - -.namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__backslash:sym" :subid("124_1258208089.76063") :method +.sub "!PREFIX__backslash:sym" :subid("124_1258264421.2958") :method .annotate "line", 3 - new $P395, "ResizablePMCArray" - push $P395, "" - .return ($P395) + new $P390, "ResizablePMCArray" + push $P390, "" + .return ($P390) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "assertion" :subid("125_1258208089.76063") :method +.sub "assertion" :subid("125_1258264421.2958") :method .annotate "line", 131 - $P397 = self."!protoregex"("assertion") - .return ($P397) + $P392 = self."!protoregex"("assertion") + .return ($P392) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__assertion" :subid("126_1258208089.76063") :method +.sub "!PREFIX__assertion" :subid("126_1258264421.2958") :method .annotate "line", 131 - $P399 = self."!PREFIX__!protoregex"("assertion") - .return ($P399) + $P394 = self."!PREFIX__!protoregex"("assertion") + .return ($P394) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "assertion:sym" :subid("127_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "assertion:sym" :subid("127_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P407 = "129_1258208089.76063" - capture_lex $P407 - .local string rx401_tgt - .local int rx401_pos - .local int rx401_off - .local int rx401_eos - .local int rx401_rep - .local pmc rx401_cur - (rx401_cur, rx401_pos, rx401_tgt, $I10) = self."!cursor_start"() - rx401_cur."!cursor_debug"("START ", "assertion:sym") - .lex unicode:"$\x{a2}", rx401_cur + .const 'Sub' $P402 = "129_1258264421.2958" + capture_lex $P402 + .local string rx396_tgt + .local int rx396_pos + .local int rx396_off + .local int rx396_eos + .local int rx396_rep + .local pmc rx396_cur + (rx396_cur, rx396_pos, rx396_tgt, $I10) = self."!cursor_start"() + rx396_cur."!cursor_debug"("START ", "assertion:sym") + .lex unicode:"$\x{a2}", rx396_cur .local pmc match .lex "$/", match - length rx401_eos, rx401_tgt - set rx401_off, 0 - lt $I10, 2, rx401_start - sub rx401_off, $I10, 1 - substr rx401_tgt, rx401_tgt, rx401_off - rx401_start: + length rx396_eos, rx396_tgt + set rx396_off, 0 + lt $I10, 2, rx396_start + sub rx396_off, $I10, 1 + substr rx396_tgt, rx396_tgt, rx396_off + rx396_start: .annotate "line", 133 # rx literal "?" - add $I11, rx401_pos, 1 - gt $I11, rx401_eos, rx401_fail - sub $I11, rx401_pos, rx401_off - substr $S10, rx401_tgt, $I11, 1 - ne $S10, "?", rx401_fail - add rx401_pos, 1 - alt405_0: - set_addr $I10, alt405_1 - rx401_cur."!mark_push"(0, rx401_pos, $I10) + add $I11, rx396_pos, 1 + gt $I11, rx396_eos, rx396_fail + sub $I11, rx396_pos, rx396_off + substr $S10, rx396_tgt, $I11, 1 + ne $S10, "?", rx396_fail + add rx396_pos, 1 + alt400_0: + set_addr $I10, alt400_1 + rx396_cur."!mark_push"(0, rx396_pos, $I10) # rx subrule "before" subtype=zerowidth negate= - rx401_cur."!cursor_pos"(rx401_pos) - .const 'Sub' $P407 = "129_1258208089.76063" - capture_lex $P407 - $P10 = rx401_cur."before"($P407) - unless $P10, rx401_fail - goto alt405_end - alt405_1: + rx396_cur."!cursor_pos"(rx396_pos) + .const 'Sub' $P402 = "129_1258264421.2958" + capture_lex $P402 + $P10 = rx396_cur."before"($P402) + unless $P10, rx396_fail + goto alt400_end + alt400_1: # rx subrule "assertion" subtype=capture negate= - rx401_cur."!cursor_pos"(rx401_pos) - $P10 = rx401_cur."assertion"() - unless $P10, rx401_fail - rx401_cur."!mark_push"(0, -1, 0, $P10) + rx396_cur."!cursor_pos"(rx396_pos) + $P10 = rx396_cur."assertion"() + unless $P10, rx396_fail + rx396_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("assertion") - rx401_pos = $P10."pos"() - alt405_end: + rx396_pos = $P10."pos"() + alt400_end: # rx pass - rx401_cur."!cursor_pass"(rx401_pos, "assertion:sym") - rx401_cur."!cursor_debug"("PASS ", "assertion:sym", " at pos=", rx401_pos) - .return (rx401_cur) - rx401_fail: -.annotate "line", 3 - (rx401_rep, rx401_pos, $I10, $P10) = rx401_cur."!mark_fail"(0) - lt rx401_pos, -1, rx401_done - eq rx401_pos, -1, rx401_fail + rx396_cur."!cursor_pass"(rx396_pos, "assertion:sym") + rx396_cur."!cursor_debug"("PASS ", "assertion:sym", " at pos=", rx396_pos) + .return (rx396_cur) + rx396_fail: +.annotate "line", 3 + (rx396_rep, rx396_pos, $I10, $P10) = rx396_cur."!mark_fail"(0) + lt rx396_pos, -1, rx396_done + eq rx396_pos, -1, rx396_fail jump $I10 - rx401_done: - rx401_cur."!cursor_fail"() - rx401_cur."!cursor_debug"("FAIL ", "assertion:sym") - .return (rx401_cur) + rx396_done: + rx396_cur."!cursor_fail"() + rx396_cur."!cursor_debug"("FAIL ", "assertion:sym") + .return (rx396_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__assertion:sym" :subid("128_1258208089.76063") :method +.sub "!PREFIX__assertion:sym" :subid("128_1258264421.2958") :method .annotate "line", 3 - $P403 = self."!PREFIX__!subrule"("assertion", "?") - new $P404, "ResizablePMCArray" - push $P404, $P403 - push $P404, "?" - .return ($P404) + $P398 = self."!PREFIX__!subrule"("assertion", "?") + new $P399, "ResizablePMCArray" + push $P399, $P398 + push $P399, "?" + .return ($P399) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block406" :anon :subid("129_1258208089.76063") :method :outer("127_1258208089.76063") +.sub "_block401" :anon :subid("129_1258264421.2958") :method :outer("127_1258264421.2958") .annotate "line", 133 - .local string rx408_tgt - .local int rx408_pos - .local int rx408_off - .local int rx408_eos - .local int rx408_rep - .local pmc rx408_cur - (rx408_cur, rx408_pos, rx408_tgt, $I10) = self."!cursor_start"() - rx408_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx408_cur + .local string rx403_tgt + .local int rx403_pos + .local int rx403_off + .local int rx403_eos + .local int rx403_rep + .local pmc rx403_cur + (rx403_cur, rx403_pos, rx403_tgt, $I10) = self."!cursor_start"() + rx403_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx403_cur .local pmc match .lex "$/", match - length rx408_eos, rx408_tgt - set rx408_off, 0 - lt $I10, 2, rx408_start - sub rx408_off, $I10, 1 - substr rx408_tgt, rx408_tgt, rx408_off - rx408_start: - ge rx408_pos, 0, rxscan409_done - rxscan409_loop: - ($P10) = rx408_cur."from"() + length rx403_eos, rx403_tgt + set rx403_off, 0 + lt $I10, 2, rx403_start + sub rx403_off, $I10, 1 + substr rx403_tgt, rx403_tgt, rx403_off + rx403_start: + ge rx403_pos, 0, rxscan404_done + rxscan404_loop: + ($P10) = rx403_cur."from"() inc $P10 - set rx408_pos, $P10 - ge rx408_pos, rx408_eos, rxscan409_done - set_addr $I10, rxscan409_loop - rx408_cur."!mark_push"(0, rx408_pos, $I10) - rxscan409_done: + set rx403_pos, $P10 + ge rx403_pos, rx403_eos, rxscan404_done + set_addr $I10, rxscan404_loop + rx403_cur."!mark_push"(0, rx403_pos, $I10) + rxscan404_done: # rx literal ">" - add $I11, rx408_pos, 1 - gt $I11, rx408_eos, rx408_fail - sub $I11, rx408_pos, rx408_off - substr $S10, rx408_tgt, $I11, 1 - ne $S10, ">", rx408_fail - add rx408_pos, 1 + add $I11, rx403_pos, 1 + gt $I11, rx403_eos, rx403_fail + sub $I11, rx403_pos, rx403_off + substr $S10, rx403_tgt, $I11, 1 + ne $S10, ">", rx403_fail + add rx403_pos, 1 # rx pass - rx408_cur."!cursor_pass"(rx408_pos, "") - rx408_cur."!cursor_debug"("PASS ", "", " at pos=", rx408_pos) - .return (rx408_cur) - rx408_fail: - (rx408_rep, rx408_pos, $I10, $P10) = rx408_cur."!mark_fail"(0) - lt rx408_pos, -1, rx408_done - eq rx408_pos, -1, rx408_fail + rx403_cur."!cursor_pass"(rx403_pos, "") + rx403_cur."!cursor_debug"("PASS ", "", " at pos=", rx403_pos) + .return (rx403_cur) + rx403_fail: + (rx403_rep, rx403_pos, $I10, $P10) = rx403_cur."!mark_fail"(0) + lt rx403_pos, -1, rx403_done + eq rx403_pos, -1, rx403_fail jump $I10 - rx408_done: - rx408_cur."!cursor_fail"() - rx408_cur."!cursor_debug"("FAIL ", "") - .return (rx408_cur) + rx403_done: + rx403_cur."!cursor_fail"() + rx403_cur."!cursor_debug"("FAIL ", "") + .return (rx403_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "assertion:sym" :subid("130_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "assertion:sym" :subid("130_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P417 = "132_1258208089.76063" - capture_lex $P417 - .local string rx411_tgt - .local int rx411_pos - .local int rx411_off - .local int rx411_eos - .local int rx411_rep - .local pmc rx411_cur - (rx411_cur, rx411_pos, rx411_tgt, $I10) = self."!cursor_start"() - rx411_cur."!cursor_debug"("START ", "assertion:sym") - .lex unicode:"$\x{a2}", rx411_cur + .const 'Sub' $P412 = "132_1258264421.2958" + capture_lex $P412 + .local string rx406_tgt + .local int rx406_pos + .local int rx406_off + .local int rx406_eos + .local int rx406_rep + .local pmc rx406_cur + (rx406_cur, rx406_pos, rx406_tgt, $I10) = self."!cursor_start"() + rx406_cur."!cursor_debug"("START ", "assertion:sym") + .lex unicode:"$\x{a2}", rx406_cur .local pmc match .lex "$/", match - length rx411_eos, rx411_tgt - set rx411_off, 0 - lt $I10, 2, rx411_start - sub rx411_off, $I10, 1 - substr rx411_tgt, rx411_tgt, rx411_off - rx411_start: + length rx406_eos, rx406_tgt + set rx406_off, 0 + lt $I10, 2, rx406_start + sub rx406_off, $I10, 1 + substr rx406_tgt, rx406_tgt, rx406_off + rx406_start: .annotate "line", 134 # rx literal "!" - add $I11, rx411_pos, 1 - gt $I11, rx411_eos, rx411_fail - sub $I11, rx411_pos, rx411_off - substr $S10, rx411_tgt, $I11, 1 - ne $S10, "!", rx411_fail - add rx411_pos, 1 - alt415_0: - set_addr $I10, alt415_1 - rx411_cur."!mark_push"(0, rx411_pos, $I10) + add $I11, rx406_pos, 1 + gt $I11, rx406_eos, rx406_fail + sub $I11, rx406_pos, rx406_off + substr $S10, rx406_tgt, $I11, 1 + ne $S10, "!", rx406_fail + add rx406_pos, 1 + alt410_0: + set_addr $I10, alt410_1 + rx406_cur."!mark_push"(0, rx406_pos, $I10) # rx subrule "before" subtype=zerowidth negate= - rx411_cur."!cursor_pos"(rx411_pos) - .const 'Sub' $P417 = "132_1258208089.76063" - capture_lex $P417 - $P10 = rx411_cur."before"($P417) - unless $P10, rx411_fail - goto alt415_end - alt415_1: + rx406_cur."!cursor_pos"(rx406_pos) + .const 'Sub' $P412 = "132_1258264421.2958" + capture_lex $P412 + $P10 = rx406_cur."before"($P412) + unless $P10, rx406_fail + goto alt410_end + alt410_1: # rx subrule "assertion" subtype=capture negate= - rx411_cur."!cursor_pos"(rx411_pos) - $P10 = rx411_cur."assertion"() - unless $P10, rx411_fail - rx411_cur."!mark_push"(0, -1, 0, $P10) + rx406_cur."!cursor_pos"(rx406_pos) + $P10 = rx406_cur."assertion"() + unless $P10, rx406_fail + rx406_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("assertion") - rx411_pos = $P10."pos"() - alt415_end: + rx406_pos = $P10."pos"() + alt410_end: # rx pass - rx411_cur."!cursor_pass"(rx411_pos, "assertion:sym") - rx411_cur."!cursor_debug"("PASS ", "assertion:sym", " at pos=", rx411_pos) - .return (rx411_cur) - rx411_fail: -.annotate "line", 3 - (rx411_rep, rx411_pos, $I10, $P10) = rx411_cur."!mark_fail"(0) - lt rx411_pos, -1, rx411_done - eq rx411_pos, -1, rx411_fail + rx406_cur."!cursor_pass"(rx406_pos, "assertion:sym") + rx406_cur."!cursor_debug"("PASS ", "assertion:sym", " at pos=", rx406_pos) + .return (rx406_cur) + rx406_fail: +.annotate "line", 3 + (rx406_rep, rx406_pos, $I10, $P10) = rx406_cur."!mark_fail"(0) + lt rx406_pos, -1, rx406_done + eq rx406_pos, -1, rx406_fail jump $I10 - rx411_done: - rx411_cur."!cursor_fail"() - rx411_cur."!cursor_debug"("FAIL ", "assertion:sym") - .return (rx411_cur) + rx406_done: + rx406_cur."!cursor_fail"() + rx406_cur."!cursor_debug"("FAIL ", "assertion:sym") + .return (rx406_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__assertion:sym" :subid("131_1258208089.76063") :method +.sub "!PREFIX__assertion:sym" :subid("131_1258264421.2958") :method .annotate "line", 3 - $P413 = self."!PREFIX__!subrule"("assertion", "!") - new $P414, "ResizablePMCArray" - push $P414, $P413 - push $P414, "!" - .return ($P414) + $P408 = self."!PREFIX__!subrule"("assertion", "!") + new $P409, "ResizablePMCArray" + push $P409, $P408 + push $P409, "!" + .return ($P409) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block416" :anon :subid("132_1258208089.76063") :method :outer("130_1258208089.76063") +.sub "_block411" :anon :subid("132_1258264421.2958") :method :outer("130_1258264421.2958") .annotate "line", 134 - .local string rx418_tgt - .local int rx418_pos - .local int rx418_off - .local int rx418_eos - .local int rx418_rep - .local pmc rx418_cur - (rx418_cur, rx418_pos, rx418_tgt, $I10) = self."!cursor_start"() - rx418_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx418_cur + .local string rx413_tgt + .local int rx413_pos + .local int rx413_off + .local int rx413_eos + .local int rx413_rep + .local pmc rx413_cur + (rx413_cur, rx413_pos, rx413_tgt, $I10) = self."!cursor_start"() + rx413_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx413_cur .local pmc match .lex "$/", match - length rx418_eos, rx418_tgt - set rx418_off, 0 - lt $I10, 2, rx418_start - sub rx418_off, $I10, 1 - substr rx418_tgt, rx418_tgt, rx418_off - rx418_start: - ge rx418_pos, 0, rxscan419_done - rxscan419_loop: - ($P10) = rx418_cur."from"() + length rx413_eos, rx413_tgt + set rx413_off, 0 + lt $I10, 2, rx413_start + sub rx413_off, $I10, 1 + substr rx413_tgt, rx413_tgt, rx413_off + rx413_start: + ge rx413_pos, 0, rxscan414_done + rxscan414_loop: + ($P10) = rx413_cur."from"() inc $P10 - set rx418_pos, $P10 - ge rx418_pos, rx418_eos, rxscan419_done - set_addr $I10, rxscan419_loop - rx418_cur."!mark_push"(0, rx418_pos, $I10) - rxscan419_done: + set rx413_pos, $P10 + ge rx413_pos, rx413_eos, rxscan414_done + set_addr $I10, rxscan414_loop + rx413_cur."!mark_push"(0, rx413_pos, $I10) + rxscan414_done: # rx literal ">" - add $I11, rx418_pos, 1 - gt $I11, rx418_eos, rx418_fail - sub $I11, rx418_pos, rx418_off - substr $S10, rx418_tgt, $I11, 1 - ne $S10, ">", rx418_fail - add rx418_pos, 1 + add $I11, rx413_pos, 1 + gt $I11, rx413_eos, rx413_fail + sub $I11, rx413_pos, rx413_off + substr $S10, rx413_tgt, $I11, 1 + ne $S10, ">", rx413_fail + add rx413_pos, 1 # rx pass - rx418_cur."!cursor_pass"(rx418_pos, "") - rx418_cur."!cursor_debug"("PASS ", "", " at pos=", rx418_pos) - .return (rx418_cur) - rx418_fail: - (rx418_rep, rx418_pos, $I10, $P10) = rx418_cur."!mark_fail"(0) - lt rx418_pos, -1, rx418_done - eq rx418_pos, -1, rx418_fail + rx413_cur."!cursor_pass"(rx413_pos, "") + rx413_cur."!cursor_debug"("PASS ", "", " at pos=", rx413_pos) + .return (rx413_cur) + rx413_fail: + (rx413_rep, rx413_pos, $I10, $P10) = rx413_cur."!mark_fail"(0) + lt rx413_pos, -1, rx413_done + eq rx413_pos, -1, rx413_fail jump $I10 - rx418_done: - rx418_cur."!cursor_fail"() - rx418_cur."!cursor_debug"("FAIL ", "") - .return (rx418_cur) + rx413_done: + rx413_cur."!cursor_fail"() + rx413_cur."!cursor_debug"("FAIL ", "") + .return (rx413_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "assertion:sym" :subid("133_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "assertion:sym" :subid("133_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx421_tgt - .local int rx421_pos - .local int rx421_off - .local int rx421_eos - .local int rx421_rep - .local pmc rx421_cur - (rx421_cur, rx421_pos, rx421_tgt, $I10) = self."!cursor_start"() - rx421_cur."!cursor_debug"("START ", "assertion:sym") - .lex unicode:"$\x{a2}", rx421_cur + .local string rx416_tgt + .local int rx416_pos + .local int rx416_off + .local int rx416_eos + .local int rx416_rep + .local pmc rx416_cur + (rx416_cur, rx416_pos, rx416_tgt, $I10) = self."!cursor_start"() + rx416_cur."!cursor_debug"("START ", "assertion:sym") + .lex unicode:"$\x{a2}", rx416_cur .local pmc match .lex "$/", match - length rx421_eos, rx421_tgt - set rx421_off, 0 - lt $I10, 2, rx421_start - sub rx421_off, $I10, 1 - substr rx421_tgt, rx421_tgt, rx421_off - rx421_start: + length rx416_eos, rx416_tgt + set rx416_off, 0 + lt $I10, 2, rx416_start + sub rx416_off, $I10, 1 + substr rx416_tgt, rx416_tgt, rx416_off + rx416_start: .annotate "line", 137 # rx literal "." - add $I11, rx421_pos, 1 - gt $I11, rx421_eos, rx421_fail - sub $I11, rx421_pos, rx421_off - substr $S10, rx421_tgt, $I11, 1 - ne $S10, ".", rx421_fail - add rx421_pos, 1 + add $I11, rx416_pos, 1 + gt $I11, rx416_eos, rx416_fail + sub $I11, rx416_pos, rx416_off + substr $S10, rx416_tgt, $I11, 1 + ne $S10, ".", rx416_fail + add rx416_pos, 1 # rx subrule "assertion" subtype=capture negate= - rx421_cur."!cursor_pos"(rx421_pos) - $P10 = rx421_cur."assertion"() - unless $P10, rx421_fail - rx421_cur."!mark_push"(0, -1, 0, $P10) + rx416_cur."!cursor_pos"(rx416_pos) + $P10 = rx416_cur."assertion"() + unless $P10, rx416_fail + rx416_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("assertion") - rx421_pos = $P10."pos"() + rx416_pos = $P10."pos"() .annotate "line", 136 # rx pass - rx421_cur."!cursor_pass"(rx421_pos, "assertion:sym") - rx421_cur."!cursor_debug"("PASS ", "assertion:sym", " at pos=", rx421_pos) - .return (rx421_cur) - rx421_fail: -.annotate "line", 3 - (rx421_rep, rx421_pos, $I10, $P10) = rx421_cur."!mark_fail"(0) - lt rx421_pos, -1, rx421_done - eq rx421_pos, -1, rx421_fail + rx416_cur."!cursor_pass"(rx416_pos, "assertion:sym") + rx416_cur."!cursor_debug"("PASS ", "assertion:sym", " at pos=", rx416_pos) + .return (rx416_cur) + rx416_fail: +.annotate "line", 3 + (rx416_rep, rx416_pos, $I10, $P10) = rx416_cur."!mark_fail"(0) + lt rx416_pos, -1, rx416_done + eq rx416_pos, -1, rx416_fail jump $I10 - rx421_done: - rx421_cur."!cursor_fail"() - rx421_cur."!cursor_debug"("FAIL ", "assertion:sym") - .return (rx421_cur) + rx416_done: + rx416_cur."!cursor_fail"() + rx416_cur."!cursor_debug"("FAIL ", "assertion:sym") + .return (rx416_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__assertion:sym" :subid("134_1258208089.76063") :method +.sub "!PREFIX__assertion:sym" :subid("134_1258264421.2958") :method .annotate "line", 3 - $P423 = self."!PREFIX__!subrule"("assertion", ".") - new $P424, "ResizablePMCArray" - push $P424, $P423 - .return ($P424) + $P418 = self."!PREFIX__!subrule"("assertion", ".") + new $P419, "ResizablePMCArray" + push $P419, $P418 + .return ($P419) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "assertion:sym" :subid("135_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "assertion:sym" :subid("135_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P433 = "137_1258208089.76063" - capture_lex $P433 - .local string rx426_tgt - .local int rx426_pos - .local int rx426_off - .local int rx426_eos - .local int rx426_rep - .local pmc rx426_cur - (rx426_cur, rx426_pos, rx426_tgt, $I10) = self."!cursor_start"() - rx426_cur."!cursor_debug"("START ", "assertion:sym") - rx426_cur."!cursor_caparray"("arglist", "nibbler", "assertion") - .lex unicode:"$\x{a2}", rx426_cur + .const 'Sub' $P428 = "137_1258264421.2958" + capture_lex $P428 + .local string rx421_tgt + .local int rx421_pos + .local int rx421_off + .local int rx421_eos + .local int rx421_rep + .local pmc rx421_cur + (rx421_cur, rx421_pos, rx421_tgt, $I10) = self."!cursor_start"() + rx421_cur."!cursor_debug"("START ", "assertion:sym") + rx421_cur."!cursor_caparray"("assertion", "nibbler", "arglist") + .lex unicode:"$\x{a2}", rx421_cur .local pmc match .lex "$/", match - length rx426_eos, rx426_tgt - set rx426_off, 0 - lt $I10, 2, rx426_start - sub rx426_off, $I10, 1 - substr rx426_tgt, rx426_tgt, rx426_off - rx426_start: + length rx421_eos, rx421_tgt + set rx421_off, 0 + lt $I10, 2, rx421_start + sub rx421_off, $I10, 1 + substr rx421_tgt, rx421_tgt, rx421_off + rx421_start: .annotate "line", 141 # rx subcapture "longname" - set_addr $I10, rxcap_429_fail - rx426_cur."!mark_push"(0, rx426_pos, $I10) + set_addr $I10, rxcap_424_fail + rx421_cur."!mark_push"(0, rx421_pos, $I10) # rx charclass_q w r 1..-1 - sub $I10, rx426_pos, rx426_off - find_not_cclass $I11, 8192, rx426_tgt, $I10, rx426_eos + sub $I10, rx421_pos, rx421_off + find_not_cclass $I11, 8192, rx421_tgt, $I10, rx421_eos add $I12, $I10, 1 - lt $I11, $I12, rx426_fail - add rx426_pos, rx426_off, $I11 - set_addr $I10, rxcap_429_fail - ($I12, $I11) = rx426_cur."!mark_peek"($I10) - rx426_cur."!cursor_pos"($I11) - ($P10) = rx426_cur."!cursor_start"() - $P10."!cursor_pass"(rx426_pos, "") - rx426_cur."!mark_push"(0, -1, 0, $P10) + lt $I11, $I12, rx421_fail + add rx421_pos, rx421_off, $I11 + set_addr $I10, rxcap_424_fail + ($I12, $I11) = rx421_cur."!mark_peek"($I10) + rx421_cur."!cursor_pos"($I11) + ($P10) = rx421_cur."!cursor_start"() + $P10."!cursor_pass"(rx421_pos, "") + rx421_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("longname") - goto rxcap_429_done - rxcap_429_fail: - goto rx426_fail - rxcap_429_done: + goto rxcap_424_done + rxcap_424_fail: + goto rx421_fail + rxcap_424_done: .annotate "line", 148 - # rx rxquantr430 ** 0..1 - set_addr $I436, rxquantr430_done - rx426_cur."!mark_push"(0, rx426_pos, $I436) - rxquantr430_loop: - alt431_0: + # rx rxquantr425 ** 0..1 + set_addr $I431, rxquantr425_done + rx421_cur."!mark_push"(0, rx421_pos, $I431) + rxquantr425_loop: + alt426_0: .annotate "line", 142 - set_addr $I10, alt431_1 - rx426_cur."!mark_push"(0, rx426_pos, $I10) + set_addr $I10, alt426_1 + rx421_cur."!mark_push"(0, rx421_pos, $I10) .annotate "line", 143 # rx subrule "before" subtype=zerowidth negate= - rx426_cur."!cursor_pos"(rx426_pos) - .const 'Sub' $P433 = "137_1258208089.76063" - capture_lex $P433 - $P10 = rx426_cur."before"($P433) - unless $P10, rx426_fail - goto alt431_end - alt431_1: - set_addr $I10, alt431_2 - rx426_cur."!mark_push"(0, rx426_pos, $I10) + rx421_cur."!cursor_pos"(rx421_pos) + .const 'Sub' $P428 = "137_1258264421.2958" + capture_lex $P428 + $P10 = rx421_cur."before"($P428) + unless $P10, rx421_fail + goto alt426_end + alt426_1: + set_addr $I10, alt426_2 + rx421_cur."!mark_push"(0, rx421_pos, $I10) .annotate "line", 144 # rx literal "=" - add $I11, rx426_pos, 1 - gt $I11, rx426_eos, rx426_fail - sub $I11, rx426_pos, rx426_off - substr $S10, rx426_tgt, $I11, 1 - ne $S10, "=", rx426_fail - add rx426_pos, 1 + add $I11, rx421_pos, 1 + gt $I11, rx421_eos, rx421_fail + sub $I11, rx421_pos, rx421_off + substr $S10, rx421_tgt, $I11, 1 + ne $S10, "=", rx421_fail + add rx421_pos, 1 # rx subrule "assertion" subtype=capture negate= - rx426_cur."!cursor_pos"(rx426_pos) - $P10 = rx426_cur."assertion"() - unless $P10, rx426_fail - rx426_cur."!mark_push"(0, -1, 0, $P10) + rx421_cur."!cursor_pos"(rx421_pos) + $P10 = rx421_cur."assertion"() + unless $P10, rx421_fail + rx421_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("assertion") - rx426_pos = $P10."pos"() - goto alt431_end - alt431_2: - set_addr $I10, alt431_3 - rx426_cur."!mark_push"(0, rx426_pos, $I10) + rx421_pos = $P10."pos"() + goto alt426_end + alt426_2: + set_addr $I10, alt426_3 + rx421_cur."!mark_push"(0, rx421_pos, $I10) .annotate "line", 145 # rx literal ":" - add $I11, rx426_pos, 1 - gt $I11, rx426_eos, rx426_fail - sub $I11, rx426_pos, rx426_off - substr $S10, rx426_tgt, $I11, 1 - ne $S10, ":", rx426_fail - add rx426_pos, 1 + add $I11, rx421_pos, 1 + gt $I11, rx421_eos, rx421_fail + sub $I11, rx421_pos, rx421_off + substr $S10, rx421_tgt, $I11, 1 + ne $S10, ":", rx421_fail + add rx421_pos, 1 # rx subrule "arglist" subtype=capture negate= - rx426_cur."!cursor_pos"(rx426_pos) - $P10 = rx426_cur."arglist"() - unless $P10, rx426_fail - rx426_cur."!mark_push"(0, -1, 0, $P10) + rx421_cur."!cursor_pos"(rx421_pos) + $P10 = rx421_cur."arglist"() + unless $P10, rx421_fail + rx421_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("arglist") - rx426_pos = $P10."pos"() - goto alt431_end - alt431_3: - set_addr $I10, alt431_4 - rx426_cur."!mark_push"(0, rx426_pos, $I10) + rx421_pos = $P10."pos"() + goto alt426_end + alt426_3: + set_addr $I10, alt426_4 + rx421_cur."!mark_push"(0, rx421_pos, $I10) .annotate "line", 146 # rx literal "(" - add $I11, rx426_pos, 1 - gt $I11, rx426_eos, rx426_fail - sub $I11, rx426_pos, rx426_off - substr $S10, rx426_tgt, $I11, 1 - ne $S10, "(", rx426_fail - add rx426_pos, 1 + add $I11, rx421_pos, 1 + gt $I11, rx421_eos, rx421_fail + sub $I11, rx421_pos, rx421_off + substr $S10, rx421_tgt, $I11, 1 + ne $S10, "(", rx421_fail + add rx421_pos, 1 # rx subrule "arglist" subtype=capture negate= - rx426_cur."!cursor_pos"(rx426_pos) - $P10 = rx426_cur."arglist"() - unless $P10, rx426_fail - rx426_cur."!mark_push"(0, -1, 0, $P10) + rx421_cur."!cursor_pos"(rx421_pos) + $P10 = rx421_cur."arglist"() + unless $P10, rx421_fail + rx421_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("arglist") - rx426_pos = $P10."pos"() + rx421_pos = $P10."pos"() # rx literal ")" - add $I11, rx426_pos, 1 - gt $I11, rx426_eos, rx426_fail - sub $I11, rx426_pos, rx426_off - substr $S10, rx426_tgt, $I11, 1 - ne $S10, ")", rx426_fail - add rx426_pos, 1 - goto alt431_end - alt431_4: + add $I11, rx421_pos, 1 + gt $I11, rx421_eos, rx421_fail + sub $I11, rx421_pos, rx421_off + substr $S10, rx421_tgt, $I11, 1 + ne $S10, ")", rx421_fail + add rx421_pos, 1 + goto alt426_end + alt426_4: .annotate "line", 147 # rx subrule "normspace" subtype=method negate= - rx426_cur."!cursor_pos"(rx426_pos) - $P10 = rx426_cur."normspace"() - unless $P10, rx426_fail - rx426_pos = $P10."pos"() + rx421_cur."!cursor_pos"(rx421_pos) + $P10 = rx421_cur."normspace"() + unless $P10, rx421_fail + rx421_pos = $P10."pos"() # rx subrule "nibbler" subtype=capture negate= - rx426_cur."!cursor_pos"(rx426_pos) - $P10 = rx426_cur."nibbler"() - unless $P10, rx426_fail - rx426_cur."!mark_push"(0, -1, 0, $P10) + rx421_cur."!cursor_pos"(rx421_pos) + $P10 = rx421_cur."nibbler"() + unless $P10, rx421_fail + rx421_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("nibbler") - rx426_pos = $P10."pos"() - alt431_end: + rx421_pos = $P10."pos"() + alt426_end: .annotate "line", 148 - (rx426_rep) = rx426_cur."!mark_commit"($I436) - rxquantr430_done: + (rx421_rep) = rx421_cur."!mark_commit"($I431) + rxquantr425_done: .annotate "line", 140 # rx pass - rx426_cur."!cursor_pass"(rx426_pos, "assertion:sym") - rx426_cur."!cursor_debug"("PASS ", "assertion:sym", " at pos=", rx426_pos) - .return (rx426_cur) - rx426_fail: -.annotate "line", 3 - (rx426_rep, rx426_pos, $I10, $P10) = rx426_cur."!mark_fail"(0) - lt rx426_pos, -1, rx426_done - eq rx426_pos, -1, rx426_fail + rx421_cur."!cursor_pass"(rx421_pos, "assertion:sym") + rx421_cur."!cursor_debug"("PASS ", "assertion:sym", " at pos=", rx421_pos) + .return (rx421_cur) + rx421_fail: +.annotate "line", 3 + (rx421_rep, rx421_pos, $I10, $P10) = rx421_cur."!mark_fail"(0) + lt rx421_pos, -1, rx421_done + eq rx421_pos, -1, rx421_fail jump $I10 - rx426_done: - rx426_cur."!cursor_fail"() - rx426_cur."!cursor_debug"("FAIL ", "assertion:sym") - .return (rx426_cur) + rx421_done: + rx421_cur."!cursor_fail"() + rx421_cur."!cursor_debug"("FAIL ", "assertion:sym") + .return (rx421_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__assertion:sym" :subid("136_1258208089.76063") :method +.sub "!PREFIX__assertion:sym" :subid("136_1258264421.2958") :method .annotate "line", 3 - new $P428, "ResizablePMCArray" - push $P428, "" - .return ($P428) + new $P423, "ResizablePMCArray" + push $P423, "" + .return ($P423) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block432" :anon :subid("137_1258208089.76063") :method :outer("135_1258208089.76063") +.sub "_block427" :anon :subid("137_1258264421.2958") :method :outer("135_1258264421.2958") .annotate "line", 143 - .local string rx434_tgt - .local int rx434_pos - .local int rx434_off - .local int rx434_eos - .local int rx434_rep - .local pmc rx434_cur - (rx434_cur, rx434_pos, rx434_tgt, $I10) = self."!cursor_start"() - rx434_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx434_cur + .local string rx429_tgt + .local int rx429_pos + .local int rx429_off + .local int rx429_eos + .local int rx429_rep + .local pmc rx429_cur + (rx429_cur, rx429_pos, rx429_tgt, $I10) = self."!cursor_start"() + rx429_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx429_cur .local pmc match .lex "$/", match - length rx434_eos, rx434_tgt - set rx434_off, 0 - lt $I10, 2, rx434_start - sub rx434_off, $I10, 1 - substr rx434_tgt, rx434_tgt, rx434_off - rx434_start: - ge rx434_pos, 0, rxscan435_done - rxscan435_loop: - ($P10) = rx434_cur."from"() + length rx429_eos, rx429_tgt + set rx429_off, 0 + lt $I10, 2, rx429_start + sub rx429_off, $I10, 1 + substr rx429_tgt, rx429_tgt, rx429_off + rx429_start: + ge rx429_pos, 0, rxscan430_done + rxscan430_loop: + ($P10) = rx429_cur."from"() inc $P10 - set rx434_pos, $P10 - ge rx434_pos, rx434_eos, rxscan435_done - set_addr $I10, rxscan435_loop - rx434_cur."!mark_push"(0, rx434_pos, $I10) - rxscan435_done: + set rx429_pos, $P10 + ge rx429_pos, rx429_eos, rxscan430_done + set_addr $I10, rxscan430_loop + rx429_cur."!mark_push"(0, rx429_pos, $I10) + rxscan430_done: # rx literal ">" - add $I11, rx434_pos, 1 - gt $I11, rx434_eos, rx434_fail - sub $I11, rx434_pos, rx434_off - substr $S10, rx434_tgt, $I11, 1 - ne $S10, ">", rx434_fail - add rx434_pos, 1 + add $I11, rx429_pos, 1 + gt $I11, rx429_eos, rx429_fail + sub $I11, rx429_pos, rx429_off + substr $S10, rx429_tgt, $I11, 1 + ne $S10, ">", rx429_fail + add rx429_pos, 1 # rx pass - rx434_cur."!cursor_pass"(rx434_pos, "") - rx434_cur."!cursor_debug"("PASS ", "", " at pos=", rx434_pos) - .return (rx434_cur) - rx434_fail: - (rx434_rep, rx434_pos, $I10, $P10) = rx434_cur."!mark_fail"(0) - lt rx434_pos, -1, rx434_done - eq rx434_pos, -1, rx434_fail + rx429_cur."!cursor_pass"(rx429_pos, "") + rx429_cur."!cursor_debug"("PASS ", "", " at pos=", rx429_pos) + .return (rx429_cur) + rx429_fail: + (rx429_rep, rx429_pos, $I10, $P10) = rx429_cur."!mark_fail"(0) + lt rx429_pos, -1, rx429_done + eq rx429_pos, -1, rx429_fail jump $I10 - rx434_done: - rx434_cur."!cursor_fail"() - rx434_cur."!cursor_debug"("FAIL ", "") - .return (rx434_cur) + rx429_done: + rx429_cur."!cursor_fail"() + rx429_cur."!cursor_debug"("FAIL ", "") + .return (rx429_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "assertion:sym<[>" :subid("138_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "assertion:sym<[>" :subid("138_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P442 = "140_1258208089.76063" - capture_lex $P442 - .local string rx438_tgt - .local int rx438_pos - .local int rx438_off - .local int rx438_eos - .local int rx438_rep - .local pmc rx438_cur - (rx438_cur, rx438_pos, rx438_tgt, $I10) = self."!cursor_start"() - rx438_cur."!cursor_debug"("START ", "assertion:sym<[>") - rx438_cur."!cursor_caparray"("cclass_elem") - .lex unicode:"$\x{a2}", rx438_cur + .const 'Sub' $P437 = "140_1258264421.2958" + capture_lex $P437 + .local string rx433_tgt + .local int rx433_pos + .local int rx433_off + .local int rx433_eos + .local int rx433_rep + .local pmc rx433_cur + (rx433_cur, rx433_pos, rx433_tgt, $I10) = self."!cursor_start"() + rx433_cur."!cursor_debug"("START ", "assertion:sym<[>") + rx433_cur."!cursor_caparray"("cclass_elem") + .lex unicode:"$\x{a2}", rx433_cur .local pmc match .lex "$/", match - length rx438_eos, rx438_tgt - set rx438_off, 0 - lt $I10, 2, rx438_start - sub rx438_off, $I10, 1 - substr rx438_tgt, rx438_tgt, rx438_off - rx438_start: + length rx433_eos, rx433_tgt + set rx433_off, 0 + lt $I10, 2, rx433_start + sub rx433_off, $I10, 1 + substr rx433_tgt, rx433_tgt, rx433_off + rx433_start: .annotate "line", 151 # rx subrule "before" subtype=zerowidth negate= - rx438_cur."!cursor_pos"(rx438_pos) - .const 'Sub' $P442 = "140_1258208089.76063" - capture_lex $P442 - $P10 = rx438_cur."before"($P442) - unless $P10, rx438_fail - # rx rxquantr446 ** 1..* - set_addr $I447, rxquantr446_done - rx438_cur."!mark_push"(0, -1, $I447) - rxquantr446_loop: + rx433_cur."!cursor_pos"(rx433_pos) + .const 'Sub' $P437 = "140_1258264421.2958" + capture_lex $P437 + $P10 = rx433_cur."before"($P437) + unless $P10, rx433_fail + # rx rxquantr441 ** 1..* + set_addr $I442, rxquantr441_done + rx433_cur."!mark_push"(0, -1, $I442) + rxquantr441_loop: # rx subrule "cclass_elem" subtype=capture negate= - rx438_cur."!cursor_pos"(rx438_pos) - $P10 = rx438_cur."cclass_elem"() - unless $P10, rx438_fail - rx438_cur."!mark_push"(0, -1, 0, $P10) + rx433_cur."!cursor_pos"(rx433_pos) + $P10 = rx433_cur."cclass_elem"() + unless $P10, rx433_fail + rx433_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("cclass_elem") - rx438_pos = $P10."pos"() - (rx438_rep) = rx438_cur."!mark_commit"($I447) - rx438_cur."!mark_push"(rx438_rep, rx438_pos, $I447) - goto rxquantr446_loop - rxquantr446_done: + rx433_pos = $P10."pos"() + (rx433_rep) = rx433_cur."!mark_commit"($I442) + rx433_cur."!mark_push"(rx433_rep, rx433_pos, $I442) + goto rxquantr441_loop + rxquantr441_done: # rx pass - rx438_cur."!cursor_pass"(rx438_pos, "assertion:sym<[>") - rx438_cur."!cursor_debug"("PASS ", "assertion:sym<[>", " at pos=", rx438_pos) - .return (rx438_cur) - rx438_fail: -.annotate "line", 3 - (rx438_rep, rx438_pos, $I10, $P10) = rx438_cur."!mark_fail"(0) - lt rx438_pos, -1, rx438_done - eq rx438_pos, -1, rx438_fail + rx433_cur."!cursor_pass"(rx433_pos, "assertion:sym<[>") + rx433_cur."!cursor_debug"("PASS ", "assertion:sym<[>", " at pos=", rx433_pos) + .return (rx433_cur) + rx433_fail: +.annotate "line", 3 + (rx433_rep, rx433_pos, $I10, $P10) = rx433_cur."!mark_fail"(0) + lt rx433_pos, -1, rx433_done + eq rx433_pos, -1, rx433_fail jump $I10 - rx438_done: - rx438_cur."!cursor_fail"() - rx438_cur."!cursor_debug"("FAIL ", "assertion:sym<[>") - .return (rx438_cur) + rx433_done: + rx433_cur."!cursor_fail"() + rx433_cur."!cursor_debug"("FAIL ", "assertion:sym<[>") + .return (rx433_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__assertion:sym<[>" :subid("139_1258208089.76063") :method +.sub "!PREFIX__assertion:sym<[>" :subid("139_1258264421.2958") :method .annotate "line", 3 - new $P440, "ResizablePMCArray" - push $P440, "" - .return ($P440) + new $P435, "ResizablePMCArray" + push $P435, "" + .return ($P435) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block441" :anon :subid("140_1258208089.76063") :method :outer("138_1258208089.76063") +.sub "_block436" :anon :subid("140_1258264421.2958") :method :outer("138_1258264421.2958") .annotate "line", 151 - .local string rx443_tgt - .local int rx443_pos - .local int rx443_off - .local int rx443_eos - .local int rx443_rep - .local pmc rx443_cur - (rx443_cur, rx443_pos, rx443_tgt, $I10) = self."!cursor_start"() - rx443_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx443_cur + .local string rx438_tgt + .local int rx438_pos + .local int rx438_off + .local int rx438_eos + .local int rx438_rep + .local pmc rx438_cur + (rx438_cur, rx438_pos, rx438_tgt, $I10) = self."!cursor_start"() + rx438_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx438_cur .local pmc match .lex "$/", match - length rx443_eos, rx443_tgt - set rx443_off, 0 - lt $I10, 2, rx443_start - sub rx443_off, $I10, 1 - substr rx443_tgt, rx443_tgt, rx443_off - rx443_start: - ge rx443_pos, 0, rxscan444_done - rxscan444_loop: - ($P10) = rx443_cur."from"() + length rx438_eos, rx438_tgt + set rx438_off, 0 + lt $I10, 2, rx438_start + sub rx438_off, $I10, 1 + substr rx438_tgt, rx438_tgt, rx438_off + rx438_start: + ge rx438_pos, 0, rxscan439_done + rxscan439_loop: + ($P10) = rx438_cur."from"() inc $P10 - set rx443_pos, $P10 - ge rx443_pos, rx443_eos, rxscan444_done - set_addr $I10, rxscan444_loop - rx443_cur."!mark_push"(0, rx443_pos, $I10) - rxscan444_done: - alt445_0: - set_addr $I10, alt445_1 - rx443_cur."!mark_push"(0, rx443_pos, $I10) + set rx438_pos, $P10 + ge rx438_pos, rx438_eos, rxscan439_done + set_addr $I10, rxscan439_loop + rx438_cur."!mark_push"(0, rx438_pos, $I10) + rxscan439_done: + alt440_0: + set_addr $I10, alt440_1 + rx438_cur."!mark_push"(0, rx438_pos, $I10) # rx literal "[" - add $I11, rx443_pos, 1 - gt $I11, rx443_eos, rx443_fail - sub $I11, rx443_pos, rx443_off - substr $S10, rx443_tgt, $I11, 1 - ne $S10, "[", rx443_fail - add rx443_pos, 1 - goto alt445_end - alt445_1: - set_addr $I10, alt445_2 - rx443_cur."!mark_push"(0, rx443_pos, $I10) + add $I11, rx438_pos, 1 + gt $I11, rx438_eos, rx438_fail + sub $I11, rx438_pos, rx438_off + substr $S10, rx438_tgt, $I11, 1 + ne $S10, "[", rx438_fail + add rx438_pos, 1 + goto alt440_end + alt440_1: + set_addr $I10, alt440_2 + rx438_cur."!mark_push"(0, rx438_pos, $I10) # rx literal "+" - add $I11, rx443_pos, 1 - gt $I11, rx443_eos, rx443_fail - sub $I11, rx443_pos, rx443_off - substr $S10, rx443_tgt, $I11, 1 - ne $S10, "+", rx443_fail - add rx443_pos, 1 - goto alt445_end - alt445_2: + add $I11, rx438_pos, 1 + gt $I11, rx438_eos, rx438_fail + sub $I11, rx438_pos, rx438_off + substr $S10, rx438_tgt, $I11, 1 + ne $S10, "+", rx438_fail + add rx438_pos, 1 + goto alt440_end + alt440_2: # rx literal "-" - add $I11, rx443_pos, 1 - gt $I11, rx443_eos, rx443_fail - sub $I11, rx443_pos, rx443_off - substr $S10, rx443_tgt, $I11, 1 - ne $S10, "-", rx443_fail - add rx443_pos, 1 - alt445_end: + add $I11, rx438_pos, 1 + gt $I11, rx438_eos, rx438_fail + sub $I11, rx438_pos, rx438_off + substr $S10, rx438_tgt, $I11, 1 + ne $S10, "-", rx438_fail + add rx438_pos, 1 + alt440_end: # rx pass - rx443_cur."!cursor_pass"(rx443_pos, "") - rx443_cur."!cursor_debug"("PASS ", "", " at pos=", rx443_pos) - .return (rx443_cur) - rx443_fail: - (rx443_rep, rx443_pos, $I10, $P10) = rx443_cur."!mark_fail"(0) - lt rx443_pos, -1, rx443_done - eq rx443_pos, -1, rx443_fail + rx438_cur."!cursor_pass"(rx438_pos, "") + rx438_cur."!cursor_debug"("PASS ", "", " at pos=", rx438_pos) + .return (rx438_cur) + rx438_fail: + (rx438_rep, rx438_pos, $I10, $P10) = rx438_cur."!mark_fail"(0) + lt rx438_pos, -1, rx438_done + eq rx438_pos, -1, rx438_fail jump $I10 - rx443_done: - rx443_cur."!cursor_fail"() - rx443_cur."!cursor_debug"("FAIL ", "") - .return (rx443_cur) + rx438_done: + rx438_cur."!cursor_fail"() + rx438_cur."!cursor_debug"("FAIL ", "") + .return (rx438_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "cclass_elem" :subid("141_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "cclass_elem" :subid("141_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .const 'Sub' $P459 = "143_1258208089.76063" - capture_lex $P459 - .local string rx449_tgt - .local int rx449_pos - .local int rx449_off - .local int rx449_eos - .local int rx449_rep - .local pmc rx449_cur - (rx449_cur, rx449_pos, rx449_tgt, $I10) = self."!cursor_start"() - rx449_cur."!cursor_debug"("START ", "cclass_elem") - rx449_cur."!cursor_caparray"("charspec") - .lex unicode:"$\x{a2}", rx449_cur + .const 'Sub' $P454 = "143_1258264421.2958" + capture_lex $P454 + .local string rx444_tgt + .local int rx444_pos + .local int rx444_off + .local int rx444_eos + .local int rx444_rep + .local pmc rx444_cur + (rx444_cur, rx444_pos, rx444_tgt, $I10) = self."!cursor_start"() + rx444_cur."!cursor_debug"("START ", "cclass_elem") + rx444_cur."!cursor_caparray"("charspec") + .lex unicode:"$\x{a2}", rx444_cur .local pmc match .lex "$/", match - length rx449_eos, rx449_tgt - set rx449_off, 0 - lt $I10, 2, rx449_start - sub rx449_off, $I10, 1 - substr rx449_tgt, rx449_tgt, rx449_off - rx449_start: + length rx444_eos, rx444_tgt + set rx444_off, 0 + lt $I10, 2, rx444_start + sub rx444_off, $I10, 1 + substr rx444_tgt, rx444_tgt, rx444_off + rx444_start: .annotate "line", 154 # rx subcapture "sign" - set_addr $I10, rxcap_453_fail - rx449_cur."!mark_push"(0, rx449_pos, $I10) - alt452_0: - set_addr $I10, alt452_1 - rx449_cur."!mark_push"(0, rx449_pos, $I10) + set_addr $I10, rxcap_448_fail + rx444_cur."!mark_push"(0, rx444_pos, $I10) + alt447_0: + set_addr $I10, alt447_1 + rx444_cur."!mark_push"(0, rx444_pos, $I10) # rx literal "+" - add $I11, rx449_pos, 1 - gt $I11, rx449_eos, rx449_fail - sub $I11, rx449_pos, rx449_off - substr $S10, rx449_tgt, $I11, 1 - ne $S10, "+", rx449_fail - add rx449_pos, 1 - goto alt452_end - alt452_1: - set_addr $I10, alt452_2 - rx449_cur."!mark_push"(0, rx449_pos, $I10) + add $I11, rx444_pos, 1 + gt $I11, rx444_eos, rx444_fail + sub $I11, rx444_pos, rx444_off + substr $S10, rx444_tgt, $I11, 1 + ne $S10, "+", rx444_fail + add rx444_pos, 1 + goto alt447_end + alt447_1: + set_addr $I10, alt447_2 + rx444_cur."!mark_push"(0, rx444_pos, $I10) # rx literal "-" - add $I11, rx449_pos, 1 - gt $I11, rx449_eos, rx449_fail - sub $I11, rx449_pos, rx449_off - substr $S10, rx449_tgt, $I11, 1 - ne $S10, "-", rx449_fail - add rx449_pos, 1 - goto alt452_end - alt452_2: - alt452_end: - set_addr $I10, rxcap_453_fail - ($I12, $I11) = rx449_cur."!mark_peek"($I10) - rx449_cur."!cursor_pos"($I11) - ($P10) = rx449_cur."!cursor_start"() - $P10."!cursor_pass"(rx449_pos, "") - rx449_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx444_pos, 1 + gt $I11, rx444_eos, rx444_fail + sub $I11, rx444_pos, rx444_off + substr $S10, rx444_tgt, $I11, 1 + ne $S10, "-", rx444_fail + add rx444_pos, 1 + goto alt447_end + alt447_2: + alt447_end: + set_addr $I10, rxcap_448_fail + ($I12, $I11) = rx444_cur."!mark_peek"($I10) + rx444_cur."!cursor_pos"($I11) + ($P10) = rx444_cur."!cursor_start"() + $P10."!cursor_pass"(rx444_pos, "") + rx444_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sign") - goto rxcap_453_done - rxcap_453_fail: - goto rx449_fail - rxcap_453_done: + goto rxcap_448_done + rxcap_448_fail: + goto rx444_fail + rxcap_448_done: .annotate "line", 155 - # rx rxquantr454 ** 0..1 - set_addr $I455, rxquantr454_done - rx449_cur."!mark_push"(0, rx449_pos, $I455) - rxquantr454_loop: + # rx rxquantr449 ** 0..1 + set_addr $I450, rxquantr449_done + rx444_cur."!mark_push"(0, rx444_pos, $I450) + rxquantr449_loop: # rx subrule "normspace" subtype=method negate= - rx449_cur."!cursor_pos"(rx449_pos) - $P10 = rx449_cur."normspace"() - unless $P10, rx449_fail - rx449_pos = $P10."pos"() - (rx449_rep) = rx449_cur."!mark_commit"($I455) - rxquantr454_done: - alt456_0: + rx444_cur."!cursor_pos"(rx444_pos) + $P10 = rx444_cur."normspace"() + unless $P10, rx444_fail + rx444_pos = $P10."pos"() + (rx444_rep) = rx444_cur."!mark_commit"($I450) + rxquantr449_done: + alt451_0: .annotate "line", 156 - set_addr $I10, alt456_1 - rx449_cur."!mark_push"(0, rx449_pos, $I10) + set_addr $I10, alt451_1 + rx444_cur."!mark_push"(0, rx444_pos, $I10) .annotate "line", 157 # rx literal "[" - add $I11, rx449_pos, 1 - gt $I11, rx449_eos, rx449_fail - sub $I11, rx449_pos, rx449_off - substr $S10, rx449_tgt, $I11, 1 - ne $S10, "[", rx449_fail - add rx449_pos, 1 + add $I11, rx444_pos, 1 + gt $I11, rx444_eos, rx444_fail + sub $I11, rx444_pos, rx444_off + substr $S10, rx444_tgt, $I11, 1 + ne $S10, "[", rx444_fail + add rx444_pos, 1 .annotate "line", 160 - # rx rxquantr457 ** 0..* - set_addr $I478, rxquantr457_done - rx449_cur."!mark_push"(0, rx449_pos, $I478) - rxquantr457_loop: + # rx rxquantr452 ** 0..* + set_addr $I473, rxquantr452_done + rx444_cur."!mark_push"(0, rx444_pos, $I473) + rxquantr452_loop: .annotate "line", 157 - # rx subrule $P459 subtype=capture negate= - rx449_cur."!cursor_pos"(rx449_pos) - .const 'Sub' $P459 = "143_1258208089.76063" - capture_lex $P459 - $P10 = rx449_cur.$P459() - unless $P10, rx449_fail - rx449_cur."!mark_push"(0, -1, 0, $P10) + # rx subrule $P454 subtype=capture negate= + rx444_cur."!cursor_pos"(rx444_pos) + .const 'Sub' $P454 = "143_1258264421.2958" + capture_lex $P454 + $P10 = rx444_cur.$P454() + unless $P10, rx444_fail + rx444_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("charspec") - rx449_pos = $P10."pos"() + rx444_pos = $P10."pos"() .annotate "line", 160 - (rx449_rep) = rx449_cur."!mark_commit"($I478) - rx449_cur."!mark_push"(rx449_rep, rx449_pos, $I478) - goto rxquantr457_loop - rxquantr457_done: + (rx444_rep) = rx444_cur."!mark_commit"($I473) + rx444_cur."!mark_push"(rx444_rep, rx444_pos, $I473) + goto rxquantr452_loop + rxquantr452_done: .annotate "line", 161 # rx charclass_q s r 0..-1 - sub $I10, rx449_pos, rx449_off - find_not_cclass $I11, 32, rx449_tgt, $I10, rx449_eos - add rx449_pos, rx449_off, $I11 + sub $I10, rx444_pos, rx444_off + find_not_cclass $I11, 32, rx444_tgt, $I10, rx444_eos + add rx444_pos, rx444_off, $I11 # rx literal "]" - add $I11, rx449_pos, 1 - gt $I11, rx449_eos, rx449_fail - sub $I11, rx449_pos, rx449_off - substr $S10, rx449_tgt, $I11, 1 - ne $S10, "]", rx449_fail - add rx449_pos, 1 + add $I11, rx444_pos, 1 + gt $I11, rx444_eos, rx444_fail + sub $I11, rx444_pos, rx444_off + substr $S10, rx444_tgt, $I11, 1 + ne $S10, "]", rx444_fail + add rx444_pos, 1 .annotate "line", 157 - goto alt456_end - alt456_1: + goto alt451_end + alt451_1: .annotate "line", 162 # rx subcapture "name" - set_addr $I10, rxcap_479_fail - rx449_cur."!mark_push"(0, rx449_pos, $I10) + set_addr $I10, rxcap_474_fail + rx444_cur."!mark_push"(0, rx444_pos, $I10) # rx charclass_q w r 1..-1 - sub $I10, rx449_pos, rx449_off - find_not_cclass $I11, 8192, rx449_tgt, $I10, rx449_eos + sub $I10, rx444_pos, rx444_off + find_not_cclass $I11, 8192, rx444_tgt, $I10, rx444_eos add $I12, $I10, 1 - lt $I11, $I12, rx449_fail - add rx449_pos, rx449_off, $I11 - set_addr $I10, rxcap_479_fail - ($I12, $I11) = rx449_cur."!mark_peek"($I10) - rx449_cur."!cursor_pos"($I11) - ($P10) = rx449_cur."!cursor_start"() - $P10."!cursor_pass"(rx449_pos, "") - rx449_cur."!mark_push"(0, -1, 0, $P10) + lt $I11, $I12, rx444_fail + add rx444_pos, rx444_off, $I11 + set_addr $I10, rxcap_474_fail + ($I12, $I11) = rx444_cur."!mark_peek"($I10) + rx444_cur."!cursor_pos"($I11) + ($P10) = rx444_cur."!cursor_start"() + $P10."!cursor_pass"(rx444_pos, "") + rx444_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("name") - goto rxcap_479_done - rxcap_479_fail: - goto rx449_fail - rxcap_479_done: - alt456_end: + goto rxcap_474_done + rxcap_474_fail: + goto rx444_fail + rxcap_474_done: + alt451_end: .annotate "line", 164 - # rx rxquantr480 ** 0..1 - set_addr $I481, rxquantr480_done - rx449_cur."!mark_push"(0, rx449_pos, $I481) - rxquantr480_loop: + # rx rxquantr475 ** 0..1 + set_addr $I476, rxquantr475_done + rx444_cur."!mark_push"(0, rx444_pos, $I476) + rxquantr475_loop: # rx subrule "normspace" subtype=method negate= - rx449_cur."!cursor_pos"(rx449_pos) - $P10 = rx449_cur."normspace"() - unless $P10, rx449_fail - rx449_pos = $P10."pos"() - (rx449_rep) = rx449_cur."!mark_commit"($I481) - rxquantr480_done: + rx444_cur."!cursor_pos"(rx444_pos) + $P10 = rx444_cur."normspace"() + unless $P10, rx444_fail + rx444_pos = $P10."pos"() + (rx444_rep) = rx444_cur."!mark_commit"($I476) + rxquantr475_done: .annotate "line", 153 # rx pass - rx449_cur."!cursor_pass"(rx449_pos, "cclass_elem") - rx449_cur."!cursor_debug"("PASS ", "cclass_elem", " at pos=", rx449_pos) - .return (rx449_cur) - rx449_fail: -.annotate "line", 3 - (rx449_rep, rx449_pos, $I10, $P10) = rx449_cur."!mark_fail"(0) - lt rx449_pos, -1, rx449_done - eq rx449_pos, -1, rx449_fail + rx444_cur."!cursor_pass"(rx444_pos, "cclass_elem") + rx444_cur."!cursor_debug"("PASS ", "cclass_elem", " at pos=", rx444_pos) + .return (rx444_cur) + rx444_fail: +.annotate "line", 3 + (rx444_rep, rx444_pos, $I10, $P10) = rx444_cur."!mark_fail"(0) + lt rx444_pos, -1, rx444_done + eq rx444_pos, -1, rx444_fail jump $I10 - rx449_done: - rx449_cur."!cursor_fail"() - rx449_cur."!cursor_debug"("FAIL ", "cclass_elem") - .return (rx449_cur) + rx444_done: + rx444_cur."!cursor_fail"() + rx444_cur."!cursor_debug"("FAIL ", "cclass_elem") + .return (rx444_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__cclass_elem" :subid("142_1258208089.76063") :method +.sub "!PREFIX__cclass_elem" :subid("142_1258264421.2958") :method .annotate "line", 3 - new $P451, "ResizablePMCArray" - push $P451, "" - push $P451, "-" - push $P451, "+" - .return ($P451) + new $P446, "ResizablePMCArray" + push $P446, "" + push $P446, "-" + push $P446, "+" + .return ($P446) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block458" :anon :subid("143_1258208089.76063") :method :outer("141_1258208089.76063") +.sub "_block453" :anon :subid("143_1258264421.2958") :method :outer("141_1258264421.2958") .annotate "line", 157 - .const 'Sub' $P474 = "146_1258208089.76063" - capture_lex $P474 - .const 'Sub' $P469 = "145_1258208089.76063" + .const 'Sub' $P469 = "146_1258264421.2958" capture_lex $P469 - .const 'Sub' $P465 = "144_1258208089.76063" - capture_lex $P465 - .local string rx460_tgt - .local int rx460_pos - .local int rx460_off - .local int rx460_eos - .local int rx460_rep - .local pmc rx460_cur - (rx460_cur, rx460_pos, rx460_tgt, $I10) = self."!cursor_start"() - rx460_cur."!cursor_debug"("START ", "") - rx460_cur."!cursor_caparray"("1") - .lex unicode:"$\x{a2}", rx460_cur + .const 'Sub' $P464 = "145_1258264421.2958" + capture_lex $P464 + .const 'Sub' $P460 = "144_1258264421.2958" + capture_lex $P460 + .local string rx455_tgt + .local int rx455_pos + .local int rx455_off + .local int rx455_eos + .local int rx455_rep + .local pmc rx455_cur + (rx455_cur, rx455_pos, rx455_tgt, $I10) = self."!cursor_start"() + rx455_cur."!cursor_debug"("START ", "") + rx455_cur."!cursor_caparray"("1") + .lex unicode:"$\x{a2}", rx455_cur .local pmc match .lex "$/", match - length rx460_eos, rx460_tgt - set rx460_off, 0 - lt $I10, 2, rx460_start - sub rx460_off, $I10, 1 - substr rx460_tgt, rx460_tgt, rx460_off - rx460_start: - ge rx460_pos, 0, rxscan461_done - rxscan461_loop: - ($P10) = rx460_cur."from"() + length rx455_eos, rx455_tgt + set rx455_off, 0 + lt $I10, 2, rx455_start + sub rx455_off, $I10, 1 + substr rx455_tgt, rx455_tgt, rx455_off + rx455_start: + ge rx455_pos, 0, rxscan456_done + rxscan456_loop: + ($P10) = rx455_cur."from"() inc $P10 - set rx460_pos, $P10 - ge rx460_pos, rx460_eos, rxscan461_done - set_addr $I10, rxscan461_loop - rx460_cur."!mark_push"(0, rx460_pos, $I10) - rxscan461_done: - alt462_0: - set_addr $I10, alt462_1 - rx460_cur."!mark_push"(0, rx460_pos, $I10) + set rx455_pos, $P10 + ge rx455_pos, rx455_eos, rxscan456_done + set_addr $I10, rxscan456_loop + rx455_cur."!mark_push"(0, rx455_pos, $I10) + rxscan456_done: + alt457_0: + set_addr $I10, alt457_1 + rx455_cur."!mark_push"(0, rx455_pos, $I10) .annotate "line", 158 # rx charclass_q s r 0..-1 - sub $I10, rx460_pos, rx460_off - find_not_cclass $I11, 32, rx460_tgt, $I10, rx460_eos - add rx460_pos, rx460_off, $I11 + sub $I10, rx455_pos, rx455_off + find_not_cclass $I11, 32, rx455_tgt, $I10, rx455_eos + add rx455_pos, rx455_off, $I11 # rx literal "-" - add $I11, rx460_pos, 1 - gt $I11, rx460_eos, rx460_fail - sub $I11, rx460_pos, rx460_off - substr $S10, rx460_tgt, $I11, 1 - ne $S10, "-", rx460_fail - add rx460_pos, 1 + add $I11, rx455_pos, 1 + gt $I11, rx455_eos, rx455_fail + sub $I11, rx455_pos, rx455_off + substr $S10, rx455_tgt, $I11, 1 + ne $S10, "-", rx455_fail + add rx455_pos, 1 # rx subrule "obs" subtype=method negate= - rx460_cur."!cursor_pos"(rx460_pos) - $P10 = rx460_cur."obs"("hyphen in enumerated character class", "..") - unless $P10, rx460_fail - rx460_pos = $P10."pos"() - goto alt462_end - alt462_1: + rx455_cur."!cursor_pos"(rx455_pos) + $P10 = rx455_cur."obs"("hyphen in enumerated character class", "..") + unless $P10, rx455_fail + rx455_pos = $P10."pos"() + goto alt457_end + alt457_1: .annotate "line", 159 # rx charclass_q s r 0..-1 - sub $I10, rx460_pos, rx460_off - find_not_cclass $I11, 32, rx460_tgt, $I10, rx460_eos - add rx460_pos, rx460_off, $I11 - alt463_0: - set_addr $I10, alt463_1 - rx460_cur."!mark_push"(0, rx460_pos, $I10) + sub $I10, rx455_pos, rx455_off + find_not_cclass $I11, 32, rx455_tgt, $I10, rx455_eos + add rx455_pos, rx455_off, $I11 + alt458_0: + set_addr $I10, alt458_1 + rx455_cur."!mark_push"(0, rx455_pos, $I10) # rx literal "\\" - add $I11, rx460_pos, 1 - gt $I11, rx460_eos, rx460_fail - sub $I11, rx460_pos, rx460_off - substr $S10, rx460_tgt, $I11, 1 - ne $S10, "\\", rx460_fail - add rx460_pos, 1 - # rx subrule $P465 subtype=capture negate= - rx460_cur."!cursor_pos"(rx460_pos) - .const 'Sub' $P465 = "144_1258208089.76063" - capture_lex $P465 - $P10 = rx460_cur.$P465() - unless $P10, rx460_fail - rx460_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx455_pos, 1 + gt $I11, rx455_eos, rx455_fail + sub $I11, rx455_pos, rx455_off + substr $S10, rx455_tgt, $I11, 1 + ne $S10, "\\", rx455_fail + add rx455_pos, 1 + # rx subrule $P460 subtype=capture negate= + rx455_cur."!cursor_pos"(rx455_pos) + .const 'Sub' $P460 = "144_1258264421.2958" + capture_lex $P460 + $P10 = rx455_cur.$P460() + unless $P10, rx455_fail + rx455_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"(0) - rx460_pos = $P10."pos"() - goto alt463_end - alt463_1: - # rx subrule $P469 subtype=capture negate= - rx460_cur."!cursor_pos"(rx460_pos) - .const 'Sub' $P469 = "145_1258208089.76063" - capture_lex $P469 - $P10 = rx460_cur.$P469() - unless $P10, rx460_fail - rx460_cur."!mark_push"(0, -1, 0, $P10) + rx455_pos = $P10."pos"() + goto alt458_end + alt458_1: + # rx subrule $P464 subtype=capture negate= + rx455_cur."!cursor_pos"(rx455_pos) + .const 'Sub' $P464 = "145_1258264421.2958" + capture_lex $P464 + $P10 = rx455_cur.$P464() + unless $P10, rx455_fail + rx455_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"(0) - rx460_pos = $P10."pos"() - alt463_end: - # rx rxquantr472 ** 0..1 - set_addr $I477, rxquantr472_done - rx460_cur."!mark_push"(0, rx460_pos, $I477) - rxquantr472_loop: + rx455_pos = $P10."pos"() + alt458_end: + # rx rxquantr467 ** 0..1 + set_addr $I472, rxquantr467_done + rx455_cur."!mark_push"(0, rx455_pos, $I472) + rxquantr467_loop: # rx charclass_q s r 0..-1 - sub $I10, rx460_pos, rx460_off - find_not_cclass $I11, 32, rx460_tgt, $I10, rx460_eos - add rx460_pos, rx460_off, $I11 + sub $I10, rx455_pos, rx455_off + find_not_cclass $I11, 32, rx455_tgt, $I10, rx455_eos + add rx455_pos, rx455_off, $I11 # rx literal ".." - add $I11, rx460_pos, 2 - gt $I11, rx460_eos, rx460_fail - sub $I11, rx460_pos, rx460_off - substr $S10, rx460_tgt, $I11, 2 - ne $S10, "..", rx460_fail - add rx460_pos, 2 + add $I11, rx455_pos, 2 + gt $I11, rx455_eos, rx455_fail + sub $I11, rx455_pos, rx455_off + substr $S10, rx455_tgt, $I11, 2 + ne $S10, "..", rx455_fail + add rx455_pos, 2 # rx charclass_q s r 0..-1 - sub $I10, rx460_pos, rx460_off - find_not_cclass $I11, 32, rx460_tgt, $I10, rx460_eos - add rx460_pos, rx460_off, $I11 - # rx subrule $P474 subtype=capture negate= - rx460_cur."!cursor_pos"(rx460_pos) - .const 'Sub' $P474 = "146_1258208089.76063" - capture_lex $P474 - $P10 = rx460_cur.$P474() - unless $P10, rx460_fail - rx460_cur."!mark_push"(0, -1, 0, $P10) + sub $I10, rx455_pos, rx455_off + find_not_cclass $I11, 32, rx455_tgt, $I10, rx455_eos + add rx455_pos, rx455_off, $I11 + # rx subrule $P469 subtype=capture negate= + rx455_cur."!cursor_pos"(rx455_pos) + .const 'Sub' $P469 = "146_1258264421.2958" + capture_lex $P469 + $P10 = rx455_cur.$P469() + unless $P10, rx455_fail + rx455_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("1") - rx460_pos = $P10."pos"() - (rx460_rep) = rx460_cur."!mark_commit"($I477) - rxquantr472_done: - alt462_end: + rx455_pos = $P10."pos"() + (rx455_rep) = rx455_cur."!mark_commit"($I472) + rxquantr467_done: + alt457_end: .annotate "line", 157 # rx pass - rx460_cur."!cursor_pass"(rx460_pos, "") - rx460_cur."!cursor_debug"("PASS ", "", " at pos=", rx460_pos) - .return (rx460_cur) - rx460_fail: - (rx460_rep, rx460_pos, $I10, $P10) = rx460_cur."!mark_fail"(0) - lt rx460_pos, -1, rx460_done - eq rx460_pos, -1, rx460_fail + rx455_cur."!cursor_pass"(rx455_pos, "") + rx455_cur."!cursor_debug"("PASS ", "", " at pos=", rx455_pos) + .return (rx455_cur) + rx455_fail: + (rx455_rep, rx455_pos, $I10, $P10) = rx455_cur."!mark_fail"(0) + lt rx455_pos, -1, rx455_done + eq rx455_pos, -1, rx455_fail jump $I10 - rx460_done: - rx460_cur."!cursor_fail"() - rx460_cur."!cursor_debug"("FAIL ", "") - .return (rx460_cur) + rx455_done: + rx455_cur."!cursor_fail"() + rx455_cur."!cursor_debug"("FAIL ", "") + .return (rx455_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block464" :anon :subid("144_1258208089.76063") :method :outer("143_1258208089.76063") +.sub "_block459" :anon :subid("144_1258264421.2958") :method :outer("143_1258264421.2958") .annotate "line", 159 - .local string rx466_tgt - .local int rx466_pos - .local int rx466_off - .local int rx466_eos - .local int rx466_rep - .local pmc rx466_cur - (rx466_cur, rx466_pos, rx466_tgt, $I10) = self."!cursor_start"() - rx466_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx466_cur + .local string rx461_tgt + .local int rx461_pos + .local int rx461_off + .local int rx461_eos + .local int rx461_rep + .local pmc rx461_cur + (rx461_cur, rx461_pos, rx461_tgt, $I10) = self."!cursor_start"() + rx461_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx461_cur .local pmc match .lex "$/", match - length rx466_eos, rx466_tgt - set rx466_off, 0 - lt $I10, 2, rx466_start - sub rx466_off, $I10, 1 - substr rx466_tgt, rx466_tgt, rx466_off - rx466_start: - ge rx466_pos, 0, rxscan467_done - rxscan467_loop: - ($P10) = rx466_cur."from"() + length rx461_eos, rx461_tgt + set rx461_off, 0 + lt $I10, 2, rx461_start + sub rx461_off, $I10, 1 + substr rx461_tgt, rx461_tgt, rx461_off + rx461_start: + ge rx461_pos, 0, rxscan462_done + rxscan462_loop: + ($P10) = rx461_cur."from"() inc $P10 - set rx466_pos, $P10 - ge rx466_pos, rx466_eos, rxscan467_done - set_addr $I10, rxscan467_loop - rx466_cur."!mark_push"(0, rx466_pos, $I10) - rxscan467_done: + set rx461_pos, $P10 + ge rx461_pos, rx461_eos, rxscan462_done + set_addr $I10, rxscan462_loop + rx461_cur."!mark_push"(0, rx461_pos, $I10) + rxscan462_done: # rx charclass . - ge rx466_pos, rx466_eos, rx466_fail - inc rx466_pos + ge rx461_pos, rx461_eos, rx461_fail + inc rx461_pos + # rx pass + rx461_cur."!cursor_pass"(rx461_pos, "") + rx461_cur."!cursor_debug"("PASS ", "", " at pos=", rx461_pos) + .return (rx461_cur) + rx461_fail: + (rx461_rep, rx461_pos, $I10, $P10) = rx461_cur."!mark_fail"(0) + lt rx461_pos, -1, rx461_done + eq rx461_pos, -1, rx461_fail + jump $I10 + rx461_done: + rx461_cur."!cursor_fail"() + rx461_cur."!cursor_debug"("FAIL ", "") + .return (rx461_cur) + .return () +.end + + +.namespace ["Regex";"P6Regex";"Grammar"] +.sub "_block463" :anon :subid("145_1258264421.2958") :method :outer("143_1258264421.2958") +.annotate "line", 159 + .local string rx465_tgt + .local int rx465_pos + .local int rx465_off + .local int rx465_eos + .local int rx465_rep + .local pmc rx465_cur + (rx465_cur, rx465_pos, rx465_tgt, $I10) = self."!cursor_start"() + rx465_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx465_cur + .local pmc match + .lex "$/", match + length rx465_eos, rx465_tgt + set rx465_off, 0 + lt $I10, 2, rx465_start + sub rx465_off, $I10, 1 + substr rx465_tgt, rx465_tgt, rx465_off + rx465_start: + ge rx465_pos, 0, rxscan466_done + rxscan466_loop: + ($P10) = rx465_cur."from"() + inc $P10 + set rx465_pos, $P10 + ge rx465_pos, rx465_eos, rxscan466_done + set_addr $I10, rxscan466_loop + rx465_cur."!mark_push"(0, rx465_pos, $I10) + rxscan466_done: + # rx enumcharlist negate=1 + ge rx465_pos, rx465_eos, rx465_fail + sub $I10, rx465_pos, rx465_off + substr $S10, rx465_tgt, $I10, 1 + index $I11, "]\\", $S10 + ge $I11, 0, rx465_fail + inc rx465_pos # rx pass - rx466_cur."!cursor_pass"(rx466_pos, "") - rx466_cur."!cursor_debug"("PASS ", "", " at pos=", rx466_pos) - .return (rx466_cur) - rx466_fail: - (rx466_rep, rx466_pos, $I10, $P10) = rx466_cur."!mark_fail"(0) - lt rx466_pos, -1, rx466_done - eq rx466_pos, -1, rx466_fail + rx465_cur."!cursor_pass"(rx465_pos, "") + rx465_cur."!cursor_debug"("PASS ", "", " at pos=", rx465_pos) + .return (rx465_cur) + rx465_fail: + (rx465_rep, rx465_pos, $I10, $P10) = rx465_cur."!mark_fail"(0) + lt rx465_pos, -1, rx465_done + eq rx465_pos, -1, rx465_fail jump $I10 - rx466_done: - rx466_cur."!cursor_fail"() - rx466_cur."!cursor_debug"("FAIL ", "") - .return (rx466_cur) + rx465_done: + rx465_cur."!cursor_fail"() + rx465_cur."!cursor_debug"("FAIL ", "") + .return (rx465_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block468" :anon :subid("145_1258208089.76063") :method :outer("143_1258208089.76063") +.sub "_block468" :anon :subid("146_1258264421.2958") :method :outer("143_1258264421.2958") .annotate "line", 159 .local string rx470_tgt .local int rx470_pos @@ -5811,12 +5863,8 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes set_addr $I10, rxscan471_loop rx470_cur."!mark_push"(0, rx470_pos, $I10) rxscan471_done: - # rx enumcharlist negate=1 + # rx charclass . ge rx470_pos, rx470_eos, rx470_fail - sub $I10, rx470_pos, rx470_off - substr $S10, rx470_tgt, $I10, 1 - index $I11, "]\\", $S10 - ge $I11, 0, rx470_fail inc rx470_pos # rx pass rx470_cur."!cursor_pass"(rx470_pos, "") @@ -5836,709 +5884,662 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block473" :anon :subid("146_1258208089.76063") :method :outer("143_1258208089.76063") -.annotate "line", 159 - .local string rx475_tgt - .local int rx475_pos - .local int rx475_off - .local int rx475_eos - .local int rx475_rep - .local pmc rx475_cur - (rx475_cur, rx475_pos, rx475_tgt, $I10) = self."!cursor_start"() - rx475_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx475_cur +.sub "mod_internal" :subid("147_1258264421.2958") :method :outer("11_1258264421.2958") +.annotate "line", 3 + .const 'Sub' $P485 = "149_1258264421.2958" + capture_lex $P485 + .local string rx478_tgt + .local int rx478_pos + .local int rx478_off + .local int rx478_eos + .local int rx478_rep + .local pmc rx478_cur + (rx478_cur, rx478_pos, rx478_tgt, $I10) = self."!cursor_start"() + rx478_cur."!cursor_debug"("START ", "mod_internal") + rx478_cur."!cursor_caparray"("n") + .lex unicode:"$\x{a2}", rx478_cur .local pmc match .lex "$/", match - length rx475_eos, rx475_tgt - set rx475_off, 0 - lt $I10, 2, rx475_start - sub rx475_off, $I10, 1 - substr rx475_tgt, rx475_tgt, rx475_off - rx475_start: - ge rx475_pos, 0, rxscan476_done - rxscan476_loop: - ($P10) = rx475_cur."from"() - inc $P10 - set rx475_pos, $P10 - ge rx475_pos, rx475_eos, rxscan476_done - set_addr $I10, rxscan476_loop - rx475_cur."!mark_push"(0, rx475_pos, $I10) - rxscan476_done: - # rx charclass . - ge rx475_pos, rx475_eos, rx475_fail - inc rx475_pos - # rx pass - rx475_cur."!cursor_pass"(rx475_pos, "") - rx475_cur."!cursor_debug"("PASS ", "", " at pos=", rx475_pos) - .return (rx475_cur) - rx475_fail: - (rx475_rep, rx475_pos, $I10, $P10) = rx475_cur."!mark_fail"(0) - lt rx475_pos, -1, rx475_done - eq rx475_pos, -1, rx475_fail - jump $I10 - rx475_done: - rx475_cur."!cursor_fail"() - rx475_cur."!cursor_debug"("FAIL ", "") - .return (rx475_cur) - .return () -.end - - -.namespace ["Regex";"P6Regex";"Grammar"] -.sub "mod_internal" :subid("147_1258208089.76063") :method :outer("11_1258208089.76063") -.annotate "line", 3 - .const 'Sub' $P490 = "149_1258208089.76063" - capture_lex $P490 - .local string rx483_tgt - .local int rx483_pos - .local int rx483_off - .local int rx483_eos - .local int rx483_rep - .local pmc rx483_cur - (rx483_cur, rx483_pos, rx483_tgt, $I10) = self."!cursor_start"() - rx483_cur."!cursor_debug"("START ", "mod_internal") - rx483_cur."!cursor_caparray"("n") - .lex unicode:"$\x{a2}", rx483_cur - .local pmc match - .lex "$/", match - length rx483_eos, rx483_tgt - set rx483_off, 0 - lt $I10, 2, rx483_start - sub rx483_off, $I10, 1 - substr rx483_tgt, rx483_tgt, rx483_off - rx483_start: - alt487_0: + length rx478_eos, rx478_tgt + set rx478_off, 0 + lt $I10, 2, rx478_start + sub rx478_off, $I10, 1 + substr rx478_tgt, rx478_tgt, rx478_off + rx478_start: + alt482_0: .annotate "line", 168 - set_addr $I10, alt487_1 - rx483_cur."!mark_push"(0, rx483_pos, $I10) + set_addr $I10, alt482_1 + rx478_cur."!mark_push"(0, rx478_pos, $I10) .annotate "line", 169 # rx literal ":" - add $I11, rx483_pos, 1 - gt $I11, rx483_eos, rx483_fail - sub $I11, rx483_pos, rx483_off - substr $S10, rx483_tgt, $I11, 1 - ne $S10, ":", rx483_fail - add rx483_pos, 1 - # rx rxquantr488 ** 1..1 - set_addr $I494, rxquantr488_done - rx483_cur."!mark_push"(0, -1, $I494) - rxquantr488_loop: - # rx subrule $P490 subtype=capture negate= - rx483_cur."!cursor_pos"(rx483_pos) - .const 'Sub' $P490 = "149_1258208089.76063" - capture_lex $P490 - $P10 = rx483_cur.$P490() - unless $P10, rx483_fail - rx483_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx478_pos, 1 + gt $I11, rx478_eos, rx478_fail + sub $I11, rx478_pos, rx478_off + substr $S10, rx478_tgt, $I11, 1 + ne $S10, ":", rx478_fail + add rx478_pos, 1 + # rx rxquantr483 ** 1..1 + set_addr $I489, rxquantr483_done + rx478_cur."!mark_push"(0, -1, $I489) + rxquantr483_loop: + # rx subrule $P485 subtype=capture negate= + rx478_cur."!cursor_pos"(rx478_pos) + .const 'Sub' $P485 = "149_1258264421.2958" + capture_lex $P485 + $P10 = rx478_cur.$P485() + unless $P10, rx478_fail + rx478_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("n") - rx483_pos = $P10."pos"() - (rx483_rep) = rx483_cur."!mark_commit"($I494) - rxquantr488_done: + rx478_pos = $P10."pos"() + (rx478_rep) = rx478_cur."!mark_commit"($I489) + rxquantr483_done: # rx subrule "mod_ident" subtype=capture negate= - rx483_cur."!cursor_pos"(rx483_pos) - $P10 = rx483_cur."mod_ident"() - unless $P10, rx483_fail - rx483_cur."!mark_push"(0, -1, 0, $P10) + rx478_cur."!cursor_pos"(rx478_pos) + $P10 = rx478_cur."mod_ident"() + unless $P10, rx478_fail + rx478_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("mod_ident") - rx483_pos = $P10."pos"() + rx478_pos = $P10."pos"() # rxanchor rwb - le rx483_pos, 0, rx483_fail - sub $I10, rx483_pos, rx483_off - is_cclass $I11, 8192, rx483_tgt, $I10 - if $I11, rx483_fail + le rx478_pos, 0, rx478_fail + sub $I10, rx478_pos, rx478_off + is_cclass $I11, 8192, rx478_tgt, $I10 + if $I11, rx478_fail dec $I10 - is_cclass $I11, 8192, rx483_tgt, $I10 - unless $I11, rx483_fail - goto alt487_end - alt487_1: + is_cclass $I11, 8192, rx478_tgt, $I10 + unless $I11, rx478_fail + goto alt482_end + alt482_1: .annotate "line", 170 # rx literal ":" - add $I11, rx483_pos, 1 - gt $I11, rx483_eos, rx483_fail - sub $I11, rx483_pos, rx483_off - substr $S10, rx483_tgt, $I11, 1 - ne $S10, ":", rx483_fail - add rx483_pos, 1 + add $I11, rx478_pos, 1 + gt $I11, rx478_eos, rx478_fail + sub $I11, rx478_pos, rx478_off + substr $S10, rx478_tgt, $I11, 1 + ne $S10, ":", rx478_fail + add rx478_pos, 1 # rx subrule "mod_ident" subtype=capture negate= - rx483_cur."!cursor_pos"(rx483_pos) - $P10 = rx483_cur."mod_ident"() - unless $P10, rx483_fail - rx483_cur."!mark_push"(0, -1, 0, $P10) + rx478_cur."!cursor_pos"(rx478_pos) + $P10 = rx478_cur."mod_ident"() + unless $P10, rx478_fail + rx478_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("mod_ident") - rx483_pos = $P10."pos"() - # rx rxquantr495 ** 0..1 - set_addr $I497, rxquantr495_done - rx483_cur."!mark_push"(0, rx483_pos, $I497) - rxquantr495_loop: + rx478_pos = $P10."pos"() + # rx rxquantr490 ** 0..1 + set_addr $I492, rxquantr490_done + rx478_cur."!mark_push"(0, rx478_pos, $I492) + rxquantr490_loop: # rx literal "(" - add $I11, rx483_pos, 1 - gt $I11, rx483_eos, rx483_fail - sub $I11, rx483_pos, rx483_off - substr $S10, rx483_tgt, $I11, 1 - ne $S10, "(", rx483_fail - add rx483_pos, 1 + add $I11, rx478_pos, 1 + gt $I11, rx478_eos, rx478_fail + sub $I11, rx478_pos, rx478_off + substr $S10, rx478_tgt, $I11, 1 + ne $S10, "(", rx478_fail + add rx478_pos, 1 # rx subcapture "n" - set_addr $I10, rxcap_496_fail - rx483_cur."!mark_push"(0, rx483_pos, $I10) + set_addr $I10, rxcap_491_fail + rx478_cur."!mark_push"(0, rx478_pos, $I10) # rx charclass_q d r 1..-1 - sub $I10, rx483_pos, rx483_off - find_not_cclass $I11, 8, rx483_tgt, $I10, rx483_eos + sub $I10, rx478_pos, rx478_off + find_not_cclass $I11, 8, rx478_tgt, $I10, rx478_eos add $I12, $I10, 1 - lt $I11, $I12, rx483_fail - add rx483_pos, rx483_off, $I11 - set_addr $I10, rxcap_496_fail - ($I12, $I11) = rx483_cur."!mark_peek"($I10) - rx483_cur."!cursor_pos"($I11) - ($P10) = rx483_cur."!cursor_start"() - $P10."!cursor_pass"(rx483_pos, "") - rx483_cur."!mark_push"(0, -1, 0, $P10) + lt $I11, $I12, rx478_fail + add rx478_pos, rx478_off, $I11 + set_addr $I10, rxcap_491_fail + ($I12, $I11) = rx478_cur."!mark_peek"($I10) + rx478_cur."!cursor_pos"($I11) + ($P10) = rx478_cur."!cursor_start"() + $P10."!cursor_pass"(rx478_pos, "") + rx478_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("n") - goto rxcap_496_done - rxcap_496_fail: - goto rx483_fail - rxcap_496_done: + goto rxcap_491_done + rxcap_491_fail: + goto rx478_fail + rxcap_491_done: # rx literal ")" - add $I11, rx483_pos, 1 - gt $I11, rx483_eos, rx483_fail - sub $I11, rx483_pos, rx483_off - substr $S10, rx483_tgt, $I11, 1 - ne $S10, ")", rx483_fail - add rx483_pos, 1 - (rx483_rep) = rx483_cur."!mark_commit"($I497) - rxquantr495_done: - alt487_end: + add $I11, rx478_pos, 1 + gt $I11, rx478_eos, rx478_fail + sub $I11, rx478_pos, rx478_off + substr $S10, rx478_tgt, $I11, 1 + ne $S10, ")", rx478_fail + add rx478_pos, 1 + (rx478_rep) = rx478_cur."!mark_commit"($I492) + rxquantr490_done: + alt482_end: .annotate "line", 167 # rx pass - rx483_cur."!cursor_pass"(rx483_pos, "mod_internal") - rx483_cur."!cursor_debug"("PASS ", "mod_internal", " at pos=", rx483_pos) - .return (rx483_cur) - rx483_fail: -.annotate "line", 3 - (rx483_rep, rx483_pos, $I10, $P10) = rx483_cur."!mark_fail"(0) - lt rx483_pos, -1, rx483_done - eq rx483_pos, -1, rx483_fail + rx478_cur."!cursor_pass"(rx478_pos, "mod_internal") + rx478_cur."!cursor_debug"("PASS ", "mod_internal", " at pos=", rx478_pos) + .return (rx478_cur) + rx478_fail: +.annotate "line", 3 + (rx478_rep, rx478_pos, $I10, $P10) = rx478_cur."!mark_fail"(0) + lt rx478_pos, -1, rx478_done + eq rx478_pos, -1, rx478_fail jump $I10 - rx483_done: - rx483_cur."!cursor_fail"() - rx483_cur."!cursor_debug"("FAIL ", "mod_internal") - .return (rx483_cur) + rx478_done: + rx478_cur."!cursor_fail"() + rx478_cur."!cursor_debug"("FAIL ", "mod_internal") + .return (rx478_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__mod_internal" :subid("148_1258208089.76063") :method +.sub "!PREFIX__mod_internal" :subid("148_1258264421.2958") :method .annotate "line", 3 - $P485 = self."!PREFIX__!subrule"("mod_ident", ":") - new $P486, "ResizablePMCArray" - push $P486, $P485 - push $P486, ":" - .return ($P486) + $P480 = self."!PREFIX__!subrule"("mod_ident", ":") + new $P481, "ResizablePMCArray" + push $P481, $P480 + push $P481, ":" + .return ($P481) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "_block489" :anon :subid("149_1258208089.76063") :method :outer("147_1258208089.76063") +.sub "_block484" :anon :subid("149_1258264421.2958") :method :outer("147_1258264421.2958") .annotate "line", 169 - .local string rx491_tgt - .local int rx491_pos - .local int rx491_off - .local int rx491_eos - .local int rx491_rep - .local pmc rx491_cur - (rx491_cur, rx491_pos, rx491_tgt, $I10) = self."!cursor_start"() - rx491_cur."!cursor_debug"("START ", "") - .lex unicode:"$\x{a2}", rx491_cur + .local string rx486_tgt + .local int rx486_pos + .local int rx486_off + .local int rx486_eos + .local int rx486_rep + .local pmc rx486_cur + (rx486_cur, rx486_pos, rx486_tgt, $I10) = self."!cursor_start"() + rx486_cur."!cursor_debug"("START ", "") + .lex unicode:"$\x{a2}", rx486_cur .local pmc match .lex "$/", match - length rx491_eos, rx491_tgt - set rx491_off, 0 - lt $I10, 2, rx491_start - sub rx491_off, $I10, 1 - substr rx491_tgt, rx491_tgt, rx491_off - rx491_start: - ge rx491_pos, 0, rxscan492_done - rxscan492_loop: - ($P10) = rx491_cur."from"() + length rx486_eos, rx486_tgt + set rx486_off, 0 + lt $I10, 2, rx486_start + sub rx486_off, $I10, 1 + substr rx486_tgt, rx486_tgt, rx486_off + rx486_start: + ge rx486_pos, 0, rxscan487_done + rxscan487_loop: + ($P10) = rx486_cur."from"() inc $P10 - set rx491_pos, $P10 - ge rx491_pos, rx491_eos, rxscan492_done - set_addr $I10, rxscan492_loop - rx491_cur."!mark_push"(0, rx491_pos, $I10) - rxscan492_done: - alt493_0: - set_addr $I10, alt493_1 - rx491_cur."!mark_push"(0, rx491_pos, $I10) + set rx486_pos, $P10 + ge rx486_pos, rx486_eos, rxscan487_done + set_addr $I10, rxscan487_loop + rx486_cur."!mark_push"(0, rx486_pos, $I10) + rxscan487_done: + alt488_0: + set_addr $I10, alt488_1 + rx486_cur."!mark_push"(0, rx486_pos, $I10) # rx literal "!" - add $I11, rx491_pos, 1 - gt $I11, rx491_eos, rx491_fail - sub $I11, rx491_pos, rx491_off - substr $S10, rx491_tgt, $I11, 1 - ne $S10, "!", rx491_fail - add rx491_pos, 1 - goto alt493_end - alt493_1: + add $I11, rx486_pos, 1 + gt $I11, rx486_eos, rx486_fail + sub $I11, rx486_pos, rx486_off + substr $S10, rx486_tgt, $I11, 1 + ne $S10, "!", rx486_fail + add rx486_pos, 1 + goto alt488_end + alt488_1: # rx charclass_q d r 1..-1 - sub $I10, rx491_pos, rx491_off - find_not_cclass $I11, 8, rx491_tgt, $I10, rx491_eos + sub $I10, rx486_pos, rx486_off + find_not_cclass $I11, 8, rx486_tgt, $I10, rx486_eos add $I12, $I10, 1 - lt $I11, $I12, rx491_fail - add rx491_pos, rx491_off, $I11 - alt493_end: + lt $I11, $I12, rx486_fail + add rx486_pos, rx486_off, $I11 + alt488_end: # rx pass - rx491_cur."!cursor_pass"(rx491_pos, "") - rx491_cur."!cursor_debug"("PASS ", "", " at pos=", rx491_pos) - .return (rx491_cur) - rx491_fail: - (rx491_rep, rx491_pos, $I10, $P10) = rx491_cur."!mark_fail"(0) - lt rx491_pos, -1, rx491_done - eq rx491_pos, -1, rx491_fail + rx486_cur."!cursor_pass"(rx486_pos, "") + rx486_cur."!cursor_debug"("PASS ", "", " at pos=", rx486_pos) + .return (rx486_cur) + rx486_fail: + (rx486_rep, rx486_pos, $I10, $P10) = rx486_cur."!mark_fail"(0) + lt rx486_pos, -1, rx486_done + eq rx486_pos, -1, rx486_fail jump $I10 - rx491_done: - rx491_cur."!cursor_fail"() - rx491_cur."!cursor_debug"("FAIL ", "") - .return (rx491_cur) + rx486_done: + rx486_cur."!cursor_fail"() + rx486_cur."!cursor_debug"("FAIL ", "") + .return (rx486_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "mod_ident" :subid("150_1258208089.76063") :method +.sub "mod_ident" :subid("150_1258264421.2958") :method .annotate "line", 174 - $P499 = self."!protoregex"("mod_ident") - .return ($P499) + $P494 = self."!protoregex"("mod_ident") + .return ($P494) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__mod_ident" :subid("151_1258208089.76063") :method +.sub "!PREFIX__mod_ident" :subid("151_1258264421.2958") :method .annotate "line", 174 - $P501 = self."!PREFIX__!protoregex"("mod_ident") - .return ($P501) + $P496 = self."!PREFIX__!protoregex"("mod_ident") + .return ($P496) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "mod_ident:sym" :subid("152_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "mod_ident:sym" :subid("152_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx503_tgt - .local int rx503_pos - .local int rx503_off - .local int rx503_eos - .local int rx503_rep - .local pmc rx503_cur - (rx503_cur, rx503_pos, rx503_tgt, $I10) = self."!cursor_start"() - rx503_cur."!cursor_debug"("START ", "mod_ident:sym") - .lex unicode:"$\x{a2}", rx503_cur + .local string rx498_tgt + .local int rx498_pos + .local int rx498_off + .local int rx498_eos + .local int rx498_rep + .local pmc rx498_cur + (rx498_cur, rx498_pos, rx498_tgt, $I10) = self."!cursor_start"() + rx498_cur."!cursor_debug"("START ", "mod_ident:sym") + .lex unicode:"$\x{a2}", rx498_cur .local pmc match .lex "$/", match - length rx503_eos, rx503_tgt - set rx503_off, 0 - lt $I10, 2, rx503_start - sub rx503_off, $I10, 1 - substr rx503_tgt, rx503_tgt, rx503_off - rx503_start: + length rx498_eos, rx498_tgt + set rx498_off, 0 + lt $I10, 2, rx498_start + sub rx498_off, $I10, 1 + substr rx498_tgt, rx498_tgt, rx498_off + rx498_start: .annotate "line", 175 # rx subcapture "sym" - set_addr $I10, rxcap_506_fail - rx503_cur."!mark_push"(0, rx503_pos, $I10) + set_addr $I10, rxcap_501_fail + rx498_cur."!mark_push"(0, rx498_pos, $I10) # rx literal "i" - add $I11, rx503_pos, 1 - gt $I11, rx503_eos, rx503_fail - sub $I11, rx503_pos, rx503_off - substr $S10, rx503_tgt, $I11, 1 - ne $S10, "i", rx503_fail - add rx503_pos, 1 - set_addr $I10, rxcap_506_fail - ($I12, $I11) = rx503_cur."!mark_peek"($I10) - rx503_cur."!cursor_pos"($I11) - ($P10) = rx503_cur."!cursor_start"() - $P10."!cursor_pass"(rx503_pos, "") - rx503_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx498_pos, 1 + gt $I11, rx498_eos, rx498_fail + sub $I11, rx498_pos, rx498_off + substr $S10, rx498_tgt, $I11, 1 + ne $S10, "i", rx498_fail + add rx498_pos, 1 + set_addr $I10, rxcap_501_fail + ($I12, $I11) = rx498_cur."!mark_peek"($I10) + rx498_cur."!cursor_pos"($I11) + ($P10) = rx498_cur."!cursor_start"() + $P10."!cursor_pass"(rx498_pos, "") + rx498_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_506_done - rxcap_506_fail: - goto rx503_fail - rxcap_506_done: - # rx rxquantr507 ** 0..1 - set_addr $I508, rxquantr507_done - rx503_cur."!mark_push"(0, rx503_pos, $I508) - rxquantr507_loop: + goto rxcap_501_done + rxcap_501_fail: + goto rx498_fail + rxcap_501_done: + # rx rxquantr502 ** 0..1 + set_addr $I503, rxquantr502_done + rx498_cur."!mark_push"(0, rx498_pos, $I503) + rxquantr502_loop: # rx literal "gnorecase" - add $I11, rx503_pos, 9 - gt $I11, rx503_eos, rx503_fail - sub $I11, rx503_pos, rx503_off - substr $S10, rx503_tgt, $I11, 9 - ne $S10, "gnorecase", rx503_fail - add rx503_pos, 9 - (rx503_rep) = rx503_cur."!mark_commit"($I508) - rxquantr507_done: + add $I11, rx498_pos, 9 + gt $I11, rx498_eos, rx498_fail + sub $I11, rx498_pos, rx498_off + substr $S10, rx498_tgt, $I11, 9 + ne $S10, "gnorecase", rx498_fail + add rx498_pos, 9 + (rx498_rep) = rx498_cur."!mark_commit"($I503) + rxquantr502_done: # rx pass - rx503_cur."!cursor_pass"(rx503_pos, "mod_ident:sym") - rx503_cur."!cursor_debug"("PASS ", "mod_ident:sym", " at pos=", rx503_pos) - .return (rx503_cur) - rx503_fail: -.annotate "line", 3 - (rx503_rep, rx503_pos, $I10, $P10) = rx503_cur."!mark_fail"(0) - lt rx503_pos, -1, rx503_done - eq rx503_pos, -1, rx503_fail + rx498_cur."!cursor_pass"(rx498_pos, "mod_ident:sym") + rx498_cur."!cursor_debug"("PASS ", "mod_ident:sym", " at pos=", rx498_pos) + .return (rx498_cur) + rx498_fail: +.annotate "line", 3 + (rx498_rep, rx498_pos, $I10, $P10) = rx498_cur."!mark_fail"(0) + lt rx498_pos, -1, rx498_done + eq rx498_pos, -1, rx498_fail jump $I10 - rx503_done: - rx503_cur."!cursor_fail"() - rx503_cur."!cursor_debug"("FAIL ", "mod_ident:sym") - .return (rx503_cur) + rx498_done: + rx498_cur."!cursor_fail"() + rx498_cur."!cursor_debug"("FAIL ", "mod_ident:sym") + .return (rx498_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__mod_ident:sym" :subid("153_1258208089.76063") :method +.sub "!PREFIX__mod_ident:sym" :subid("153_1258264421.2958") :method .annotate "line", 3 - new $P505, "ResizablePMCArray" - push $P505, "i" - .return ($P505) + new $P500, "ResizablePMCArray" + push $P500, "i" + .return ($P500) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "mod_ident:sym" :subid("154_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "mod_ident:sym" :subid("154_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx510_tgt - .local int rx510_pos - .local int rx510_off - .local int rx510_eos - .local int rx510_rep - .local pmc rx510_cur - (rx510_cur, rx510_pos, rx510_tgt, $I10) = self."!cursor_start"() - rx510_cur."!cursor_debug"("START ", "mod_ident:sym") - .lex unicode:"$\x{a2}", rx510_cur + .local string rx505_tgt + .local int rx505_pos + .local int rx505_off + .local int rx505_eos + .local int rx505_rep + .local pmc rx505_cur + (rx505_cur, rx505_pos, rx505_tgt, $I10) = self."!cursor_start"() + rx505_cur."!cursor_debug"("START ", "mod_ident:sym") + .lex unicode:"$\x{a2}", rx505_cur .local pmc match .lex "$/", match - length rx510_eos, rx510_tgt - set rx510_off, 0 - lt $I10, 2, rx510_start - sub rx510_off, $I10, 1 - substr rx510_tgt, rx510_tgt, rx510_off - rx510_start: + length rx505_eos, rx505_tgt + set rx505_off, 0 + lt $I10, 2, rx505_start + sub rx505_off, $I10, 1 + substr rx505_tgt, rx505_tgt, rx505_off + rx505_start: .annotate "line", 176 # rx subcapture "sym" - set_addr $I10, rxcap_513_fail - rx510_cur."!mark_push"(0, rx510_pos, $I10) + set_addr $I10, rxcap_508_fail + rx505_cur."!mark_push"(0, rx505_pos, $I10) # rx literal "r" - add $I11, rx510_pos, 1 - gt $I11, rx510_eos, rx510_fail - sub $I11, rx510_pos, rx510_off - substr $S10, rx510_tgt, $I11, 1 - ne $S10, "r", rx510_fail - add rx510_pos, 1 - set_addr $I10, rxcap_513_fail - ($I12, $I11) = rx510_cur."!mark_peek"($I10) - rx510_cur."!cursor_pos"($I11) - ($P10) = rx510_cur."!cursor_start"() - $P10."!cursor_pass"(rx510_pos, "") - rx510_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx505_pos, 1 + gt $I11, rx505_eos, rx505_fail + sub $I11, rx505_pos, rx505_off + substr $S10, rx505_tgt, $I11, 1 + ne $S10, "r", rx505_fail + add rx505_pos, 1 + set_addr $I10, rxcap_508_fail + ($I12, $I11) = rx505_cur."!mark_peek"($I10) + rx505_cur."!cursor_pos"($I11) + ($P10) = rx505_cur."!cursor_start"() + $P10."!cursor_pass"(rx505_pos, "") + rx505_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_513_done - rxcap_513_fail: - goto rx510_fail - rxcap_513_done: - # rx rxquantr514 ** 0..1 - set_addr $I515, rxquantr514_done - rx510_cur."!mark_push"(0, rx510_pos, $I515) - rxquantr514_loop: + goto rxcap_508_done + rxcap_508_fail: + goto rx505_fail + rxcap_508_done: + # rx rxquantr509 ** 0..1 + set_addr $I510, rxquantr509_done + rx505_cur."!mark_push"(0, rx505_pos, $I510) + rxquantr509_loop: # rx literal "atchet" - add $I11, rx510_pos, 6 - gt $I11, rx510_eos, rx510_fail - sub $I11, rx510_pos, rx510_off - substr $S10, rx510_tgt, $I11, 6 - ne $S10, "atchet", rx510_fail - add rx510_pos, 6 - (rx510_rep) = rx510_cur."!mark_commit"($I515) - rxquantr514_done: + add $I11, rx505_pos, 6 + gt $I11, rx505_eos, rx505_fail + sub $I11, rx505_pos, rx505_off + substr $S10, rx505_tgt, $I11, 6 + ne $S10, "atchet", rx505_fail + add rx505_pos, 6 + (rx505_rep) = rx505_cur."!mark_commit"($I510) + rxquantr509_done: # rx pass - rx510_cur."!cursor_pass"(rx510_pos, "mod_ident:sym") - rx510_cur."!cursor_debug"("PASS ", "mod_ident:sym", " at pos=", rx510_pos) - .return (rx510_cur) - rx510_fail: -.annotate "line", 3 - (rx510_rep, rx510_pos, $I10, $P10) = rx510_cur."!mark_fail"(0) - lt rx510_pos, -1, rx510_done - eq rx510_pos, -1, rx510_fail + rx505_cur."!cursor_pass"(rx505_pos, "mod_ident:sym") + rx505_cur."!cursor_debug"("PASS ", "mod_ident:sym", " at pos=", rx505_pos) + .return (rx505_cur) + rx505_fail: +.annotate "line", 3 + (rx505_rep, rx505_pos, $I10, $P10) = rx505_cur."!mark_fail"(0) + lt rx505_pos, -1, rx505_done + eq rx505_pos, -1, rx505_fail jump $I10 - rx510_done: - rx510_cur."!cursor_fail"() - rx510_cur."!cursor_debug"("FAIL ", "mod_ident:sym") - .return (rx510_cur) + rx505_done: + rx505_cur."!cursor_fail"() + rx505_cur."!cursor_debug"("FAIL ", "mod_ident:sym") + .return (rx505_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__mod_ident:sym" :subid("155_1258208089.76063") :method +.sub "!PREFIX__mod_ident:sym" :subid("155_1258264421.2958") :method .annotate "line", 3 - new $P512, "ResizablePMCArray" - push $P512, "r" - .return ($P512) + new $P507, "ResizablePMCArray" + push $P507, "r" + .return ($P507) .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "mod_ident:sym" :subid("156_1258208089.76063") :method :outer("11_1258208089.76063") +.sub "mod_ident:sym" :subid("156_1258264421.2958") :method :outer("11_1258264421.2958") .annotate "line", 3 - .local string rx517_tgt - .local int rx517_pos - .local int rx517_off - .local int rx517_eos - .local int rx517_rep - .local pmc rx517_cur - (rx517_cur, rx517_pos, rx517_tgt, $I10) = self."!cursor_start"() - rx517_cur."!cursor_debug"("START ", "mod_ident:sym") - .lex unicode:"$\x{a2}", rx517_cur + .local string rx512_tgt + .local int rx512_pos + .local int rx512_off + .local int rx512_eos + .local int rx512_rep + .local pmc rx512_cur + (rx512_cur, rx512_pos, rx512_tgt, $I10) = self."!cursor_start"() + rx512_cur."!cursor_debug"("START ", "mod_ident:sym") + .lex unicode:"$\x{a2}", rx512_cur .local pmc match .lex "$/", match - length rx517_eos, rx517_tgt - set rx517_off, 0 - lt $I10, 2, rx517_start - sub rx517_off, $I10, 1 - substr rx517_tgt, rx517_tgt, rx517_off - rx517_start: + length rx512_eos, rx512_tgt + set rx512_off, 0 + lt $I10, 2, rx512_start + sub rx512_off, $I10, 1 + substr rx512_tgt, rx512_tgt, rx512_off + rx512_start: .annotate "line", 177 # rx subcapture "sym" - set_addr $I10, rxcap_520_fail - rx517_cur."!mark_push"(0, rx517_pos, $I10) + set_addr $I10, rxcap_515_fail + rx512_cur."!mark_push"(0, rx512_pos, $I10) # rx literal "s" - add $I11, rx517_pos, 1 - gt $I11, rx517_eos, rx517_fail - sub $I11, rx517_pos, rx517_off - substr $S10, rx517_tgt, $I11, 1 - ne $S10, "s", rx517_fail - add rx517_pos, 1 - set_addr $I10, rxcap_520_fail - ($I12, $I11) = rx517_cur."!mark_peek"($I10) - rx517_cur."!cursor_pos"($I11) - ($P10) = rx517_cur."!cursor_start"() - $P10."!cursor_pass"(rx517_pos, "") - rx517_cur."!mark_push"(0, -1, 0, $P10) + add $I11, rx512_pos, 1 + gt $I11, rx512_eos, rx512_fail + sub $I11, rx512_pos, rx512_off + substr $S10, rx512_tgt, $I11, 1 + ne $S10, "s", rx512_fail + add rx512_pos, 1 + set_addr $I10, rxcap_515_fail + ($I12, $I11) = rx512_cur."!mark_peek"($I10) + rx512_cur."!cursor_pos"($I11) + ($P10) = rx512_cur."!cursor_start"() + $P10."!cursor_pass"(rx512_pos, "") + rx512_cur."!mark_push"(0, -1, 0, $P10) $P10."!cursor_names"("sym") - goto rxcap_520_done - rxcap_520_fail: - goto rx517_fail - rxcap_520_done: - # rx rxquantr521 ** 0..1 - set_addr $I522, rxquantr521_done - rx517_cur."!mark_push"(0, rx517_pos, $I522) - rxquantr521_loop: + goto rxcap_515_done + rxcap_515_fail: + goto rx512_fail + rxcap_515_done: + # rx rxquantr516 ** 0..1 + set_addr $I517, rxquantr516_done + rx512_cur."!mark_push"(0, rx512_pos, $I517) + rxquantr516_loop: # rx literal "igspace" - add $I11, rx517_pos, 7 - gt $I11, rx517_eos, rx517_fail - sub $I11, rx517_pos, rx517_off - substr $S10, rx517_tgt, $I11, 7 - ne $S10, "igspace", rx517_fail - add rx517_pos, 7 - (rx517_rep) = rx517_cur."!mark_commit"($I522) - rxquantr521_done: + add $I11, rx512_pos, 7 + gt $I11, rx512_eos, rx512_fail + sub $I11, rx512_pos, rx512_off + substr $S10, rx512_tgt, $I11, 7 + ne $S10, "igspace", rx512_fail + add rx512_pos, 7 + (rx512_rep) = rx512_cur."!mark_commit"($I517) + rxquantr516_done: # rx pass - rx517_cur."!cursor_pass"(rx517_pos, "mod_ident:sym") - rx517_cur."!cursor_debug"("PASS ", "mod_ident:sym", " at pos=", rx517_pos) - .return (rx517_cur) - rx517_fail: -.annotate "line", 3 - (rx517_rep, rx517_pos, $I10, $P10) = rx517_cur."!mark_fail"(0) - lt rx517_pos, -1, rx517_done - eq rx517_pos, -1, rx517_fail + rx512_cur."!cursor_pass"(rx512_pos, "mod_ident:sym") + rx512_cur."!cursor_debug"("PASS ", "mod_ident:sym", " at pos=", rx512_pos) + .return (rx512_cur) + rx512_fail: +.annotate "line", 3 + (rx512_rep, rx512_pos, $I10, $P10) = rx512_cur."!mark_fail"(0) + lt rx512_pos, -1, rx512_done + eq rx512_pos, -1, rx512_fail jump $I10 - rx517_done: - rx517_cur."!cursor_fail"() - rx517_cur."!cursor_debug"("FAIL ", "mod_ident:sym") - .return (rx517_cur) + rx512_done: + rx512_cur."!cursor_fail"() + rx512_cur."!cursor_debug"("FAIL ", "mod_ident:sym") + .return (rx512_cur) .return () .end .namespace ["Regex";"P6Regex";"Grammar"] -.sub "!PREFIX__mod_ident:sym" :subid("157_1258208089.76063") :method +.sub "!PREFIX__mod_ident:sym" :subid("157_1258264421.2958") :method .annotate "line", 3 - new $P519, "ResizablePMCArray" - push $P519, "s" - .return ($P519) + new $P514, "ResizablePMCArray" + push $P514, "s" + .return ($P514) .end ### .include 'gen/p6regex-actions.pir' .namespace [] -.sub "_block11" :anon :subid("10_1258208097.30665") +.sub "_block11" :anon :subid("10_1258264434.22101") .annotate "line", 0 get_hll_global $P14, ["Regex";"P6Regex";"Actions"], "_block13" capture_lex $P14 .annotate "line", 4 get_hll_global $P14, ["Regex";"P6Regex";"Actions"], "_block13" capture_lex $P14 - $P1512 = $P14() + $P1554 = $P14() .annotate "line", 1 - .return ($P1512) + .return ($P1554) .end .namespace [] -.sub "" :load :init :subid("post88") :outer("10_1258208097.30665") +.sub "" :load :init :subid("post89") :outer("10_1258264434.22101") .annotate "line", 0 - .const 'Sub' $P12 = "10_1258208097.30665" + .const 'Sub' $P12 = "10_1258264434.22101" .local pmc block set block, $P12 - $P1513 = get_root_global ["parrot"], "P6metaclass" - $P1513."new_class"("Regex::P6Regex::Actions", "HLL::Actions" :named("parent")) + $P1555 = get_root_global ["parrot"], "P6metaclass" + $P1555."new_class"("Regex::P6Regex::Actions", "HLL::Actions" :named("parent")) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block13" :subid("11_1258208097.30665") :outer("10_1258208097.30665") +.sub "_block13" :subid("11_1258264434.22101") :outer("10_1258264434.22101") .annotate "line", 4 - .const 'Sub' $P1479 = "87_1258208097.30665" - capture_lex $P1479 - .const 'Sub' $P1410 = "83_1258208097.30665" - capture_lex $P1410 - .const 'Sub' $P1342 = "81_1258208097.30665" - capture_lex $P1342 - .const 'Sub' $P1269 = "78_1258208097.30665" - capture_lex $P1269 - .const 'Sub' $P1255 = "77_1258208097.30665" + .const 'Sub' $P1521 = "88_1258264434.22101" + capture_lex $P1521 + .const 'Sub' $P1452 = "84_1258264434.22101" + capture_lex $P1452 + .const 'Sub' $P1384 = "82_1258264434.22101" + capture_lex $P1384 + .const 'Sub' $P1311 = "79_1258264434.22101" + capture_lex $P1311 + .const 'Sub' $P1297 = "78_1258264434.22101" + capture_lex $P1297 + .const 'Sub' $P1273 = "77_1258264434.22101" + capture_lex $P1273 + .const 'Sub' $P1255 = "76_1258264434.22101" capture_lex $P1255 - .const 'Sub' $P1231 = "76_1258208097.30665" - capture_lex $P1231 - .const 'Sub' $P1213 = "75_1258208097.30665" - capture_lex $P1213 - .const 'Sub' $P1199 = "74_1258208097.30665" - capture_lex $P1199 - .const 'Sub' $P1168 = "73_1258208097.30665" - capture_lex $P1168 - .const 'Sub' $P1137 = "72_1258208097.30665" - capture_lex $P1137 - .const 'Sub' $P1121 = "71_1258208097.30665" - capture_lex $P1121 - .const 'Sub' $P1105 = "70_1258208097.30665" - capture_lex $P1105 - .const 'Sub' $P1089 = "69_1258208097.30665" - capture_lex $P1089 - .const 'Sub' $P1073 = "68_1258208097.30665" - capture_lex $P1073 - .const 'Sub' $P1057 = "67_1258208097.30665" - capture_lex $P1057 - .const 'Sub' $P1041 = "66_1258208097.30665" - capture_lex $P1041 - .const 'Sub' $P1025 = "65_1258208097.30665" - capture_lex $P1025 - .const 'Sub' $P1001 = "64_1258208097.30665" - capture_lex $P1001 - .const 'Sub' $P986 = "63_1258208097.30665" - capture_lex $P986 - .const 'Sub' $P930 = "62_1258208097.30665" - capture_lex $P930 - .const 'Sub' $P909 = "61_1258208097.30665" + .const 'Sub' $P1241 = "75_1258264434.22101" + capture_lex $P1241 + .const 'Sub' $P1210 = "74_1258264434.22101" + capture_lex $P1210 + .const 'Sub' $P1179 = "73_1258264434.22101" + capture_lex $P1179 + .const 'Sub' $P1163 = "72_1258264434.22101" + capture_lex $P1163 + .const 'Sub' $P1147 = "71_1258264434.22101" + capture_lex $P1147 + .const 'Sub' $P1131 = "70_1258264434.22101" + capture_lex $P1131 + .const 'Sub' $P1115 = "69_1258264434.22101" + capture_lex $P1115 + .const 'Sub' $P1099 = "68_1258264434.22101" + capture_lex $P1099 + .const 'Sub' $P1083 = "67_1258264434.22101" + capture_lex $P1083 + .const 'Sub' $P1067 = "66_1258264434.22101" + capture_lex $P1067 + .const 'Sub' $P1043 = "65_1258264434.22101" + capture_lex $P1043 + .const 'Sub' $P1028 = "64_1258264434.22101" + capture_lex $P1028 + .const 'Sub' $P972 = "63_1258264434.22101" + capture_lex $P972 + .const 'Sub' $P951 = "62_1258264434.22101" + capture_lex $P951 + .const 'Sub' $P929 = "61_1258264434.22101" + capture_lex $P929 + .const 'Sub' $P919 = "60_1258264434.22101" + capture_lex $P919 + .const 'Sub' $P909 = "59_1258264434.22101" capture_lex $P909 - .const 'Sub' $P887 = "60_1258208097.30665" + .const 'Sub' $P899 = "58_1258264434.22101" + capture_lex $P899 + .const 'Sub' $P887 = "57_1258264434.22101" capture_lex $P887 - .const 'Sub' $P877 = "59_1258208097.30665" - capture_lex $P877 - .const 'Sub' $P867 = "58_1258208097.30665" - capture_lex $P867 - .const 'Sub' $P857 = "57_1258208097.30665" - capture_lex $P857 - .const 'Sub' $P845 = "56_1258208097.30665" - capture_lex $P845 - .const 'Sub' $P833 = "55_1258208097.30665" - capture_lex $P833 - .const 'Sub' $P821 = "54_1258208097.30665" - capture_lex $P821 - .const 'Sub' $P809 = "53_1258208097.30665" - capture_lex $P809 - .const 'Sub' $P797 = "52_1258208097.30665" - capture_lex $P797 - .const 'Sub' $P785 = "51_1258208097.30665" - capture_lex $P785 - .const 'Sub' $P773 = "50_1258208097.30665" - capture_lex $P773 - .const 'Sub' $P761 = "49_1258208097.30665" - capture_lex $P761 - .const 'Sub' $P745 = "48_1258208097.30665" - capture_lex $P745 - .const 'Sub' $P727 = "47_1258208097.30665" - capture_lex $P727 - .const 'Sub' $P717 = "46_1258208097.30665" - capture_lex $P717 - .const 'Sub' $P699 = "45_1258208097.30665" - capture_lex $P699 - .const 'Sub' $P652 = "44_1258208097.30665" - capture_lex $P652 - .const 'Sub' $P635 = "43_1258208097.30665" - capture_lex $P635 - .const 'Sub' $P620 = "42_1258208097.30665" - capture_lex $P620 - .const 'Sub' $P605 = "41_1258208097.30665" - capture_lex $P605 - .const 'Sub' $P579 = "40_1258208097.30665" - capture_lex $P579 - .const 'Sub' $P529 = "38_1258208097.30665" - capture_lex $P529 - .const 'Sub' $P474 = "36_1258208097.30665" - capture_lex $P474 - .const 'Sub' $P417 = "33_1258208097.30665" - capture_lex $P417 - .const 'Sub' $P402 = "32_1258208097.30665" - capture_lex $P402 - .const 'Sub' $P376 = "30_1258208097.30665" - capture_lex $P376 - .const 'Sub' $P358 = "29_1258208097.30665" + .const 'Sub' $P875 = "56_1258264434.22101" + capture_lex $P875 + .const 'Sub' $P863 = "55_1258264434.22101" + capture_lex $P863 + .const 'Sub' $P851 = "54_1258264434.22101" + capture_lex $P851 + .const 'Sub' $P839 = "53_1258264434.22101" + capture_lex $P839 + .const 'Sub' $P827 = "52_1258264434.22101" + capture_lex $P827 + .const 'Sub' $P815 = "51_1258264434.22101" + capture_lex $P815 + .const 'Sub' $P803 = "50_1258264434.22101" + capture_lex $P803 + .const 'Sub' $P780 = "49_1258264434.22101" + capture_lex $P780 + .const 'Sub' $P757 = "48_1258264434.22101" + capture_lex $P757 + .const 'Sub' $P739 = "47_1258264434.22101" + capture_lex $P739 + .const 'Sub' $P729 = "46_1258264434.22101" + capture_lex $P729 + .const 'Sub' $P711 = "45_1258264434.22101" + capture_lex $P711 + .const 'Sub' $P664 = "44_1258264434.22101" + capture_lex $P664 + .const 'Sub' $P647 = "43_1258264434.22101" + capture_lex $P647 + .const 'Sub' $P632 = "42_1258264434.22101" + capture_lex $P632 + .const 'Sub' $P617 = "41_1258264434.22101" + capture_lex $P617 + .const 'Sub' $P591 = "40_1258264434.22101" + capture_lex $P591 + .const 'Sub' $P541 = "38_1258264434.22101" + capture_lex $P541 + .const 'Sub' $P473 = "36_1258264434.22101" + capture_lex $P473 + .const 'Sub' $P416 = "33_1258264434.22101" + capture_lex $P416 + .const 'Sub' $P401 = "32_1258264434.22101" + capture_lex $P401 + .const 'Sub' $P375 = "30_1258264434.22101" + capture_lex $P375 + .const 'Sub' $P358 = "29_1258264434.22101" capture_lex $P358 - .const 'Sub' $P336 = "28_1258208097.30665" + .const 'Sub' $P336 = "28_1258264434.22101" capture_lex $P336 - .const 'Sub' $P304 = "27_1258208097.30665" + .const 'Sub' $P304 = "27_1258264434.22101" capture_lex $P304 - .const 'Sub' $P42 = "14_1258208097.30665" + .const 'Sub' $P42 = "14_1258264434.22101" capture_lex $P42 - .const 'Sub' $P21 = "13_1258208097.30665" + .const 'Sub' $P21 = "13_1258264434.22101" capture_lex $P21 - .const 'Sub' $P16 = "12_1258208097.30665" + .const 'Sub' $P16 = "12_1258264434.22101" capture_lex $P16 get_global $P15, "@MODIFIERS" - unless_null $P15, vivify_89 + unless_null $P15, vivify_90 new $P15, "ResizablePMCArray" set_global "@MODIFIERS", $P15 - vivify_89: + vivify_90: .annotate "line", 6 - .const 'Sub' $P16 = "12_1258208097.30665" + .const 'Sub' $P16 = "12_1258264434.22101" capture_lex $P16 .lex "INIT", $P16 -.annotate "line", 462 - .const 'Sub' $P21 = "13_1258208097.30665" +.annotate "line", 475 + .const 'Sub' $P21 = "13_1258264434.22101" capture_lex $P21 .lex "buildsub", $P21 -.annotate "line", 475 - .const 'Sub' $P42 = "14_1258208097.30665" +.annotate "line", 488 + .const 'Sub' $P42 = "14_1258264434.22101" capture_lex $P42 .lex "capnames", $P42 -.annotate "line", 541 - .const 'Sub' $P304 = "27_1258208097.30665" +.annotate "line", 554 + .const 'Sub' $P304 = "27_1258264434.22101" capture_lex $P304 .lex "backmod", $P304 -.annotate "line", 548 - .const 'Sub' $P336 = "28_1258208097.30665" +.annotate "line", 561 + .const 'Sub' $P336 = "28_1258264434.22101" capture_lex $P336 .lex "subrule_alias", $P336 .annotate "line", 4 get_global $P356, "@MODIFIERS" find_lex $P357, "INIT" -.annotate "line", 455 - find_lex $P1508, "buildsub" - find_lex $P1509, "capnames" - find_lex $P1510, "backmod" - find_lex $P1511, "subrule_alias" +.annotate "line", 468 + find_lex $P1550, "buildsub" + find_lex $P1551, "capnames" + find_lex $P1552, "backmod" + find_lex $P1553, "subrule_alias" .annotate "line", 4 - .return ($P1511) + .return ($P1553) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "INIT" :subid("12_1258208097.30665") :outer("11_1258208097.30665") +.sub "INIT" :subid("12_1258264434.22101") :outer("11_1258264434.22101") .annotate "line", 6 new $P18, 'ExceptionHandler' set_addr $P18, control_17 @@ -6563,47 +6564,47 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Actions"] -.sub "buildsub" :subid("13_1258208097.30665") :outer("11_1258208097.30665") +.sub "buildsub" :subid("13_1258264434.22101") :outer("11_1258264434.22101") .param pmc param_24 -.annotate "line", 462 +.annotate "line", 475 new $P23, 'ExceptionHandler' set_addr $P23, control_22 $P23."handle_types"(58) push_eh $P23 .lex "$rpast", param_24 -.annotate "line", 463 +.annotate "line", 476 new $P25, "Hash" .lex "%capnames", $P25 find_lex $P26, "$rpast" $P27 = "capnames"($P26, 0) store_lex "%capnames", $P27 -.annotate "line", 464 +.annotate "line", 477 new $P28, "Integer" assign $P28, 0 find_lex $P29, "%capnames" - unless_null $P29, vivify_90 + unless_null $P29, vivify_91 new $P29, "Hash" store_lex "%capnames", $P29 - vivify_90: + vivify_91: set $P29[""], $P28 -.annotate "line", 465 +.annotate "line", 478 get_hll_global $P30, ["PAST"], "Regex" -.annotate "line", 466 +.annotate "line", 479 get_hll_global $P31, ["PAST"], "Regex" $P32 = $P31."new"("scan" :named("pasttype")) find_lex $P33, "$rpast" -.annotate "line", 468 +.annotate "line", 481 get_hll_global $P34, ["PAST"], "Regex" $P35 = $P34."new"("pass" :named("pasttype")) find_lex $P36, "%capnames" $P37 = $P30."new"($P32, $P33, $P35, "concat" :named("pasttype"), $P36 :named("capnames")) -.annotate "line", 465 +.annotate "line", 478 store_lex "$rpast", $P37 -.annotate "line", 472 +.annotate "line", 485 get_hll_global $P38, ["PAST"], "Block" find_lex $P39, "$rpast" $P40 = $P38."new"($P39, "method" :named("blocktype")) -.annotate "line", 462 +.annotate "line", 475 .return ($P40) control_22: .local pmc exception @@ -6615,19 +6616,19 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Actions"] -.sub "capnames" :subid("14_1258208097.30665") :outer("11_1258208097.30665") +.sub "capnames" :subid("14_1258264434.22101") :outer("11_1258264434.22101") .param pmc param_45 .param pmc param_46 -.annotate "line", 475 - .const 'Sub' $P279 = "25_1258208097.30665" +.annotate "line", 488 + .const 'Sub' $P279 = "25_1258264434.22101" capture_lex $P279 - .const 'Sub' $P214 = "22_1258208097.30665" + .const 'Sub' $P214 = "22_1258264434.22101" capture_lex $P214 - .const 'Sub' $P170 = "20_1258208097.30665" + .const 'Sub' $P170 = "20_1258264434.22101" capture_lex $P170 - .const 'Sub' $P128 = "18_1258208097.30665" + .const 'Sub' $P128 = "18_1258264434.22101" capture_lex $P128 - .const 'Sub' $P57 = "15_1258208097.30665" + .const 'Sub' $P57 = "15_1258264434.22101" capture_lex $P57 new $P44, 'ExceptionHandler' set_addr $P44, control_43 @@ -6635,29 +6636,29 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes push_eh $P44 .lex "$ast", param_45 .lex "$count", param_46 -.annotate "line", 476 +.annotate "line", 489 new $P47, "Hash" .lex "%capnames", $P47 -.annotate "line", 477 +.annotate "line", 490 new $P48, "Undef" .lex "$pasttype", $P48 -.annotate "line", 475 +.annotate "line", 488 find_lex $P49, "%capnames" -.annotate "line", 477 +.annotate "line", 490 find_lex $P50, "$ast" $P51 = $P50."pasttype"() store_lex "$pasttype", $P51 -.annotate "line", 478 +.annotate "line", 491 find_lex $P53, "$pasttype" set $S54, $P53 iseq $I55, $S54, "alt" if $I55, if_52 -.annotate "line", 491 +.annotate "line", 504 find_lex $P119, "$pasttype" set $S120, $P119 iseq $I121, $S120, "concat" if $I121, if_118 -.annotate "line", 500 +.annotate "line", 513 find_lex $P163, "$pasttype" set $S164, $P163 iseq $I165, $S164, "subrule" @@ -6673,41 +6674,41 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes set $P161, $I168 if_162_end: if $P161, if_160 -.annotate "line", 513 +.annotate "line", 526 find_lex $P210, "$pasttype" set $S211, $P210 iseq $I212, $S211, "subcapture" if $I212, if_209 -.annotate "line", 530 +.annotate "line", 543 find_lex $P275, "$pasttype" set $S276, $P275 iseq $I277, $S276, "quant" unless $I277, if_274_end - .const 'Sub' $P279 = "25_1258208097.30665" + .const 'Sub' $P279 = "25_1258264434.22101" capture_lex $P279 $P279() if_274_end: goto if_209_end if_209: -.annotate "line", 513 - .const 'Sub' $P214 = "22_1258208097.30665" +.annotate "line", 526 + .const 'Sub' $P214 = "22_1258264434.22101" capture_lex $P214 $P214() if_209_end: goto if_160_end if_160: -.annotate "line", 500 - .const 'Sub' $P170 = "20_1258208097.30665" +.annotate "line", 513 + .const 'Sub' $P170 = "20_1258264434.22101" capture_lex $P170 $P170() if_160_end: goto if_118_end if_118: -.annotate "line", 492 +.annotate "line", 505 find_lex $P123, "$ast" $P124 = $P123."list"() defined $I125, $P124 - unless $I125, for_undef_111 + unless $I125, for_undef_112 iter $P122, $P124 new $P158, 'ExceptionHandler' set_addr $P158, loop157_handler @@ -6717,7 +6718,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes unless $P122, loop157_done shift $P126, $P122 loop157_redo: - .const 'Sub' $P128 = "18_1258208097.30665" + .const 'Sub' $P128 = "18_1258264434.22101" capture_lex $P128 $P128($P126) loop157_next: @@ -6730,26 +6731,26 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes eq $P159, 67, loop157_redo loop157_done: pop_eh - for_undef_111: + for_undef_112: if_118_end: -.annotate "line", 491 +.annotate "line", 504 goto if_52_end if_52: -.annotate "line", 478 - .const 'Sub' $P57 = "15_1258208097.30665" +.annotate "line", 491 + .const 'Sub' $P57 = "15_1258264434.22101" capture_lex $P57 $P57() if_52_end: -.annotate "line", 537 +.annotate "line", 550 find_lex $P300, "$count" find_lex $P301, "%capnames" - unless_null $P301, vivify_131 + unless_null $P301, vivify_132 new $P301, "Hash" store_lex "%capnames", $P301 - vivify_131: + vivify_132: set $P301[""], $P300 find_lex $P302, "%capnames" -.annotate "line", 475 +.annotate "line", 488 .return ($P302) control_43: .local pmc exception @@ -6761,28 +6762,28 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block278" :anon :subid("25_1258208097.30665") :outer("14_1258208097.30665") -.annotate "line", 530 - .const 'Sub' $P290 = "26_1258208097.30665" +.sub "_block278" :anon :subid("25_1258264434.22101") :outer("14_1258264434.22101") +.annotate "line", 543 + .const 'Sub' $P290 = "26_1258264434.22101" capture_lex $P290 -.annotate "line", 531 +.annotate "line", 544 new $P280, "Hash" .lex "%astcap", $P280 find_lex $P281, "$ast" - unless_null $P281, vivify_91 + unless_null $P281, vivify_92 new $P281, "ResizablePMCArray" - vivify_91: + vivify_92: set $P282, $P281[0] - unless_null $P282, vivify_92 + unless_null $P282, vivify_93 new $P282, "Undef" - vivify_92: + vivify_93: find_lex $P283, "$count" $P284 = "capnames"($P282, $P283) store_lex "%astcap", $P284 -.annotate "line", 532 +.annotate "line", 545 find_lex $P286, "%astcap" defined $I287, $P286 - unless $I287, for_undef_93 + unless $I287, for_undef_94 iter $P285, $P286 new $P296, 'ExceptionHandler' set_addr $P296, loop295_handler @@ -6792,7 +6793,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes unless $P285, loop295_done shift $P288, $P285 loop295_redo: - .const 'Sub' $P290 = "26_1258208097.30665" + .const 'Sub' $P290 = "26_1258264434.22101" capture_lex $P290 $P290($P288) loop295_next: @@ -6805,73 +6806,73 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes eq $P297, 67, loop295_redo loop295_done: pop_eh - for_undef_93: -.annotate "line", 535 + for_undef_94: +.annotate "line", 548 find_lex $P298, "%astcap" - unless_null $P298, vivify_95 + unless_null $P298, vivify_96 new $P298, "Hash" - vivify_95: + vivify_96: set $P299, $P298[""] - unless_null $P299, vivify_96 + unless_null $P299, vivify_97 new $P299, "Undef" - vivify_96: + vivify_97: store_lex "$count", $P299 -.annotate "line", 530 +.annotate "line", 543 .return ($P299) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block289" :anon :subid("26_1258208097.30665") :outer("25_1258208097.30665") +.sub "_block289" :anon :subid("26_1258264434.22101") :outer("25_1258264434.22101") .param pmc param_291 -.annotate "line", 532 +.annotate "line", 545 .lex "$_", param_291 -.annotate "line", 533 +.annotate "line", 546 new $P292, "Integer" assign $P292, 2 find_lex $P293, "$_" find_lex $P294, "%capnames" - unless_null $P294, vivify_94 + unless_null $P294, vivify_95 new $P294, "Hash" store_lex "%capnames", $P294 - vivify_94: + vivify_95: set $P294[$P293], $P292 -.annotate "line", 532 +.annotate "line", 545 .return ($P292) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block213" :anon :subid("22_1258208097.30665") :outer("14_1258208097.30665") -.annotate "line", 513 - .const 'Sub' $P256 = "24_1258208097.30665" +.sub "_block213" :anon :subid("22_1258264434.22101") :outer("14_1258264434.22101") +.annotate "line", 526 + .const 'Sub' $P256 = "24_1258264434.22101" capture_lex $P256 - .const 'Sub' $P226 = "23_1258208097.30665" + .const 'Sub' $P226 = "23_1258264434.22101" capture_lex $P226 -.annotate "line", 514 +.annotate "line", 527 new $P215, "Undef" .lex "$name", $P215 -.annotate "line", 515 +.annotate "line", 528 new $P216, "ResizablePMCArray" .lex "@names", $P216 -.annotate "line", 524 +.annotate "line", 537 new $P217, "Hash" .lex "%x", $P217 -.annotate "line", 514 +.annotate "line", 527 find_lex $P218, "$ast" $P219 = $P218."name"() store_lex "$name", $P219 -.annotate "line", 515 +.annotate "line", 528 $P0 = find_lex '$name' $S0 = $P0 $P220 = split '=', $S0 store_lex "@names", $P220 -.annotate "line", 520 +.annotate "line", 533 find_lex $P222, "@names" defined $I223, $P222 - unless $I223, for_undef_97 + unless $I223, for_undef_98 iter $P221, $P222 new $P245, 'ExceptionHandler' set_addr $P245, loop244_handler @@ -6881,7 +6882,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes unless $P221, loop244_done shift $P224, $P221 loop244_redo: - .const 'Sub' $P226 = "23_1258208097.30665" + .const 'Sub' $P226 = "23_1258264434.22101" capture_lex $P226 $P226($P224) loop244_next: @@ -6894,23 +6895,23 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes eq $P246, 67, loop244_redo loop244_done: pop_eh - for_undef_97: -.annotate "line", 524 + for_undef_98: +.annotate "line", 537 find_lex $P247, "$ast" - unless_null $P247, vivify_99 + unless_null $P247, vivify_100 new $P247, "ResizablePMCArray" - vivify_99: + vivify_100: set $P248, $P247[0] - unless_null $P248, vivify_100 + unless_null $P248, vivify_101 new $P248, "Undef" - vivify_100: + vivify_101: find_lex $P249, "$count" $P250 = "capnames"($P248, $P249) store_lex "%x", $P250 -.annotate "line", 525 +.annotate "line", 538 find_lex $P252, "%x" defined $I253, $P252 - unless $I253, for_undef_101 + unless $I253, for_undef_102 iter $P251, $P252 new $P270, 'ExceptionHandler' set_addr $P270, loop269_handler @@ -6920,7 +6921,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes unless $P251, loop269_done shift $P254, $P251 loop269_redo: - .const 'Sub' $P256 = "24_1258208097.30665" + .const 'Sub' $P256 = "24_1258264434.22101" capture_lex $P256 $P256($P254) loop269_next: @@ -6933,28 +6934,28 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes eq $P271, 67, loop269_redo loop269_done: pop_eh - for_undef_101: -.annotate "line", 528 + for_undef_102: +.annotate "line", 541 find_lex $P272, "%x" - unless_null $P272, vivify_107 + unless_null $P272, vivify_108 new $P272, "Hash" - vivify_107: + vivify_108: set $P273, $P272[""] - unless_null $P273, vivify_108 + unless_null $P273, vivify_109 new $P273, "Undef" - vivify_108: + vivify_109: store_lex "$count", $P273 -.annotate "line", 513 +.annotate "line", 526 .return ($P273) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block225" :anon :subid("23_1258208097.30665") :outer("22_1258208097.30665") +.sub "_block225" :anon :subid("23_1258264434.22101") :outer("22_1258264434.22101") .param pmc param_227 -.annotate "line", 520 +.annotate "line", 533 .lex "$_", param_227 -.annotate "line", 521 +.annotate "line", 534 find_lex $P231, "$_" set $S232, $P231 iseq $I233, $S232, "0" @@ -6977,77 +6978,77 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes add $P240, $P239, 1 store_lex "$count", $P240 if_228_end: -.annotate "line", 522 +.annotate "line", 535 new $P241, "Integer" assign $P241, 1 find_lex $P242, "$_" find_lex $P243, "%capnames" - unless_null $P243, vivify_98 + unless_null $P243, vivify_99 new $P243, "Hash" store_lex "%capnames", $P243 - vivify_98: + vivify_99: set $P243[$P242], $P241 -.annotate "line", 520 +.annotate "line", 533 .return ($P241) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block255" :anon :subid("24_1258208097.30665") :outer("22_1258208097.30665") +.sub "_block255" :anon :subid("24_1258264434.22101") :outer("22_1258264434.22101") .param pmc param_257 -.annotate "line", 525 +.annotate "line", 538 .lex "$_", param_257 -.annotate "line", 526 +.annotate "line", 539 find_lex $P258, "$_" find_lex $P259, "%capnames" - unless_null $P259, vivify_102 + unless_null $P259, vivify_103 new $P259, "Hash" - vivify_102: + vivify_103: set $P260, $P259[$P258] - unless_null $P260, vivify_103 + unless_null $P260, vivify_104 new $P260, "Undef" - vivify_103: + vivify_104: set $N261, $P260 new $P262, 'Float' set $P262, $N261 find_lex $P263, "$_" find_lex $P264, "%x" - unless_null $P264, vivify_104 + unless_null $P264, vivify_105 new $P264, "Hash" - vivify_104: + vivify_105: set $P265, $P264[$P263] - unless_null $P265, vivify_105 + unless_null $P265, vivify_106 new $P265, "Undef" - vivify_105: + vivify_106: add $P266, $P262, $P265 find_lex $P267, "$_" find_lex $P268, "%capnames" - unless_null $P268, vivify_106 + unless_null $P268, vivify_107 new $P268, "Hash" store_lex "%capnames", $P268 - vivify_106: + vivify_107: set $P268[$P267], $P266 -.annotate "line", 525 +.annotate "line", 538 .return ($P266) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block169" :anon :subid("20_1258208097.30665") :outer("14_1258208097.30665") -.annotate "line", 500 - .const 'Sub' $P188 = "21_1258208097.30665" +.sub "_block169" :anon :subid("20_1258264434.22101") :outer("14_1258264434.22101") +.annotate "line", 513 + .const 'Sub' $P188 = "21_1258264434.22101" capture_lex $P188 -.annotate "line", 501 +.annotate "line", 514 new $P171, "Undef" .lex "$name", $P171 -.annotate "line", 503 +.annotate "line", 516 new $P172, "ResizablePMCArray" .lex "@names", $P172 -.annotate "line", 501 +.annotate "line", 514 find_lex $P173, "$ast" $P174 = $P173."name"() store_lex "$name", $P174 -.annotate "line", 502 +.annotate "line", 515 find_lex $P176, "$name" set $S177, $P176 iseq $I178, $S177, "" @@ -7058,17 +7059,17 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes find_lex $P181, "$name" $P180."name"($P181) if_175_end: -.annotate "line", 503 +.annotate "line", 516 $P0 = find_lex '$name' $S0 = $P0 $P182 = split '=', $S0 store_lex "@names", $P182 -.annotate "line", 508 +.annotate "line", 521 find_lex $P184, "@names" defined $I185, $P184 - unless $I185, for_undef_109 + unless $I185, for_undef_110 iter $P183, $P184 new $P207, 'ExceptionHandler' set_addr $P207, loop206_handler @@ -7078,7 +7079,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes unless $P183, loop206_done shift $P186, $P183 loop206_redo: - .const 'Sub' $P188 = "21_1258208097.30665" + .const 'Sub' $P188 = "21_1258264434.22101" capture_lex $P188 $P188($P186) loop206_next: @@ -7091,18 +7092,18 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes eq $P208, 67, loop206_redo loop206_done: pop_eh - for_undef_109: -.annotate "line", 500 + for_undef_110: +.annotate "line", 513 .return ($P183) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block187" :anon :subid("21_1258208097.30665") :outer("20_1258208097.30665") +.sub "_block187" :anon :subid("21_1258264434.22101") :outer("20_1258264434.22101") .param pmc param_189 -.annotate "line", 508 +.annotate "line", 521 .lex "$_", param_189 -.annotate "line", 509 +.annotate "line", 522 find_lex $P193, "$_" set $S194, $P193 iseq $I195, $S194, "0" @@ -7125,28 +7126,28 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes add $P202, $P201, 1 store_lex "$count", $P202 if_190_end: -.annotate "line", 510 +.annotate "line", 523 new $P203, "Integer" assign $P203, 1 find_lex $P204, "$_" find_lex $P205, "%capnames" - unless_null $P205, vivify_110 + unless_null $P205, vivify_111 new $P205, "Hash" store_lex "%capnames", $P205 - vivify_110: + vivify_111: set $P205[$P204], $P203 -.annotate "line", 508 +.annotate "line", 521 .return ($P203) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block127" :anon :subid("18_1258208097.30665") :outer("14_1258208097.30665") +.sub "_block127" :anon :subid("18_1258264434.22101") :outer("14_1258264434.22101") .param pmc param_130 -.annotate "line", 492 - .const 'Sub' $P139 = "19_1258208097.30665" +.annotate "line", 505 + .const 'Sub' $P139 = "19_1258264434.22101" capture_lex $P139 -.annotate "line", 493 +.annotate "line", 506 new $P129, "Hash" .lex "%x", $P129 .lex "$_", param_130 @@ -7154,10 +7155,10 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes find_lex $P132, "$count" $P133 = "capnames"($P131, $P132) store_lex "%x", $P133 -.annotate "line", 494 +.annotate "line", 507 find_lex $P135, "%x" defined $I136, $P135 - unless $I136, for_undef_112 + unless $I136, for_undef_113 iter $P134, $P135 new $P153, 'ExceptionHandler' set_addr $P153, loop152_handler @@ -7167,7 +7168,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes unless $P134, loop152_done shift $P137, $P134 loop152_redo: - .const 'Sub' $P139 = "19_1258208097.30665" + .const 'Sub' $P139 = "19_1258264434.22101" capture_lex $P139 $P139($P137) loop152_next: @@ -7180,77 +7181,77 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes eq $P154, 67, loop152_redo loop152_done: pop_eh - for_undef_112: -.annotate "line", 497 + for_undef_113: +.annotate "line", 510 find_lex $P155, "%x" - unless_null $P155, vivify_118 + unless_null $P155, vivify_119 new $P155, "Hash" - vivify_118: + vivify_119: set $P156, $P155[""] - unless_null $P156, vivify_119 + unless_null $P156, vivify_120 new $P156, "Undef" - vivify_119: + vivify_120: store_lex "$count", $P156 -.annotate "line", 492 +.annotate "line", 505 .return ($P156) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block138" :anon :subid("19_1258208097.30665") :outer("18_1258208097.30665") +.sub "_block138" :anon :subid("19_1258264434.22101") :outer("18_1258264434.22101") .param pmc param_140 -.annotate "line", 494 +.annotate "line", 507 .lex "$_", param_140 -.annotate "line", 495 +.annotate "line", 508 find_lex $P141, "$_" find_lex $P142, "%capnames" - unless_null $P142, vivify_113 + unless_null $P142, vivify_114 new $P142, "Hash" - vivify_113: + vivify_114: set $P143, $P142[$P141] - unless_null $P143, vivify_114 + unless_null $P143, vivify_115 new $P143, "Undef" - vivify_114: + vivify_115: set $N144, $P143 new $P145, 'Float' set $P145, $N144 find_lex $P146, "$_" find_lex $P147, "%x" - unless_null $P147, vivify_115 + unless_null $P147, vivify_116 new $P147, "Hash" - vivify_115: + vivify_116: set $P148, $P147[$P146] - unless_null $P148, vivify_116 + unless_null $P148, vivify_117 new $P148, "Undef" - vivify_116: + vivify_117: add $P149, $P145, $P148 find_lex $P150, "$_" find_lex $P151, "%capnames" - unless_null $P151, vivify_117 + unless_null $P151, vivify_118 new $P151, "Hash" store_lex "%capnames", $P151 - vivify_117: + vivify_118: set $P151[$P150], $P149 -.annotate "line", 494 +.annotate "line", 507 .return ($P149) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block56" :anon :subid("15_1258208097.30665") :outer("14_1258208097.30665") -.annotate "line", 478 - .const 'Sub' $P66 = "16_1258208097.30665" +.sub "_block56" :anon :subid("15_1258264434.22101") :outer("14_1258264434.22101") +.annotate "line", 491 + .const 'Sub' $P66 = "16_1258264434.22101" capture_lex $P66 -.annotate "line", 479 +.annotate "line", 492 new $P58, "Undef" .lex "$max", $P58 find_lex $P59, "$count" store_lex "$max", $P59 -.annotate "line", 480 +.annotate "line", 493 find_lex $P61, "$ast" $P62 = $P61."list"() defined $I63, $P62 - unless $I63, for_undef_120 + unless $I63, for_undef_121 iter $P60, $P62 new $P115, 'ExceptionHandler' set_addr $P115, loop114_handler @@ -7260,7 +7261,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes unless $P60, loop114_done shift $P64, $P60 loop114_redo: - .const 'Sub' $P66 = "16_1258208097.30665" + .const 'Sub' $P66 = "16_1258264434.22101" capture_lex $P66 $P66($P64) loop114_next: @@ -7273,22 +7274,22 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes eq $P116, 67, loop114_redo loop114_done: pop_eh - for_undef_120: -.annotate "line", 489 + for_undef_121: +.annotate "line", 502 find_lex $P117, "$max" store_lex "$count", $P117 -.annotate "line", 478 +.annotate "line", 491 .return ($P117) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block65" :anon :subid("16_1258208097.30665") :outer("15_1258208097.30665") +.sub "_block65" :anon :subid("16_1258264434.22101") :outer("15_1258264434.22101") .param pmc param_68 -.annotate "line", 480 - .const 'Sub' $P77 = "17_1258208097.30665" +.annotate "line", 493 + .const 'Sub' $P77 = "17_1258264434.22101" capture_lex $P77 -.annotate "line", 481 +.annotate "line", 494 new $P67, "Hash" .lex "%x", $P67 .lex "$_", param_68 @@ -7296,10 +7297,10 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes find_lex $P70, "$count" $P71 = "capnames"($P69, $P70) store_lex "%x", $P71 -.annotate "line", 482 +.annotate "line", 495 find_lex $P73, "%x" defined $I74, $P73 - unless $I74, for_undef_121 + unless $I74, for_undef_122 iter $P72, $P73 new $P102, 'ExceptionHandler' set_addr $P102, loop101_handler @@ -7309,7 +7310,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes unless $P72, loop101_done shift $P75, $P72 loop101_redo: - .const 'Sub' $P77 = "17_1258208097.30665" + .const 'Sub' $P77 = "17_1258264434.22101" capture_lex $P77 $P77($P75) loop101_next: @@ -7322,16 +7323,16 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes eq $P103, 67, loop101_redo loop101_done: pop_eh - for_undef_121: -.annotate "line", 487 + for_undef_122: +.annotate "line", 500 find_lex $P106, "%x" - unless_null $P106, vivify_127 + unless_null $P106, vivify_128 new $P106, "Hash" - vivify_127: + vivify_128: set $P107, $P106[""] - unless_null $P107, vivify_128 + unless_null $P107, vivify_129 new $P107, "Undef" - vivify_128: + vivify_129: set $N108, $P107 find_lex $P109, "$max" set $N110, $P109 @@ -7342,36 +7343,36 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes goto if_105_end if_105: find_lex $P112, "%x" - unless_null $P112, vivify_129 + unless_null $P112, vivify_130 new $P112, "Hash" - vivify_129: + vivify_130: set $P113, $P112[""] - unless_null $P113, vivify_130 + unless_null $P113, vivify_131 new $P113, "Undef" - vivify_130: + vivify_131: store_lex "$max", $P113 set $P104, $P113 if_105_end: -.annotate "line", 480 +.annotate "line", 493 .return ($P104) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block76" :anon :subid("17_1258208097.30665") :outer("16_1258208097.30665") +.sub "_block76" :anon :subid("17_1258264434.22101") :outer("16_1258264434.22101") .param pmc param_78 -.annotate "line", 482 +.annotate "line", 495 .lex "$_", param_78 -.annotate "line", 483 +.annotate "line", 496 find_lex $P83, "$_" find_lex $P84, "%capnames" - unless_null $P84, vivify_122 + unless_null $P84, vivify_123 new $P84, "Hash" - vivify_122: + vivify_123: set $P85, $P84[$P83] - unless_null $P85, vivify_123 + unless_null $P85, vivify_124 new $P85, "Undef" - vivify_123: + vivify_124: set $N86, $P85 new $P87, "Integer" assign $P87, 2 @@ -7384,13 +7385,13 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes if_82: find_lex $P90, "$_" find_lex $P91, "%x" - unless_null $P91, vivify_124 + unless_null $P91, vivify_125 new $P91, "Hash" - vivify_124: + vivify_125: set $P92, $P91[$P90] - unless_null $P92, vivify_125 + unless_null $P92, vivify_126 new $P92, "Undef" - vivify_125: + vivify_126: set $N93, $P92 new $P94, "Integer" assign $P94, 1 @@ -7409,36 +7410,36 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes assign $P97, 1 set $P79, $P97 if_80_end: -.annotate "line", 484 +.annotate "line", 497 find_lex $P99, "$_" find_lex $P100, "%capnames" - unless_null $P100, vivify_126 + unless_null $P100, vivify_127 new $P100, "Hash" store_lex "%capnames", $P100 - vivify_126: + vivify_127: set $P100[$P99], $P79 -.annotate "line", 482 +.annotate "line", 495 .return ($P79) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backmod" :subid("27_1258208097.30665") :outer("11_1258208097.30665") +.sub "backmod" :subid("27_1258264434.22101") :outer("11_1258264434.22101") .param pmc param_307 .param pmc param_308 -.annotate "line", 541 +.annotate "line", 554 new $P306, 'ExceptionHandler' set_addr $P306, control_305 $P306."handle_types"(58) push_eh $P306 .lex "$ast", param_307 .lex "$backmod", param_308 -.annotate "line", 542 +.annotate "line", 555 find_lex $P310, "$backmod" set $S311, $P310 iseq $I312, $S311, ":" if $I312, if_309 -.annotate "line", 543 +.annotate "line", 556 find_lex $P317, "$backmod" set $S318, $P317 iseq $I319, $S318, ":?" @@ -7454,7 +7455,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes set $P315, $I322 unless_316_end: if $P315, if_314 -.annotate "line", 544 +.annotate "line", 557 find_lex $P327, "$backmod" set $S328, $P327 iseq $I329, $S328, ":!" @@ -7475,18 +7476,18 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes if_324_end: goto if_314_end if_314: -.annotate "line", 543 +.annotate "line", 556 find_lex $P323, "$ast" $P323."backtrack"("f") if_314_end: goto if_309_end if_309: -.annotate "line", 542 +.annotate "line", 555 find_lex $P313, "$ast" $P313."backtrack"("r") if_309_end: find_lex $P334, "$ast" -.annotate "line", 541 +.annotate "line", 554 .return ($P334) control_305: .local pmc exception @@ -7498,28 +7499,28 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Actions"] -.sub "subrule_alias" :subid("28_1258208097.30665") :outer("11_1258208097.30665") +.sub "subrule_alias" :subid("28_1258264434.22101") :outer("11_1258264434.22101") .param pmc param_339 .param pmc param_340 -.annotate "line", 548 +.annotate "line", 561 new $P338, 'ExceptionHandler' set_addr $P338, control_337 $P338."handle_types"(58) push_eh $P338 .lex "$past", param_339 .lex "$name", param_340 -.annotate "line", 549 +.annotate "line", 562 find_lex $P342, "$past" $S343 = $P342."name"() isgt $I344, $S343, "" if $I344, if_341 -.annotate "line", 550 +.annotate "line", 563 find_lex $P351, "$past" find_lex $P352, "$name" $P351."name"($P352) goto if_341_end if_341: -.annotate "line", 549 +.annotate "line", 562 find_lex $P345, "$past" find_lex $P346, "$name" concat $P347, $P346, "=" @@ -7528,10 +7529,10 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes concat $P350, $P347, $S349 $P345."name"($P350) if_341_end: -.annotate "line", 551 +.annotate "line", 564 find_lex $P353, "$past" $P354 = $P353."subtype"("capture") -.annotate "line", 548 +.annotate "line", 561 .return ($P354) control_337: .local pmc exception @@ -7543,7 +7544,7 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Actions"] -.sub "arg" :subid("29_1258208097.30665") :method :outer("11_1258208097.30665") +.sub "arg" :subid("29_1258264434.22101") :method :outer("11_1258264434.22101") .param pmc param_361 .annotate "line", 14 new $P360, 'ExceptionHandler' @@ -7555,448 +7556,445 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .annotate "line", 15 find_lex $P362, "$/" find_lex $P365, "$/" - unless_null $P365, vivify_132 + unless_null $P365, vivify_133 new $P365, "Hash" - vivify_132: - set $P366, $P365["quote"] - unless_null $P366, vivify_133 - new $P366, "Undef" vivify_133: - if $P366, if_364 - find_lex $P371, "$/" - unless_null $P371, vivify_134 - new $P371, "Hash" + set $P366, $P365["quote_EXPR"] + unless_null $P366, vivify_134 + new $P366, "Undef" vivify_134: - set $P372, $P371["val"] - unless_null $P372, vivify_135 - new $P372, "Undef" + if $P366, if_364 + find_lex $P370, "$/" + unless_null $P370, vivify_135 + new $P370, "Hash" vivify_135: - set $N373, $P372 + set $P371, $P370["val"] + unless_null $P371, vivify_136 + new $P371, "Undef" + vivify_136: + set $N372, $P371 new $P363, 'Float' - set $P363, $N373 + set $P363, $N372 goto if_364_end if_364: find_lex $P367, "$/" - unless_null $P367, vivify_136 + unless_null $P367, vivify_137 new $P367, "Hash" - vivify_136: - set $P368, $P367["quote"] - unless_null $P368, vivify_137 - new $P368, "Hash" vivify_137: - set $P369, $P368["val"] - unless_null $P369, vivify_138 - new $P369, "Undef" + set $P368, $P367["quote_EXPR"] + unless_null $P368, vivify_138 + new $P368, "Undef" vivify_138: - set $S370, $P369 - new $P363, 'String' - set $P363, $S370 + $P369 = $P368."ast"() + set $P363, $P369 if_364_end: - $P374 = $P362."!make"($P363) + $P373 = $P362."!make"($P363) .annotate "line", 14 - .return ($P374) + .return ($P373) control_359: .local pmc exception .get_results (exception) - getattribute $P375, exception, "payload" - .return ($P375) + getattribute $P374, exception, "payload" + .return ($P374) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "arglist" :subid("30_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_379 +.sub "arglist" :subid("30_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_378 .annotate "line", 18 - .const 'Sub' $P389 = "31_1258208097.30665" - capture_lex $P389 - new $P378, 'ExceptionHandler' - set_addr $P378, control_377 - $P378."handle_types"(58) - push_eh $P378 + .const 'Sub' $P388 = "31_1258264434.22101" + capture_lex $P388 + new $P377, 'ExceptionHandler' + set_addr $P377, control_376 + $P377."handle_types"(58) + push_eh $P377 .lex "self", self - .lex "$/", param_379 + .lex "$/", param_378 .annotate "line", 19 - new $P380, "Undef" - .lex "$past", $P380 - get_hll_global $P381, ["PAST"], "Op" - $P382 = $P381."new"("list" :named("pasttype")) - store_lex "$past", $P382 + new $P379, "Undef" + .lex "$past", $P379 + get_hll_global $P380, ["PAST"], "Op" + $P381 = $P380."new"("list" :named("pasttype")) + store_lex "$past", $P381 .annotate "line", 20 - find_lex $P384, "$/" - unless_null $P384, vivify_139 - new $P384, "Hash" + find_lex $P383, "$/" + unless_null $P383, vivify_139 + new $P383, "Hash" vivify_139: - set $P385, $P384["arg"] - unless_null $P385, vivify_140 - new $P385, "Undef" + set $P384, $P383["arg"] + unless_null $P384, vivify_140 + new $P384, "Undef" vivify_140: - defined $I386, $P385 - unless $I386, for_undef_141 - iter $P383, $P385 - new $P396, 'ExceptionHandler' - set_addr $P396, loop395_handler - $P396."handle_types"(65, 67, 66) - push_eh $P396 - loop395_test: - unless $P383, loop395_done - shift $P387, $P383 - loop395_redo: - .const 'Sub' $P389 = "31_1258208097.30665" - capture_lex $P389 - $P389($P387) - loop395_next: - goto loop395_test - loop395_handler: + defined $I385, $P384 + unless $I385, for_undef_141 + iter $P382, $P384 + new $P395, 'ExceptionHandler' + set_addr $P395, loop394_handler + $P395."handle_types"(65, 67, 66) + push_eh $P395 + loop394_test: + unless $P382, loop394_done + shift $P386, $P382 + loop394_redo: + .const 'Sub' $P388 = "31_1258264434.22101" + capture_lex $P388 + $P388($P386) + loop394_next: + goto loop394_test + loop394_handler: .local pmc exception .get_results (exception) - getattribute $P397, exception, 'type' - eq $P397, 65, loop395_next - eq $P397, 67, loop395_redo - loop395_done: + getattribute $P396, exception, 'type' + eq $P396, 65, loop394_next + eq $P396, 67, loop394_redo + loop394_done: pop_eh for_undef_141: .annotate "line", 21 - find_lex $P398, "$/" - find_lex $P399, "$past" - $P400 = $P398."!make"($P399) + find_lex $P397, "$/" + find_lex $P398, "$past" + $P399 = $P397."!make"($P398) .annotate "line", 18 - .return ($P400) - control_377: + .return ($P399) + control_376: .local pmc exception .get_results (exception) - getattribute $P401, exception, "payload" - .return ($P401) + getattribute $P400, exception, "payload" + .return ($P400) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block388" :anon :subid("31_1258208097.30665") :outer("30_1258208097.30665") - .param pmc param_390 +.sub "_block387" :anon :subid("31_1258264434.22101") :outer("30_1258264434.22101") + .param pmc param_389 .annotate "line", 20 - .lex "$_", param_390 - find_lex $P391, "$past" - find_lex $P392, "$_" - $P393 = $P392."ast"() - $P394 = $P391."push"($P393) - .return ($P394) + .lex "$_", param_389 + find_lex $P390, "$past" + find_lex $P391, "$_" + $P392 = $P391."ast"() + $P393 = $P390."push"($P392) + .return ($P393) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "TOP" :subid("32_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_405 +.sub "TOP" :subid("32_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_404 .annotate "line", 24 - new $P404, 'ExceptionHandler' - set_addr $P404, control_403 - $P404."handle_types"(58) - push_eh $P404 + new $P403, 'ExceptionHandler' + set_addr $P403, control_402 + $P403."handle_types"(58) + push_eh $P403 .lex "self", self - .lex "$/", param_405 + .lex "$/", param_404 .annotate "line", 25 - new $P406, "Undef" - .lex "$past", $P406 - find_lex $P407, "$/" - unless_null $P407, vivify_142 - new $P407, "Hash" + new $P405, "Undef" + .lex "$past", $P405 + find_lex $P406, "$/" + unless_null $P406, vivify_142 + new $P406, "Hash" vivify_142: - set $P408, $P407["nibbler"] - unless_null $P408, vivify_143 - new $P408, "Undef" + set $P407, $P406["nibbler"] + unless_null $P407, vivify_143 + new $P407, "Undef" vivify_143: - $P409 = $P408."ast"() - $P410 = "buildsub"($P409) - store_lex "$past", $P410 + $P408 = $P407."ast"() + $P409 = "buildsub"($P408) + store_lex "$past", $P409 .annotate "line", 26 - find_lex $P411, "$past" - find_lex $P412, "$/" - $P411."node"($P412) + find_lex $P410, "$past" + find_lex $P411, "$/" + $P410."node"($P411) .annotate "line", 27 - find_lex $P413, "$/" - find_lex $P414, "$past" - $P415 = $P413."!make"($P414) + find_lex $P412, "$/" + find_lex $P413, "$past" + $P414 = $P412."!make"($P413) .annotate "line", 24 - .return ($P415) - control_403: + .return ($P414) + control_402: .local pmc exception .get_results (exception) - getattribute $P416, exception, "payload" - .return ($P416) + getattribute $P415, exception, "payload" + .return ($P415) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "nibbler" :subid("33_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_420 - .param pmc param_421 :optional - .param int has_param_421 :opt_flag +.sub "nibbler" :subid("33_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_419 + .param pmc param_420 :optional + .param int has_param_420 :opt_flag .annotate "line", 30 - .const 'Sub' $P457 = "35_1258208097.30665" - capture_lex $P457 - .const 'Sub' $P429 = "34_1258208097.30665" - capture_lex $P429 - new $P419, 'ExceptionHandler' - set_addr $P419, control_418 - $P419."handle_types"(58) - push_eh $P419 + .const 'Sub' $P456 = "35_1258264434.22101" + capture_lex $P456 + .const 'Sub' $P428 = "34_1258264434.22101" + capture_lex $P428 + new $P418, 'ExceptionHandler' + set_addr $P418, control_417 + $P418."handle_types"(58) + push_eh $P418 .lex "self", self - .lex "$/", param_420 - if has_param_421, optparam_144 - new $P422, "Undef" - set param_421, $P422 + .lex "$/", param_419 + if has_param_420, optparam_144 + new $P421, "Undef" + set param_420, $P421 optparam_144: - .lex "$key", param_421 + .lex "$key", param_420 .annotate "line", 42 - new $P423, "Undef" - .lex "$past", $P423 + new $P422, "Undef" + .lex "$past", $P422 .annotate "line", 31 - find_lex $P425, "$key" - set $S426, $P425 - iseq $I427, $S426, "open" - unless $I427, if_424_end - .const 'Sub' $P429 = "34_1258208097.30665" - capture_lex $P429 - $P429() - if_424_end: + find_lex $P424, "$key" + set $S425, $P424 + iseq $I426, $S425, "open" + unless $I426, if_423_end + .const 'Sub' $P428 = "34_1258264434.22101" + capture_lex $P428 + $P428() + if_423_end: .annotate "line", 41 - get_global $P439, "@MODIFIERS" - $P439."shift"() - find_lex $P440, "$past" + get_global $P438, "@MODIFIERS" + $P438."shift"() + find_lex $P439, "$past" .annotate "line", 43 - find_lex $P442, "$/" - unless_null $P442, vivify_147 - new $P442, "Hash" + find_lex $P441, "$/" + unless_null $P441, vivify_147 + new $P441, "Hash" vivify_147: - set $P443, $P442["termish"] - unless_null $P443, vivify_148 - new $P443, "Undef" + set $P442, $P441["termish"] + unless_null $P442, vivify_148 + new $P442, "Undef" vivify_148: - set $N444, $P443 - new $P445, "Integer" - assign $P445, 1 - set $N446, $P445 - isgt $I447, $N444, $N446 - if $I447, if_441 + set $N443, $P442 + new $P444, "Integer" + assign $P444, 1 + set $N445, $P444 + isgt $I446, $N443, $N445 + if $I446, if_440 .annotate "line", 50 - find_lex $P466, "$/" - unless_null $P466, vivify_149 - new $P466, "Hash" + find_lex $P465, "$/" + unless_null $P465, vivify_149 + new $P465, "Hash" vivify_149: - set $P467, $P466["termish"] - unless_null $P467, vivify_150 - new $P467, "ResizablePMCArray" + set $P466, $P465["termish"] + unless_null $P466, vivify_150 + new $P466, "ResizablePMCArray" vivify_150: - set $P468, $P467[0] - unless_null $P468, vivify_151 - new $P468, "Undef" + set $P467, $P466[0] + unless_null $P467, vivify_151 + new $P467, "Undef" vivify_151: - $P469 = $P468."ast"() - store_lex "$past", $P469 + $P468 = $P467."ast"() + store_lex "$past", $P468 .annotate "line", 49 - goto if_441_end - if_441: + goto if_440_end + if_440: .annotate "line", 44 - get_hll_global $P448, ["PAST"], "Regex" - find_lex $P449, "$/" - $P450 = $P448."new"("alt" :named("pasttype"), $P449 :named("node")) - store_lex "$past", $P450 + get_hll_global $P447, ["PAST"], "Regex" + find_lex $P448, "$/" + $P449 = $P447."new"("alt" :named("pasttype"), $P448 :named("node")) + store_lex "$past", $P449 .annotate "line", 45 - find_lex $P452, "$/" - unless_null $P452, vivify_152 - new $P452, "Hash" + find_lex $P451, "$/" + unless_null $P451, vivify_152 + new $P451, "Hash" vivify_152: - set $P453, $P452["termish"] - unless_null $P453, vivify_153 - new $P453, "Undef" + set $P452, $P451["termish"] + unless_null $P452, vivify_153 + new $P452, "Undef" vivify_153: - defined $I454, $P453 - unless $I454, for_undef_154 - iter $P451, $P453 - new $P464, 'ExceptionHandler' - set_addr $P464, loop463_handler - $P464."handle_types"(65, 67, 66) - push_eh $P464 - loop463_test: - unless $P451, loop463_done - shift $P455, $P451 - loop463_redo: - .const 'Sub' $P457 = "35_1258208097.30665" - capture_lex $P457 - $P457($P455) - loop463_next: - goto loop463_test - loop463_handler: + defined $I453, $P452 + unless $I453, for_undef_154 + iter $P450, $P452 + new $P463, 'ExceptionHandler' + set_addr $P463, loop462_handler + $P463."handle_types"(65, 67, 66) + push_eh $P463 + loop462_test: + unless $P450, loop462_done + shift $P454, $P450 + loop462_redo: + .const 'Sub' $P456 = "35_1258264434.22101" + capture_lex $P456 + $P456($P454) + loop462_next: + goto loop462_test + loop462_handler: .local pmc exception .get_results (exception) - getattribute $P465, exception, 'type' - eq $P465, 65, loop463_next - eq $P465, 67, loop463_redo - loop463_done: + getattribute $P464, exception, 'type' + eq $P464, 65, loop462_next + eq $P464, 67, loop462_redo + loop462_done: pop_eh for_undef_154: - if_441_end: + if_440_end: .annotate "line", 52 - find_lex $P470, "$/" - find_lex $P471, "$past" - $P472 = $P470."!make"($P471) + find_lex $P469, "$/" + find_lex $P470, "$past" + $P471 = $P469."!make"($P470) .annotate "line", 30 - .return ($P472) - control_418: + .return ($P471) + control_417: .local pmc exception .get_results (exception) - getattribute $P473, exception, "payload" - .return ($P473) + getattribute $P472, exception, "payload" + .return ($P472) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block428" :anon :subid("34_1258208097.30665") :outer("33_1258208097.30665") +.sub "_block427" :anon :subid("34_1258264434.22101") :outer("33_1258264434.22101") .annotate "line", 32 - new $P430, "Hash" - .lex "%old", $P430 + new $P429, "Hash" + .lex "%old", $P429 .annotate "line", 33 - new $P431, "Hash" - .lex "%new", $P431 + new $P430, "Hash" + .lex "%new", $P430 .annotate "line", 32 - get_global $P432, "@MODIFIERS" - unless_null $P432, vivify_145 - new $P432, "ResizablePMCArray" + get_global $P431, "@MODIFIERS" + unless_null $P431, vivify_145 + new $P431, "ResizablePMCArray" vivify_145: - set $P433, $P432[0] - unless_null $P433, vivify_146 - new $P433, "Undef" + set $P432, $P431[0] + unless_null $P432, vivify_146 + new $P432, "Undef" vivify_146: - store_lex "%old", $P433 + store_lex "%old", $P432 .annotate "line", 33 $P0 = find_lex '%old' - $P434 = clone $P0 + $P433 = clone $P0 - store_lex "%new", $P434 + store_lex "%new", $P433 .annotate "line", 37 - get_global $P435, "@MODIFIERS" - find_lex $P436, "%new" - $P435."unshift"($P436) + get_global $P434, "@MODIFIERS" + find_lex $P435, "%new" + $P434."unshift"($P435) .annotate "line", 38 - new $P437, "Exception" - set $P437['type'], 58 - new $P438, "Integer" - assign $P438, 1 - setattribute $P437, 'payload', $P438 - throw $P437 + new $P436, "Exception" + set $P436['type'], 58 + new $P437, "Integer" + assign $P437, 1 + setattribute $P436, 'payload', $P437 + throw $P436 .annotate "line", 31 .return () .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block456" :anon :subid("35_1258208097.30665") :outer("33_1258208097.30665") - .param pmc param_458 +.sub "_block455" :anon :subid("35_1258264434.22101") :outer("33_1258264434.22101") + .param pmc param_457 .annotate "line", 45 - .lex "$_", param_458 + .lex "$_", param_457 .annotate "line", 46 - find_lex $P459, "$past" - find_lex $P460, "$_" - $P461 = $P460."ast"() - $P462 = $P459."push"($P461) + find_lex $P458, "$past" + find_lex $P459, "$_" + $P460 = $P459."ast"() + $P461 = $P458."push"($P460) .annotate "line", 45 - .return ($P462) + .return ($P461) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "termish" :subid("36_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_477 +.sub "termish" :subid("36_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_476 .annotate "line", 55 - .const 'Sub' $P490 = "37_1258208097.30665" - capture_lex $P490 - new $P476, 'ExceptionHandler' - set_addr $P476, control_475 - $P476."handle_types"(58) - push_eh $P476 + .const 'Sub' $P489 = "37_1258264434.22101" + capture_lex $P489 + new $P475, 'ExceptionHandler' + set_addr $P475, control_474 + $P475."handle_types"(58) + push_eh $P475 .lex "self", self - .lex "$/", param_477 + .lex "$/", param_476 .annotate "line", 56 - new $P478, "Undef" - .lex "$past", $P478 + new $P477, "Undef" + .lex "$past", $P477 .annotate "line", 57 - new $P479, "Undef" - .lex "$lastlit", $P479 + new $P478, "Undef" + .lex "$lastlit", $P478 .annotate "line", 56 - get_hll_global $P480, ["PAST"], "Regex" - find_lex $P481, "$/" - $P482 = $P480."new"("concat" :named("pasttype"), $P481 :named("node")) - store_lex "$past", $P482 + get_hll_global $P479, ["PAST"], "Regex" + find_lex $P480, "$/" + $P481 = $P479."new"("concat" :named("pasttype"), $P480 :named("node")) + store_lex "$past", $P481 .annotate "line", 57 - new $P483, "Integer" - assign $P483, 0 - store_lex "$lastlit", $P483 + new $P482, "Integer" + assign $P482, 0 + store_lex "$lastlit", $P482 .annotate "line", 58 - find_lex $P485, "$/" - unless_null $P485, vivify_155 - new $P485, "Hash" + find_lex $P484, "$/" + unless_null $P484, vivify_155 + new $P484, "Hash" vivify_155: - set $P486, $P485["noun"] - unless_null $P486, vivify_156 - new $P486, "Undef" + set $P485, $P484["noun"] + unless_null $P485, vivify_156 + new $P485, "Undef" vivify_156: - defined $I487, $P486 - unless $I487, for_undef_157 - iter $P484, $P486 - new $P523, 'ExceptionHandler' - set_addr $P523, loop522_handler - $P523."handle_types"(65, 67, 66) - push_eh $P523 - loop522_test: - unless $P484, loop522_done - shift $P488, $P484 - loop522_redo: - .const 'Sub' $P490 = "37_1258208097.30665" - capture_lex $P490 - $P490($P488) - loop522_next: - goto loop522_test - loop522_handler: + defined $I486, $P485 + unless $I486, for_undef_157 + iter $P483, $P485 + new $P535, 'ExceptionHandler' + set_addr $P535, loop534_handler + $P535."handle_types"(65, 67, 66) + push_eh $P535 + loop534_test: + unless $P483, loop534_done + shift $P487, $P483 + loop534_redo: + .const 'Sub' $P489 = "37_1258264434.22101" + capture_lex $P489 + $P489($P487) + loop534_next: + goto loop534_test + loop534_handler: .local pmc exception .get_results (exception) - getattribute $P524, exception, 'type' - eq $P524, 65, loop522_next - eq $P524, 67, loop522_redo - loop522_done: + getattribute $P536, exception, 'type' + eq $P536, 65, loop534_next + eq $P536, 67, loop534_redo + loop534_done: pop_eh for_undef_157: -.annotate "line", 69 - find_lex $P525, "$/" - find_lex $P526, "$past" - $P527 = $P525."!make"($P526) +.annotate "line", 73 + find_lex $P537, "$/" + find_lex $P538, "$past" + $P539 = $P537."!make"($P538) .annotate "line", 55 - .return ($P527) - control_475: + .return ($P539) + control_474: .local pmc exception .get_results (exception) - getattribute $P528, exception, "payload" - .return ($P528) + getattribute $P540, exception, "payload" + .return ($P540) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block489" :anon :subid("37_1258208097.30665") :outer("36_1258208097.30665") - .param pmc param_492 +.sub "_block488" :anon :subid("37_1258264434.22101") :outer("36_1258264434.22101") + .param pmc param_491 .annotate "line", 59 - new $P491, "Undef" - .lex "$ast", $P491 - .lex "$_", param_492 - find_lex $P493, "$_" - $P494 = $P493."ast"() - store_lex "$ast", $P494 + new $P490, "Undef" + .lex "$ast", $P490 + .lex "$_", param_491 + find_lex $P492, "$_" + $P493 = $P492."ast"() + store_lex "$ast", $P493 .annotate "line", 60 - find_lex $P497, "$ast" - isfalse $I498, $P497 - if $I498, if_496 + find_lex $P496, "$ast" + if $P496, if_495 + set $P494, $P496 + goto if_495_end + if_495: .annotate "line", 61 find_lex $P503, "$lastlit" if $P503, if_502 @@ -8010,1100 +8008,1076 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes set $P501, $I506 if_502_end: if $P501, if_500 -.annotate "line", 65 - find_lex $P513, "$past" - find_lex $P514, "$ast" - $P513."push"($P514) -.annotate "line", 66 - find_lex $P517, "$ast" - $S518 = $P517."pasttype"() - iseq $I519, $S518, "literal" - if $I519, if_516 - new $P521, "Integer" - assign $P521, 0 - set $P515, $P521 - goto if_516_end - if_516: - find_lex $P520, "$ast" - set $P515, $P520 - if_516_end: - store_lex "$lastlit", $P515 -.annotate "line", 64 - set $P499, $P515 -.annotate "line", 61 + set $P499, $P501 goto if_500_end if_500: .annotate "line", 62 - find_lex $P507, "$lastlit" - unless_null $P507, vivify_158 - new $P507, "ResizablePMCArray" + get_hll_global $P507, ["PAST"], "Node" + find_lex $P508, "$ast" + unless_null $P508, vivify_158 + new $P508, "ResizablePMCArray" vivify_158: - set $P508, $P507[0] - unless_null $P508, vivify_159 - new $P508, "Undef" + set $P509, $P508[0] + unless_null $P509, vivify_159 + new $P509, "Undef" vivify_159: - find_lex $P509, "$ast" - unless_null $P509, vivify_160 - new $P509, "ResizablePMCArray" + $P510 = $P507."ACCEPTS"($P509) + isfalse $I511, $P510 + new $P499, 'Integer' + set $P499, $I511 + if_500_end: + if $P499, if_498 +.annotate "line", 66 + find_lex $P518, "$past" + find_lex $P519, "$ast" + $P518."push"($P519) +.annotate "line", 67 + find_lex $P524, "$ast" + $S525 = $P524."pasttype"() + iseq $I526, $S525, "literal" + if $I526, if_523 + new $P522, 'Integer' + set $P522, $I526 + goto if_523_end + if_523: +.annotate "line", 68 + get_hll_global $P527, ["PAST"], "Node" + find_lex $P528, "$ast" + unless_null $P528, vivify_160 + new $P528, "ResizablePMCArray" vivify_160: - set $P510, $P509[0] - unless_null $P510, vivify_161 - new $P510, "Undef" + set $P529, $P528[0] + unless_null $P529, vivify_161 + new $P529, "Undef" vivify_161: - concat $P511, $P508, $P510 + $P530 = $P527."ACCEPTS"($P529) + isfalse $I531, $P530 + new $P522, 'Integer' + set $P522, $I531 + if_523_end: + if $P522, if_521 + new $P533, "Integer" + assign $P533, 0 + set $P520, $P533 + goto if_521_end + if_521: + find_lex $P532, "$ast" + set $P520, $P532 + if_521_end: +.annotate "line", 69 + store_lex "$lastlit", $P520 +.annotate "line", 65 + set $P497, $P520 +.annotate "line", 62 + goto if_498_end + if_498: +.annotate "line", 63 find_lex $P512, "$lastlit" unless_null $P512, vivify_162 new $P512, "ResizablePMCArray" - store_lex "$lastlit", $P512 vivify_162: - set $P512[0], $P511 -.annotate "line", 61 - set $P499, $P511 - if_500_end: - set $P495, $P499 + set $P513, $P512[0] + unless_null $P513, vivify_163 + new $P513, "Undef" + vivify_163: + find_lex $P514, "$ast" + unless_null $P514, vivify_164 + new $P514, "ResizablePMCArray" + vivify_164: + set $P515, $P514[0] + unless_null $P515, vivify_165 + new $P515, "Undef" + vivify_165: + concat $P516, $P513, $P515 + find_lex $P517, "$lastlit" + unless_null $P517, vivify_166 + new $P517, "ResizablePMCArray" + store_lex "$lastlit", $P517 + vivify_166: + set $P517[0], $P516 +.annotate "line", 62 + set $P497, $P516 + if_498_end: .annotate "line", 60 - goto if_496_end - if_496: - if_496_end: + set $P494, $P497 + if_495_end: .annotate "line", 58 - .return ($P495) + .return ($P494) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "quantified_atom" :subid("38_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_532 -.annotate "line", 72 - .const 'Sub' $P541 = "39_1258208097.30665" - capture_lex $P541 - new $P531, 'ExceptionHandler' - set_addr $P531, control_530 - $P531."handle_types"(58) - push_eh $P531 +.sub "quantified_atom" :subid("38_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_544 +.annotate "line", 76 + .const 'Sub' $P553 = "39_1258264434.22101" + capture_lex $P553 + new $P543, 'ExceptionHandler' + set_addr $P543, control_542 + $P543."handle_types"(58) + push_eh $P543 .lex "self", self - .lex "$/", param_532 -.annotate "line", 73 - new $P533, "Undef" - .lex "$past", $P533 - find_lex $P534, "$/" - unless_null $P534, vivify_163 - new $P534, "Hash" - vivify_163: - set $P535, $P534["atom"] - unless_null $P535, vivify_164 - new $P535, "Undef" - vivify_164: - $P536 = $P535."ast"() - store_lex "$past", $P536 -.annotate "line", 74 - find_lex $P538, "$/" - unless_null $P538, vivify_165 - new $P538, "Hash" - vivify_165: - set $P539, $P538["quantifier"] - unless_null $P539, vivify_166 - new $P539, "Undef" - vivify_166: - if $P539, if_537 -.annotate "line", 80 - find_lex $P555, "$/" - unless_null $P555, vivify_167 - new $P555, "Hash" + .lex "$/", param_544 +.annotate "line", 77 + new $P545, "Undef" + .lex "$past", $P545 + find_lex $P546, "$/" + unless_null $P546, vivify_167 + new $P546, "Hash" vivify_167: - set $P556, $P555["backmod"] - unless_null $P556, vivify_168 - new $P556, "ResizablePMCArray" + set $P547, $P546["atom"] + unless_null $P547, vivify_168 + new $P547, "Undef" vivify_168: - set $P557, $P556[0] - unless_null $P557, vivify_169 - new $P557, "Undef" + $P548 = $P547."ast"() + store_lex "$past", $P548 +.annotate "line", 78 + find_lex $P550, "$/" + unless_null $P550, vivify_169 + new $P550, "Hash" vivify_169: - unless $P557, if_554_end - find_lex $P558, "$past" - find_lex $P559, "$/" - unless_null $P559, vivify_170 - new $P559, "Hash" + set $P551, $P550["quantifier"] + unless_null $P551, vivify_170 + new $P551, "Undef" vivify_170: - set $P560, $P559["backmod"] - unless_null $P560, vivify_171 - new $P560, "ResizablePMCArray" + if $P551, if_549 +.annotate "line", 84 + find_lex $P567, "$/" + unless_null $P567, vivify_171 + new $P567, "Hash" vivify_171: - set $P561, $P560[0] - unless_null $P561, vivify_172 - new $P561, "Undef" + set $P568, $P567["backmod"] + unless_null $P568, vivify_172 + new $P568, "ResizablePMCArray" vivify_172: - "backmod"($P558, $P561) - if_554_end: - goto if_537_end - if_537: -.annotate "line", 74 - .const 'Sub' $P541 = "39_1258208097.30665" - capture_lex $P541 - $P541() - if_537_end: -.annotate "line", 81 - find_lex $P567, "$past" - if $P567, if_566 - set $P565, $P567 - goto if_566_end - if_566: - find_lex $P568, "$past" - $P569 = $P568."backtrack"() - isfalse $I570, $P569 - new $P565, 'Integer' - set $P565, $I570 - if_566_end: - if $P565, if_564 - set $P563, $P565 - goto if_564_end - if_564: - get_global $P571, "@MODIFIERS" - unless_null $P571, vivify_176 - new $P571, "ResizablePMCArray" - vivify_176: - set $P572, $P571[0] - unless_null $P572, vivify_177 - new $P572, "Hash" - vivify_177: - set $P573, $P572["r"] - unless_null $P573, vivify_178 + set $P569, $P568[0] + unless_null $P569, vivify_173 + new $P569, "Undef" + vivify_173: + unless $P569, if_566_end + find_lex $P570, "$past" + find_lex $P571, "$/" + unless_null $P571, vivify_174 + new $P571, "Hash" + vivify_174: + set $P572, $P571["backmod"] + unless_null $P572, vivify_175 + new $P572, "ResizablePMCArray" + vivify_175: + set $P573, $P572[0] + unless_null $P573, vivify_176 new $P573, "Undef" - vivify_178: - set $P563, $P573 - if_564_end: - unless $P563, if_562_end -.annotate "line", 82 - find_lex $P574, "$past" - $P574."backtrack"("r") - if_562_end: -.annotate "line", 84 - find_lex $P575, "$/" - find_lex $P576, "$past" - $P577 = $P575."!make"($P576) -.annotate "line", 72 - .return ($P577) - control_530: + vivify_176: + "backmod"($P570, $P573) + if_566_end: + goto if_549_end + if_549: +.annotate "line", 78 + .const 'Sub' $P553 = "39_1258264434.22101" + capture_lex $P553 + $P553() + if_549_end: +.annotate "line", 85 + find_lex $P579, "$past" + if $P579, if_578 + set $P577, $P579 + goto if_578_end + if_578: + find_lex $P580, "$past" + $P581 = $P580."backtrack"() + isfalse $I582, $P581 + new $P577, 'Integer' + set $P577, $I582 + if_578_end: + if $P577, if_576 + set $P575, $P577 + goto if_576_end + if_576: + get_global $P583, "@MODIFIERS" + unless_null $P583, vivify_180 + new $P583, "ResizablePMCArray" + vivify_180: + set $P584, $P583[0] + unless_null $P584, vivify_181 + new $P584, "Hash" + vivify_181: + set $P585, $P584["r"] + unless_null $P585, vivify_182 + new $P585, "Undef" + vivify_182: + set $P575, $P585 + if_576_end: + unless $P575, if_574_end +.annotate "line", 86 + find_lex $P586, "$past" + $P586."backtrack"("r") + if_574_end: +.annotate "line", 88 + find_lex $P587, "$/" + find_lex $P588, "$past" + $P589 = $P587."!make"($P588) +.annotate "line", 76 + .return ($P589) + control_542: .local pmc exception .get_results (exception) - getattribute $P578, exception, "payload" - .return ($P578) + getattribute $P590, exception, "payload" + .return ($P590) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block540" :anon :subid("39_1258208097.30665") :outer("38_1258208097.30665") -.annotate "line", 76 - new $P542, "Undef" - .lex "$qast", $P542 -.annotate "line", 75 - find_lex $P544, "$past" - isfalse $I545, $P544 - unless $I545, if_543_end - find_lex $P546, "$/" - $P546."panic"("Can't quantify zero-width atom") - if_543_end: -.annotate "line", 76 - find_lex $P547, "$/" - unless_null $P547, vivify_173 - new $P547, "Hash" - vivify_173: - set $P548, $P547["quantifier"] - unless_null $P548, vivify_174 - new $P548, "ResizablePMCArray" - vivify_174: - set $P549, $P548[0] - unless_null $P549, vivify_175 - new $P549, "Undef" - vivify_175: - $P550 = $P549."ast"() - store_lex "$qast", $P550 -.annotate "line", 77 - find_lex $P551, "$qast" - find_lex $P552, "$past" - $P551."unshift"($P552) +.sub "_block552" :anon :subid("39_1258264434.22101") :outer("38_1258264434.22101") +.annotate "line", 80 + new $P554, "Undef" + .lex "$qast", $P554 +.annotate "line", 79 + find_lex $P556, "$past" + isfalse $I557, $P556 + unless $I557, if_555_end + find_lex $P558, "$/" + $P558."panic"("Can't quantify zero-width atom") + if_555_end: +.annotate "line", 80 + find_lex $P559, "$/" + unless_null $P559, vivify_177 + new $P559, "Hash" + vivify_177: + set $P560, $P559["quantifier"] + unless_null $P560, vivify_178 + new $P560, "ResizablePMCArray" + vivify_178: + set $P561, $P560[0] + unless_null $P561, vivify_179 + new $P561, "Undef" + vivify_179: + $P562 = $P561."ast"() + store_lex "$qast", $P562 +.annotate "line", 81 + find_lex $P563, "$qast" + find_lex $P564, "$past" + $P563."unshift"($P564) +.annotate "line", 82 + find_lex $P565, "$qast" + store_lex "$past", $P565 .annotate "line", 78 - find_lex $P553, "$qast" - store_lex "$past", $P553 -.annotate "line", 74 - .return ($P553) + .return ($P565) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "atom" :subid("40_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_582 -.annotate "line", 87 - new $P581, 'ExceptionHandler' - set_addr $P581, control_580 - $P581."handle_types"(58) - push_eh $P581 - .lex "self", self - .lex "$/", param_582 -.annotate "line", 88 - new $P583, "Undef" - .lex "$past", $P583 -.annotate "line", 87 - find_lex $P584, "$past" -.annotate "line", 89 - find_lex $P586, "$/" - unless_null $P586, vivify_179 - new $P586, "Hash" - vivify_179: - set $P587, $P586["metachar"] - unless_null $P587, vivify_180 - new $P587, "Undef" - vivify_180: - if $P587, if_585 +.sub "atom" :subid("40_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_594 .annotate "line", 91 - get_hll_global $P591, ["PAST"], "Regex" - find_lex $P592, "$/" - set $S593, $P592 - find_lex $P594, "$/" - $P595 = $P591."new"($S593, "literal" :named("pasttype"), $P594 :named("node")) - store_lex "$past", $P595 + new $P593, 'ExceptionHandler' + set_addr $P593, control_592 + $P593."handle_types"(58) + push_eh $P593 + .lex "self", self + .lex "$/", param_594 .annotate "line", 92 - get_global $P597, "@MODIFIERS" - unless_null $P597, vivify_181 - new $P597, "ResizablePMCArray" - vivify_181: - set $P598, $P597[0] - unless_null $P598, vivify_182 + new $P595, "Undef" + .lex "$past", $P595 +.annotate "line", 91 + find_lex $P596, "$past" +.annotate "line", 93 + find_lex $P598, "$/" + unless_null $P598, vivify_183 new $P598, "Hash" - vivify_182: - set $P599, $P598["i"] - unless_null $P599, vivify_183 - new $P599, "Undef" vivify_183: - unless $P599, if_596_end - find_lex $P600, "$past" - $P600."subtype"("ignorecase") - if_596_end: -.annotate "line", 90 - goto if_585_end - if_585: -.annotate "line", 89 - find_lex $P588, "$/" - unless_null $P588, vivify_184 - new $P588, "Hash" + set $P599, $P598["metachar"] + unless_null $P599, vivify_184 + new $P599, "Undef" vivify_184: - set $P589, $P588["metachar"] - unless_null $P589, vivify_185 - new $P589, "Undef" + if $P599, if_597 +.annotate "line", 95 + get_hll_global $P603, ["PAST"], "Regex" + find_lex $P604, "$/" + set $S605, $P604 + find_lex $P606, "$/" + $P607 = $P603."new"($S605, "literal" :named("pasttype"), $P606 :named("node")) + store_lex "$past", $P607 +.annotate "line", 96 + get_global $P609, "@MODIFIERS" + unless_null $P609, vivify_185 + new $P609, "ResizablePMCArray" vivify_185: - $P590 = $P589."ast"() - store_lex "$past", $P590 - if_585_end: + set $P610, $P609[0] + unless_null $P610, vivify_186 + new $P610, "Hash" + vivify_186: + set $P611, $P610["i"] + unless_null $P611, vivify_187 + new $P611, "Undef" + vivify_187: + unless $P611, if_608_end + find_lex $P612, "$past" + $P612."subtype"("ignorecase") + if_608_end: .annotate "line", 94 - find_lex $P601, "$/" - find_lex $P602, "$past" - $P603 = $P601."!make"($P602) -.annotate "line", 87 - .return ($P603) - control_580: - .local pmc exception - .get_results (exception) - getattribute $P604, exception, "payload" - .return ($P604) - rethrow exception -.end - - -.namespace ["Regex";"P6Regex";"Actions"] -.sub "quantifier:sym<*>" :subid("41_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_608 -.annotate "line", 97 - new $P607, 'ExceptionHandler' - set_addr $P607, control_606 - $P607."handle_types"(58) - push_eh $P607 - .lex "self", self - .lex "$/", param_608 + goto if_597_end + if_597: +.annotate "line", 93 + find_lex $P600, "$/" + unless_null $P600, vivify_188 + new $P600, "Hash" + vivify_188: + set $P601, $P600["metachar"] + unless_null $P601, vivify_189 + new $P601, "Undef" + vivify_189: + $P602 = $P601."ast"() + store_lex "$past", $P602 + if_597_end: .annotate "line", 98 - new $P609, "Undef" - .lex "$past", $P609 - get_hll_global $P610, ["PAST"], "Regex" - find_lex $P611, "$/" - $P612 = $P610."new"("quant" :named("pasttype"), $P611 :named("node")) - store_lex "$past", $P612 -.annotate "line", 99 find_lex $P613, "$/" find_lex $P614, "$past" - find_lex $P615, "$/" - unless_null $P615, vivify_186 - new $P615, "Hash" - vivify_186: - set $P616, $P615["backmod"] - unless_null $P616, vivify_187 - new $P616, "Undef" - vivify_187: - $P617 = "backmod"($P614, $P616) - $P618 = $P613."!make"($P617) -.annotate "line", 97 - .return ($P618) - control_606: + $P615 = $P613."!make"($P614) +.annotate "line", 91 + .return ($P615) + control_592: .local pmc exception .get_results (exception) - getattribute $P619, exception, "payload" - .return ($P619) + getattribute $P616, exception, "payload" + .return ($P616) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "quantifier:sym<+>" :subid("42_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_623 -.annotate "line", 102 - new $P622, 'ExceptionHandler' - set_addr $P622, control_621 - $P622."handle_types"(58) - push_eh $P622 +.sub "quantifier:sym<*>" :subid("41_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_620 +.annotate "line", 101 + new $P619, 'ExceptionHandler' + set_addr $P619, control_618 + $P619."handle_types"(58) + push_eh $P619 .lex "self", self - .lex "$/", param_623 -.annotate "line", 103 - new $P624, "Undef" - .lex "$past", $P624 - get_hll_global $P625, ["PAST"], "Regex" - find_lex $P626, "$/" - $P627 = $P625."new"("quant" :named("pasttype"), 1 :named("min"), $P626 :named("node")) - store_lex "$past", $P627 -.annotate "line", 104 - find_lex $P628, "$/" - find_lex $P629, "$past" - find_lex $P630, "$/" - unless_null $P630, vivify_188 - new $P630, "Hash" - vivify_188: - set $P631, $P630["backmod"] - unless_null $P631, vivify_189 - new $P631, "Undef" - vivify_189: - $P632 = "backmod"($P629, $P631) - $P633 = $P628."!make"($P632) + .lex "$/", param_620 .annotate "line", 102 - .return ($P633) - control_621: + new $P621, "Undef" + .lex "$past", $P621 + get_hll_global $P622, ["PAST"], "Regex" + find_lex $P623, "$/" + $P624 = $P622."new"("quant" :named("pasttype"), $P623 :named("node")) + store_lex "$past", $P624 +.annotate "line", 103 + find_lex $P625, "$/" + find_lex $P626, "$past" + find_lex $P627, "$/" + unless_null $P627, vivify_190 + new $P627, "Hash" + vivify_190: + set $P628, $P627["backmod"] + unless_null $P628, vivify_191 + new $P628, "Undef" + vivify_191: + $P629 = "backmod"($P626, $P628) + $P630 = $P625."!make"($P629) +.annotate "line", 101 + .return ($P630) + control_618: .local pmc exception .get_results (exception) - getattribute $P634, exception, "payload" - .return ($P634) + getattribute $P631, exception, "payload" + .return ($P631) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "quantifier:sym" :subid("43_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_638 -.annotate "line", 107 - new $P637, 'ExceptionHandler' - set_addr $P637, control_636 - $P637."handle_types"(58) - push_eh $P637 +.sub "quantifier:sym<+>" :subid("42_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_635 +.annotate "line", 106 + new $P634, 'ExceptionHandler' + set_addr $P634, control_633 + $P634."handle_types"(58) + push_eh $P634 .lex "self", self - .lex "$/", param_638 -.annotate "line", 108 - new $P639, "Undef" - .lex "$past", $P639 - get_hll_global $P640, ["PAST"], "Regex" - find_lex $P641, "$/" - $P642 = $P640."new"("quant" :named("pasttype"), 0 :named("min"), 1 :named("max"), $P641 :named("node")) - store_lex "$past", $P642 -.annotate "line", 109 - find_lex $P643, "$/" - find_lex $P644, "$past" - find_lex $P645, "$/" - unless_null $P645, vivify_190 - new $P645, "Hash" - vivify_190: - set $P646, $P645["backmod"] - unless_null $P646, vivify_191 - new $P646, "Undef" - vivify_191: - $P647 = "backmod"($P644, $P646) - $P643."!make"($P647) -.annotate "line", 110 - find_lex $P648, "$/" - find_lex $P649, "$past" - $P650 = $P648."!make"($P649) + .lex "$/", param_635 .annotate "line", 107 - .return ($P650) - control_636: + new $P636, "Undef" + .lex "$past", $P636 + get_hll_global $P637, ["PAST"], "Regex" + find_lex $P638, "$/" + $P639 = $P637."new"("quant" :named("pasttype"), 1 :named("min"), $P638 :named("node")) + store_lex "$past", $P639 +.annotate "line", 108 + find_lex $P640, "$/" + find_lex $P641, "$past" + find_lex $P642, "$/" + unless_null $P642, vivify_192 + new $P642, "Hash" + vivify_192: + set $P643, $P642["backmod"] + unless_null $P643, vivify_193 + new $P643, "Undef" + vivify_193: + $P644 = "backmod"($P641, $P643) + $P645 = $P640."!make"($P644) +.annotate "line", 106 + .return ($P645) + control_633: .local pmc exception .get_results (exception) - getattribute $P651, exception, "payload" - .return ($P651) + getattribute $P646, exception, "payload" + .return ($P646) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "quantifier:sym<**>" :subid("44_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_655 -.annotate "line", 113 - new $P654, 'ExceptionHandler' - set_addr $P654, control_653 - $P654."handle_types"(58) - push_eh $P654 +.sub "quantifier:sym" :subid("43_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_650 +.annotate "line", 111 + new $P649, 'ExceptionHandler' + set_addr $P649, control_648 + $P649."handle_types"(58) + push_eh $P649 .lex "self", self - .lex "$/", param_655 -.annotate "line", 114 - new $P656, "Undef" - .lex "$past", $P656 + .lex "$/", param_650 +.annotate "line", 112 + new $P651, "Undef" + .lex "$past", $P651 + get_hll_global $P652, ["PAST"], "Regex" + find_lex $P653, "$/" + $P654 = $P652."new"("quant" :named("pasttype"), 0 :named("min"), 1 :named("max"), $P653 :named("node")) + store_lex "$past", $P654 .annotate "line", 113 - find_lex $P657, "$past" -.annotate "line", 115 - find_lex $P659, "$/" - unless_null $P659, vivify_192 - new $P659, "Hash" - vivify_192: - set $P660, $P659["quantified_atom"] - unless_null $P660, vivify_193 - new $P660, "Undef" - vivify_193: - if $P660, if_658 -.annotate "line", 120 - get_hll_global $P667, ["PAST"], "Regex" - find_lex $P668, "$/" - unless_null $P668, vivify_194 - new $P668, "Hash" + find_lex $P655, "$/" + find_lex $P656, "$past" + find_lex $P657, "$/" + unless_null $P657, vivify_194 + new $P657, "Hash" vivify_194: - set $P669, $P668["min"] - unless_null $P669, vivify_195 - new $P669, "Undef" + set $P658, $P657["backmod"] + unless_null $P658, vivify_195 + new $P658, "Undef" vivify_195: - set $N670, $P669 + $P659 = "backmod"($P656, $P658) + $P655."!make"($P659) +.annotate "line", 114 + find_lex $P660, "$/" + find_lex $P661, "$past" + $P662 = $P660."!make"($P661) +.annotate "line", 111 + .return ($P662) + control_648: + .local pmc exception + .get_results (exception) + getattribute $P663, exception, "payload" + .return ($P663) + rethrow exception +.end + + +.namespace ["Regex";"P6Regex";"Actions"] +.sub "quantifier:sym<**>" :subid("44_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_667 +.annotate "line", 117 + new $P666, 'ExceptionHandler' + set_addr $P666, control_665 + $P666."handle_types"(58) + push_eh $P666 + .lex "self", self + .lex "$/", param_667 +.annotate "line", 118 + new $P668, "Undef" + .lex "$past", $P668 +.annotate "line", 117 + find_lex $P669, "$past" +.annotate "line", 119 find_lex $P671, "$/" - $P672 = $P667."new"("quant" :named("pasttype"), $N670 :named("min"), $P671 :named("node")) - store_lex "$past", $P672 -.annotate "line", 121 - find_lex $P674, "$/" - unless_null $P674, vivify_196 - new $P674, "Hash" + unless_null $P671, vivify_196 + new $P671, "Hash" vivify_196: - set $P675, $P674["max"] - unless_null $P675, vivify_197 - new $P675, "Undef" + set $P672, $P671["quantified_atom"] + unless_null $P672, vivify_197 + new $P672, "Undef" vivify_197: - isfalse $I676, $P675 - if $I676, if_673 -.annotate "line", 122 - find_lex $P682, "$/" - unless_null $P682, vivify_198 - new $P682, "Hash" + if $P672, if_670 +.annotate "line", 124 + get_hll_global $P679, ["PAST"], "Regex" + find_lex $P680, "$/" + unless_null $P680, vivify_198 + new $P680, "Hash" vivify_198: - set $P683, $P682["max"] - unless_null $P683, vivify_199 - new $P683, "ResizablePMCArray" + set $P681, $P680["min"] + unless_null $P681, vivify_199 + new $P681, "Undef" vivify_199: - set $P684, $P683[0] - unless_null $P684, vivify_200 - new $P684, "Undef" + set $N682, $P681 + find_lex $P683, "$/" + $P684 = $P679."new"("quant" :named("pasttype"), $N682 :named("min"), $P683 :named("node")) + store_lex "$past", $P684 +.annotate "line", 125 + find_lex $P686, "$/" + unless_null $P686, vivify_200 + new $P686, "Hash" vivify_200: - set $S685, $P684 - isne $I686, $S685, "*" - unless $I686, if_681_end - find_lex $P687, "$past" - find_lex $P688, "$/" - unless_null $P688, vivify_201 - new $P688, "Hash" + set $P687, $P686["max"] + unless_null $P687, vivify_201 + new $P687, "Undef" vivify_201: - set $P689, $P688["max"] - unless_null $P689, vivify_202 - new $P689, "ResizablePMCArray" + isfalse $I688, $P687 + if $I688, if_685 +.annotate "line", 126 + find_lex $P694, "$/" + unless_null $P694, vivify_202 + new $P694, "Hash" vivify_202: - set $P690, $P689[0] - unless_null $P690, vivify_203 - new $P690, "Undef" + set $P695, $P694["max"] + unless_null $P695, vivify_203 + new $P695, "ResizablePMCArray" vivify_203: - set $N691, $P690 - $P687."max"($N691) - if_681_end: - goto if_673_end - if_673: -.annotate "line", 121 - find_lex $P677, "$past" - find_lex $P678, "$/" - unless_null $P678, vivify_204 - new $P678, "Hash" + set $P696, $P695[0] + unless_null $P696, vivify_204 + new $P696, "Undef" vivify_204: - set $P679, $P678["min"] - unless_null $P679, vivify_205 - new $P679, "Undef" + set $S697, $P696 + isne $I698, $S697, "*" + unless $I698, if_693_end + find_lex $P699, "$past" + find_lex $P700, "$/" + unless_null $P700, vivify_205 + new $P700, "Hash" vivify_205: - set $N680, $P679 - $P677."max"($N680) - if_673_end: -.annotate "line", 119 - goto if_658_end - if_658: -.annotate "line", 116 - get_hll_global $P661, ["PAST"], "Regex" -.annotate "line", 117 - find_lex $P662, "$/" - unless_null $P662, vivify_206 - new $P662, "Hash" + set $P701, $P700["max"] + unless_null $P701, vivify_206 + new $P701, "ResizablePMCArray" vivify_206: - set $P663, $P662["quantified_atom"] - unless_null $P663, vivify_207 - new $P663, "Undef" + set $P702, $P701[0] + unless_null $P702, vivify_207 + new $P702, "Undef" vivify_207: - $P664 = $P663."ast"() - find_lex $P665, "$/" - $P666 = $P661."new"("quant" :named("pasttype"), 1 :named("min"), $P664 :named("sep"), $P665 :named("node")) -.annotate "line", 116 - store_lex "$past", $P666 - if_658_end: -.annotate "line", 124 - find_lex $P692, "$/" - find_lex $P693, "$past" - find_lex $P694, "$/" - unless_null $P694, vivify_208 - new $P694, "Hash" + set $N703, $P702 + $P699."max"($N703) + if_693_end: + goto if_685_end + if_685: +.annotate "line", 125 + find_lex $P689, "$past" + find_lex $P690, "$/" + unless_null $P690, vivify_208 + new $P690, "Hash" vivify_208: - set $P695, $P694["backmod"] - unless_null $P695, vivify_209 - new $P695, "Undef" + set $P691, $P690["min"] + unless_null $P691, vivify_209 + new $P691, "Undef" vivify_209: - $P696 = "backmod"($P693, $P695) - $P697 = $P692."!make"($P696) -.annotate "line", 113 - .return ($P697) - control_653: - .local pmc exception - .get_results (exception) - getattribute $P698, exception, "payload" - .return ($P698) - rethrow exception -.end - - -.namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym" :subid("45_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_702 -.annotate "line", 127 - new $P701, 'ExceptionHandler' - set_addr $P701, control_700 - $P701."handle_types"(58) - push_eh $P701 - .lex "self", self - .lex "$/", param_702 -.annotate "line", 128 - new $P703, "Undef" - .lex "$past", $P703 -.annotate "line", 129 - get_global $P706, "@MODIFIERS" - unless_null $P706, vivify_210 - new $P706, "ResizablePMCArray" + set $N692, $P691 + $P689."max"($N692) + if_685_end: +.annotate "line", 123 + goto if_670_end + if_670: +.annotate "line", 120 + get_hll_global $P673, ["PAST"], "Regex" +.annotate "line", 121 + find_lex $P674, "$/" + unless_null $P674, vivify_210 + new $P674, "Hash" vivify_210: - set $P707, $P706[0] - unless_null $P707, vivify_211 - new $P707, "Hash" + set $P675, $P674["quantified_atom"] + unless_null $P675, vivify_211 + new $P675, "Undef" vivify_211: - set $P708, $P707["s"] - unless_null $P708, vivify_212 - new $P708, "Undef" + $P676 = $P675."ast"() + find_lex $P677, "$/" + $P678 = $P673."new"("quant" :named("pasttype"), 1 :named("min"), $P676 :named("sep"), $P677 :named("node")) +.annotate "line", 120 + store_lex "$past", $P678 + if_670_end: +.annotate "line", 128 + find_lex $P704, "$/" + find_lex $P705, "$past" + find_lex $P706, "$/" + unless_null $P706, vivify_212 + new $P706, "Hash" vivify_212: - if $P708, if_705 - new $P712, "Integer" - assign $P712, 0 - set $P704, $P712 - goto if_705_end - if_705: - get_hll_global $P709, ["PAST"], "Regex" - find_lex $P710, "$/" - $P711 = $P709."new"("ws", "subrule" :named("pasttype"), "method" :named("subtype"), $P710 :named("node")) - set $P704, $P711 - if_705_end: - store_lex "$past", $P704 -.annotate "line", 132 - find_lex $P713, "$/" - find_lex $P714, "$past" - $P715 = $P713."!make"($P714) -.annotate "line", 127 - .return ($P715) - control_700: + set $P707, $P706["backmod"] + unless_null $P707, vivify_213 + new $P707, "Undef" + vivify_213: + $P708 = "backmod"($P705, $P707) + $P709 = $P704."!make"($P708) +.annotate "line", 117 + .return ($P709) + control_665: .local pmc exception .get_results (exception) - getattribute $P716, exception, "payload" - .return ($P716) + getattribute $P710, exception, "payload" + .return ($P710) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<[ ]>" :subid("46_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_720 -.annotate "line", 136 - new $P719, 'ExceptionHandler' - set_addr $P719, control_718 - $P719."handle_types"(58) - push_eh $P719 +.sub "metachar:sym" :subid("45_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_714 +.annotate "line", 131 + new $P713, 'ExceptionHandler' + set_addr $P713, control_712 + $P713."handle_types"(58) + push_eh $P713 .lex "self", self - .lex "$/", param_720 -.annotate "line", 137 - find_lex $P721, "$/" - find_lex $P722, "$/" - unless_null $P722, vivify_213 - new $P722, "Hash" - vivify_213: - set $P723, $P722["nibbler"] - unless_null $P723, vivify_214 - new $P723, "Undef" + .lex "$/", param_714 +.annotate "line", 132 + new $P715, "Undef" + .lex "$past", $P715 +.annotate "line", 133 + get_global $P718, "@MODIFIERS" + unless_null $P718, vivify_214 + new $P718, "ResizablePMCArray" vivify_214: - $P724 = $P723."ast"() - $P725 = $P721."!make"($P724) + set $P719, $P718[0] + unless_null $P719, vivify_215 + new $P719, "Hash" + vivify_215: + set $P720, $P719["s"] + unless_null $P720, vivify_216 + new $P720, "Undef" + vivify_216: + if $P720, if_717 + new $P724, "Integer" + assign $P724, 0 + set $P716, $P724 + goto if_717_end + if_717: + get_hll_global $P721, ["PAST"], "Regex" + find_lex $P722, "$/" + $P723 = $P721."new"("ws", "subrule" :named("pasttype"), "method" :named("subtype"), $P722 :named("node")) + set $P716, $P723 + if_717_end: + store_lex "$past", $P716 .annotate "line", 136 - .return ($P725) - control_718: + find_lex $P725, "$/" + find_lex $P726, "$past" + $P727 = $P725."!make"($P726) +.annotate "line", 131 + .return ($P727) + control_712: .local pmc exception .get_results (exception) - getattribute $P726, exception, "payload" - .return ($P726) + getattribute $P728, exception, "payload" + .return ($P728) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<( )>" :subid("47_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_730 +.sub "metachar:sym<[ ]>" :subid("46_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_732 .annotate "line", 140 - new $P729, 'ExceptionHandler' - set_addr $P729, control_728 - $P729."handle_types"(58) - push_eh $P729 + new $P731, 'ExceptionHandler' + set_addr $P731, control_730 + $P731."handle_types"(58) + push_eh $P731 .lex "self", self - .lex "$/", param_730 -.annotate "line", 141 - new $P731, "Undef" - .lex "$subpast", $P731 -.annotate "line", 142 - new $P732, "Undef" - .lex "$past", $P732 + .lex "$/", param_732 .annotate "line", 141 find_lex $P733, "$/" - unless_null $P733, vivify_215 - new $P733, "Hash" - vivify_215: - set $P734, $P733["nibbler"] - unless_null $P734, vivify_216 - new $P734, "Undef" - vivify_216: - $P735 = $P734."ast"() - $P736 = "buildsub"($P735) - store_lex "$subpast", $P736 -.annotate "line", 142 - get_hll_global $P737, ["PAST"], "Regex" - find_lex $P738, "$subpast" - find_lex $P739, "$/" - $P740 = $P737."new"($P738, "subrule" :named("pasttype"), "capture" :named("subtype"), $P739 :named("node")) - store_lex "$past", $P740 -.annotate "line", 144 - find_lex $P741, "$/" - find_lex $P742, "$past" - $P743 = $P741."!make"($P742) + find_lex $P734, "$/" + unless_null $P734, vivify_217 + new $P734, "Hash" + vivify_217: + set $P735, $P734["nibbler"] + unless_null $P735, vivify_218 + new $P735, "Undef" + vivify_218: + $P736 = $P735."ast"() + $P737 = $P733."!make"($P736) .annotate "line", 140 - .return ($P743) - control_728: + .return ($P737) + control_730: .local pmc exception .get_results (exception) - getattribute $P744, exception, "payload" - .return ($P744) + getattribute $P738, exception, "payload" + .return ($P738) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<'>" :subid("48_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_748 -.annotate "line", 147 - new $P747, 'ExceptionHandler' - set_addr $P747, control_746 - $P747."handle_types"(58) - push_eh $P747 +.sub "metachar:sym<( )>" :subid("47_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_742 +.annotate "line", 144 + new $P741, 'ExceptionHandler' + set_addr $P741, control_740 + $P741."handle_types"(58) + push_eh $P741 .lex "self", self - .lex "$/", param_748 -.annotate "line", 148 - new $P749, "Undef" - .lex "$past", $P749 - get_hll_global $P750, ["PAST"], "Regex" - find_lex $P751, "$/" - unless_null $P751, vivify_217 - new $P751, "Hash" - vivify_217: - set $P752, $P751["quote"] - unless_null $P752, vivify_218 - new $P752, "Hash" - vivify_218: - set $P753, $P752["val"] - unless_null $P753, vivify_219 - new $P753, "Undef" + .lex "$/", param_742 +.annotate "line", 145 + new $P743, "Undef" + .lex "$subpast", $P743 +.annotate "line", 146 + new $P744, "Undef" + .lex "$past", $P744 +.annotate "line", 145 + find_lex $P745, "$/" + unless_null $P745, vivify_219 + new $P745, "Hash" vivify_219: - set $S754, $P753 - find_lex $P755, "$/" - $P756 = $P750."new"($S754, "literal" :named("pasttype"), $P755 :named("node")) - store_lex "$past", $P756 -.annotate "line", 149 - find_lex $P757, "$/" - find_lex $P758, "$past" - $P759 = $P757."!make"($P758) -.annotate "line", 147 - .return ($P759) - control_746: + set $P746, $P745["nibbler"] + unless_null $P746, vivify_220 + new $P746, "Undef" + vivify_220: + $P747 = $P746."ast"() + $P748 = "buildsub"($P747) + store_lex "$subpast", $P748 +.annotate "line", 146 + get_hll_global $P749, ["PAST"], "Regex" + find_lex $P750, "$subpast" + find_lex $P751, "$/" + $P752 = $P749."new"($P750, "subrule" :named("pasttype"), "capture" :named("subtype"), $P751 :named("node")) + store_lex "$past", $P752 +.annotate "line", 148 + find_lex $P753, "$/" + find_lex $P754, "$past" + $P755 = $P753."!make"($P754) +.annotate "line", 144 + .return ($P755) + control_740: .local pmc exception .get_results (exception) - getattribute $P760, exception, "payload" - .return ($P760) + getattribute $P756, exception, "payload" + .return ($P756) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<.>" :subid("49_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_764 -.annotate "line", 152 - new $P763, 'ExceptionHandler' - set_addr $P763, control_762 - $P763."handle_types"(58) - push_eh $P763 +.sub "metachar:sym<'>" :subid("48_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_760 +.annotate "line", 151 + new $P759, 'ExceptionHandler' + set_addr $P759, control_758 + $P759."handle_types"(58) + push_eh $P759 .lex "self", self - .lex "$/", param_764 -.annotate "line", 153 - new $P765, "Undef" - .lex "$past", $P765 - get_hll_global $P766, ["PAST"], "Regex" - find_lex $P767, "$/" - $P768 = $P766."new"("charclass" :named("pasttype"), "." :named("subtype"), $P767 :named("node")) - store_lex "$past", $P768 + .lex "$/", param_760 +.annotate "line", 152 + new $P761, "Undef" + .lex "$quote", $P761 .annotate "line", 154 - find_lex $P769, "$/" - find_lex $P770, "$past" - $P771 = $P769."!make"($P770) + new $P762, "Undef" + .lex "$past", $P762 .annotate "line", 152 - .return ($P771) - control_762: + find_lex $P763, "$/" + unless_null $P763, vivify_221 + new $P763, "Hash" + vivify_221: + set $P764, $P763["quote_EXPR"] + unless_null $P764, vivify_222 + new $P764, "Undef" + vivify_222: + $P765 = $P764."ast"() + store_lex "$quote", $P765 +.annotate "line", 153 + get_hll_global $P767, ["PAST"], "Val" + find_lex $P768, "$quote" + $P769 = $P767."ACCEPTS"($P768) + unless $P769, if_766_end + find_lex $P770, "$quote" + $P771 = $P770."value"() + store_lex "$quote", $P771 + if_766_end: +.annotate "line", 154 + get_hll_global $P772, ["PAST"], "Regex" + find_lex $P773, "$quote" + find_lex $P774, "$/" + $P775 = $P772."new"($P773, "literal" :named("pasttype"), $P774 :named("node")) + store_lex "$past", $P775 +.annotate "line", 155 + find_lex $P776, "$/" + find_lex $P777, "$past" + $P778 = $P776."!make"($P777) +.annotate "line", 151 + .return ($P778) + control_758: .local pmc exception .get_results (exception) - getattribute $P772, exception, "payload" - .return ($P772) + getattribute $P779, exception, "payload" + .return ($P779) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<^>" :subid("50_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_776 -.annotate "line", 157 - new $P775, 'ExceptionHandler' - set_addr $P775, control_774 - $P775."handle_types"(58) - push_eh $P775 - .lex "self", self - .lex "$/", param_776 +.sub "metachar:sym<\">" :subid("49_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_783 .annotate "line", 158 - new $P777, "Undef" - .lex "$past", $P777 - get_hll_global $P778, ["PAST"], "Regex" - find_lex $P779, "$/" - $P780 = $P778."new"("anchor" :named("pasttype"), "bos" :named("subtype"), $P779 :named("node")) - store_lex "$past", $P780 -.annotate "line", 159 - find_lex $P781, "$/" - find_lex $P782, "$past" - $P783 = $P781."!make"($P782) -.annotate "line", 157 - .return ($P783) - control_774: - .local pmc exception - .get_results (exception) - getattribute $P784, exception, "payload" - .return ($P784) - rethrow exception -.end - - -.namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<^^>" :subid("51_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_788 -.annotate "line", 162 - new $P787, 'ExceptionHandler' - set_addr $P787, control_786 - $P787."handle_types"(58) - push_eh $P787 + new $P782, 'ExceptionHandler' + set_addr $P782, control_781 + $P782."handle_types"(58) + push_eh $P782 .lex "self", self - .lex "$/", param_788 -.annotate "line", 163 - new $P789, "Undef" - .lex "$past", $P789 - get_hll_global $P790, ["PAST"], "Regex" - find_lex $P791, "$/" - $P792 = $P790."new"("anchor" :named("pasttype"), "bol" :named("subtype"), $P791 :named("node")) - store_lex "$past", $P792 -.annotate "line", 164 - find_lex $P793, "$/" - find_lex $P794, "$past" - $P795 = $P793."!make"($P794) + .lex "$/", param_783 +.annotate "line", 159 + new $P784, "Undef" + .lex "$quote", $P784 +.annotate "line", 161 + new $P785, "Undef" + .lex "$past", $P785 +.annotate "line", 159 + find_lex $P786, "$/" + unless_null $P786, vivify_223 + new $P786, "Hash" + vivify_223: + set $P787, $P786["quote_EXPR"] + unless_null $P787, vivify_224 + new $P787, "Undef" + vivify_224: + $P788 = $P787."ast"() + store_lex "$quote", $P788 +.annotate "line", 160 + get_hll_global $P790, ["PAST"], "Val" + find_lex $P791, "$quote" + $P792 = $P790."ACCEPTS"($P791) + unless $P792, if_789_end + find_lex $P793, "$quote" + $P794 = $P793."value"() + store_lex "$quote", $P794 + if_789_end: +.annotate "line", 161 + get_hll_global $P795, ["PAST"], "Regex" + find_lex $P796, "$quote" + find_lex $P797, "$/" + $P798 = $P795."new"($P796, "literal" :named("pasttype"), $P797 :named("node")) + store_lex "$past", $P798 .annotate "line", 162 - .return ($P795) - control_786: + find_lex $P799, "$/" + find_lex $P800, "$past" + $P801 = $P799."!make"($P800) +.annotate "line", 158 + .return ($P801) + control_781: .local pmc exception .get_results (exception) - getattribute $P796, exception, "payload" - .return ($P796) + getattribute $P802, exception, "payload" + .return ($P802) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<$>" :subid("52_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_800 -.annotate "line", 167 - new $P799, 'ExceptionHandler' - set_addr $P799, control_798 - $P799."handle_types"(58) - push_eh $P799 +.sub "metachar:sym<.>" :subid("50_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_806 +.annotate "line", 165 + new $P805, 'ExceptionHandler' + set_addr $P805, control_804 + $P805."handle_types"(58) + push_eh $P805 .lex "self", self - .lex "$/", param_800 -.annotate "line", 168 - new $P801, "Undef" - .lex "$past", $P801 - get_hll_global $P802, ["PAST"], "Regex" - find_lex $P803, "$/" - $P804 = $P802."new"("anchor" :named("pasttype"), "eos" :named("subtype"), $P803 :named("node")) - store_lex "$past", $P804 -.annotate "line", 169 - find_lex $P805, "$/" - find_lex $P806, "$past" - $P807 = $P805."!make"($P806) + .lex "$/", param_806 +.annotate "line", 166 + new $P807, "Undef" + .lex "$past", $P807 + get_hll_global $P808, ["PAST"], "Regex" + find_lex $P809, "$/" + $P810 = $P808."new"("charclass" :named("pasttype"), "." :named("subtype"), $P809 :named("node")) + store_lex "$past", $P810 .annotate "line", 167 - .return ($P807) - control_798: + find_lex $P811, "$/" + find_lex $P812, "$past" + $P813 = $P811."!make"($P812) +.annotate "line", 165 + .return ($P813) + control_804: .local pmc exception .get_results (exception) - getattribute $P808, exception, "payload" - .return ($P808) + getattribute $P814, exception, "payload" + .return ($P814) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<$$>" :subid("53_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_812 -.annotate "line", 172 - new $P811, 'ExceptionHandler' - set_addr $P811, control_810 - $P811."handle_types"(58) - push_eh $P811 +.sub "metachar:sym<^>" :subid("51_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_818 +.annotate "line", 170 + new $P817, 'ExceptionHandler' + set_addr $P817, control_816 + $P817."handle_types"(58) + push_eh $P817 .lex "self", self - .lex "$/", param_812 -.annotate "line", 173 - new $P813, "Undef" - .lex "$past", $P813 - get_hll_global $P814, ["PAST"], "Regex" - find_lex $P815, "$/" - $P816 = $P814."new"("anchor" :named("pasttype"), "eol" :named("subtype"), $P815 :named("node")) - store_lex "$past", $P816 -.annotate "line", 174 - find_lex $P817, "$/" - find_lex $P818, "$past" - $P819 = $P817."!make"($P818) + .lex "$/", param_818 +.annotate "line", 171 + new $P819, "Undef" + .lex "$past", $P819 + get_hll_global $P820, ["PAST"], "Regex" + find_lex $P821, "$/" + $P822 = $P820."new"("anchor" :named("pasttype"), "bos" :named("subtype"), $P821 :named("node")) + store_lex "$past", $P822 .annotate "line", 172 - .return ($P819) - control_810: + find_lex $P823, "$/" + find_lex $P824, "$past" + $P825 = $P823."!make"($P824) +.annotate "line", 170 + .return ($P825) + control_816: .local pmc exception .get_results (exception) - getattribute $P820, exception, "payload" - .return ($P820) + getattribute $P826, exception, "payload" + .return ($P826) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<:::>" :subid("54_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_824 -.annotate "line", 177 - new $P823, 'ExceptionHandler' - set_addr $P823, control_822 - $P823."handle_types"(58) - push_eh $P823 +.sub "metachar:sym<^^>" :subid("52_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_830 +.annotate "line", 175 + new $P829, 'ExceptionHandler' + set_addr $P829, control_828 + $P829."handle_types"(58) + push_eh $P829 .lex "self", self - .lex "$/", param_824 -.annotate "line", 178 - new $P825, "Undef" - .lex "$past", $P825 - get_hll_global $P826, ["PAST"], "Regex" - find_lex $P827, "$/" - $P828 = $P826."new"("cut" :named("pasttype"), $P827 :named("node")) - store_lex "$past", $P828 -.annotate "line", 179 - find_lex $P829, "$/" - find_lex $P830, "$past" - $P831 = $P829."!make"($P830) + .lex "$/", param_830 +.annotate "line", 176 + new $P831, "Undef" + .lex "$past", $P831 + get_hll_global $P832, ["PAST"], "Regex" + find_lex $P833, "$/" + $P834 = $P832."new"("anchor" :named("pasttype"), "bol" :named("subtype"), $P833 :named("node")) + store_lex "$past", $P834 .annotate "line", 177 - .return ($P831) - control_822: + find_lex $P835, "$/" + find_lex $P836, "$past" + $P837 = $P835."!make"($P836) +.annotate "line", 175 + .return ($P837) + control_828: .local pmc exception .get_results (exception) - getattribute $P832, exception, "payload" - .return ($P832) + getattribute $P838, exception, "payload" + .return ($P838) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym" :subid("55_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_836 -.annotate "line", 182 - new $P835, 'ExceptionHandler' - set_addr $P835, control_834 - $P835."handle_types"(58) - push_eh $P835 +.sub "metachar:sym<$>" :subid("53_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_842 +.annotate "line", 180 + new $P841, 'ExceptionHandler' + set_addr $P841, control_840 + $P841."handle_types"(58) + push_eh $P841 .lex "self", self - .lex "$/", param_836 -.annotate "line", 183 - new $P837, "Undef" - .lex "$past", $P837 - get_hll_global $P838, ["PAST"], "Regex" - find_lex $P839, "$/" - $P840 = $P838."new"("anchor" :named("pasttype"), "lwb" :named("subtype"), $P839 :named("node")) - store_lex "$past", $P840 -.annotate "line", 184 - find_lex $P841, "$/" - find_lex $P842, "$past" - $P843 = $P841."!make"($P842) + .lex "$/", param_842 +.annotate "line", 181 + new $P843, "Undef" + .lex "$past", $P843 + get_hll_global $P844, ["PAST"], "Regex" + find_lex $P845, "$/" + $P846 = $P844."new"("anchor" :named("pasttype"), "eos" :named("subtype"), $P845 :named("node")) + store_lex "$past", $P846 .annotate "line", 182 - .return ($P843) - control_834: + find_lex $P847, "$/" + find_lex $P848, "$past" + $P849 = $P847."!make"($P848) +.annotate "line", 180 + .return ($P849) + control_840: .local pmc exception .get_results (exception) - getattribute $P844, exception, "payload" - .return ($P844) + getattribute $P850, exception, "payload" + .return ($P850) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym" :subid("56_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_848 -.annotate "line", 187 - new $P847, 'ExceptionHandler' - set_addr $P847, control_846 - $P847."handle_types"(58) - push_eh $P847 +.sub "metachar:sym<$$>" :subid("54_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_854 +.annotate "line", 185 + new $P853, 'ExceptionHandler' + set_addr $P853, control_852 + $P853."handle_types"(58) + push_eh $P853 .lex "self", self - .lex "$/", param_848 -.annotate "line", 188 - new $P849, "Undef" - .lex "$past", $P849 - get_hll_global $P850, ["PAST"], "Regex" - find_lex $P851, "$/" - $P852 = $P850."new"("anchor" :named("pasttype"), "rwb" :named("subtype"), $P851 :named("node")) - store_lex "$past", $P852 -.annotate "line", 189 - find_lex $P853, "$/" - find_lex $P854, "$past" - $P855 = $P853."!make"($P854) + .lex "$/", param_854 +.annotate "line", 186 + new $P855, "Undef" + .lex "$past", $P855 + get_hll_global $P856, ["PAST"], "Regex" + find_lex $P857, "$/" + $P858 = $P856."new"("anchor" :named("pasttype"), "eol" :named("subtype"), $P857 :named("node")) + store_lex "$past", $P858 .annotate "line", 187 - .return ($P855) - control_846: + find_lex $P859, "$/" + find_lex $P860, "$past" + $P861 = $P859."!make"($P860) +.annotate "line", 185 + .return ($P861) + control_852: .local pmc exception .get_results (exception) - getattribute $P856, exception, "payload" - .return ($P856) + getattribute $P862, exception, "payload" + .return ($P862) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym" :subid("57_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_860 -.annotate "line", 192 - new $P859, 'ExceptionHandler' - set_addr $P859, control_858 - $P859."handle_types"(58) - push_eh $P859 +.sub "metachar:sym<:::>" :subid("55_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_866 +.annotate "line", 190 + new $P865, 'ExceptionHandler' + set_addr $P865, control_864 + $P865."handle_types"(58) + push_eh $P865 .lex "self", self - .lex "$/", param_860 -.annotate "line", 193 - find_lex $P861, "$/" - find_lex $P862, "$/" - unless_null $P862, vivify_220 - new $P862, "Hash" - vivify_220: - set $P863, $P862["backslash"] - unless_null $P863, vivify_221 - new $P863, "Undef" - vivify_221: - $P864 = $P863."ast"() - $P865 = $P861."!make"($P864) + .lex "$/", param_866 +.annotate "line", 191 + new $P867, "Undef" + .lex "$past", $P867 + get_hll_global $P868, ["PAST"], "Regex" + find_lex $P869, "$/" + $P870 = $P868."new"("cut" :named("pasttype"), $P869 :named("node")) + store_lex "$past", $P870 .annotate "line", 192 - .return ($P865) - control_858: - .local pmc exception - .get_results (exception) - getattribute $P866, exception, "payload" - .return ($P866) - rethrow exception -.end - - -.namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym" :subid("58_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_870 -.annotate "line", 196 - new $P869, 'ExceptionHandler' - set_addr $P869, control_868 - $P869."handle_types"(58) - push_eh $P869 - .lex "self", self - .lex "$/", param_870 -.annotate "line", 197 find_lex $P871, "$/" - find_lex $P872, "$/" - unless_null $P872, vivify_222 - new $P872, "Hash" - vivify_222: - set $P873, $P872["mod_internal"] - unless_null $P873, vivify_223 - new $P873, "Undef" - vivify_223: - $P874 = $P873."ast"() - $P875 = $P871."!make"($P874) -.annotate "line", 196 - .return ($P875) - control_868: + find_lex $P872, "$past" + $P873 = $P871."!make"($P872) +.annotate "line", 190 + .return ($P873) + control_864: .local pmc exception .get_results (exception) - getattribute $P876, exception, "payload" - .return ($P876) + getattribute $P874, exception, "payload" + .return ($P874) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym" :subid("59_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_880 -.annotate "line", 200 - new $P879, 'ExceptionHandler' - set_addr $P879, control_878 - $P879."handle_types"(58) - push_eh $P879 +.sub "metachar:sym" :subid("56_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_878 +.annotate "line", 195 + new $P877, 'ExceptionHandler' + set_addr $P877, control_876 + $P877."handle_types"(58) + push_eh $P877 .lex "self", self - .lex "$/", param_880 -.annotate "line", 201 + .lex "$/", param_878 +.annotate "line", 196 + new $P879, "Undef" + .lex "$past", $P879 + get_hll_global $P880, ["PAST"], "Regex" find_lex $P881, "$/" - find_lex $P882, "$/" - unless_null $P882, vivify_224 - new $P882, "Hash" - vivify_224: - set $P883, $P882["assertion"] - unless_null $P883, vivify_225 - new $P883, "Undef" - vivify_225: - $P884 = $P883."ast"() - $P885 = $P881."!make"($P884) -.annotate "line", 200 + $P882 = $P880."new"("anchor" :named("pasttype"), "lwb" :named("subtype"), $P881 :named("node")) + store_lex "$past", $P882 +.annotate "line", 197 + find_lex $P883, "$/" + find_lex $P884, "$past" + $P885 = $P883."!make"($P884) +.annotate "line", 195 .return ($P885) - control_878: + control_876: .local pmc exception .get_results (exception) getattribute $P886, exception, "payload" @@ -9113,60 +9087,62 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<~>" :subid("60_1258208097.30665") :method :outer("11_1258208097.30665") +.sub "metachar:sym" :subid("57_1258264434.22101") :method :outer("11_1258264434.22101") .param pmc param_890 -.annotate "line", 204 +.annotate "line", 200 new $P889, 'ExceptionHandler' set_addr $P889, control_888 $P889."handle_types"(58) push_eh $P889 .lex "self", self .lex "$/", param_890 -.annotate "line", 205 - find_lex $P891, "$/" +.annotate "line", 201 + new $P891, "Undef" + .lex "$past", $P891 get_hll_global $P892, ["PAST"], "Regex" -.annotate "line", 206 find_lex $P893, "$/" - unless_null $P893, vivify_226 - new $P893, "Hash" + $P894 = $P892."new"("anchor" :named("pasttype"), "rwb" :named("subtype"), $P893 :named("node")) + store_lex "$past", $P894 +.annotate "line", 202 + find_lex $P895, "$/" + find_lex $P896, "$past" + $P897 = $P895."!make"($P896) +.annotate "line", 200 + .return ($P897) + control_888: + .local pmc exception + .get_results (exception) + getattribute $P898, exception, "payload" + .return ($P898) + rethrow exception +.end + + +.namespace ["Regex";"P6Regex";"Actions"] +.sub "metachar:sym" :subid("58_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_902 +.annotate "line", 205 + new $P901, 'ExceptionHandler' + set_addr $P901, control_900 + $P901."handle_types"(58) + push_eh $P901 + .lex "self", self + .lex "$/", param_902 +.annotate "line", 206 + find_lex $P903, "$/" + find_lex $P904, "$/" + unless_null $P904, vivify_225 + new $P904, "Hash" + vivify_225: + set $P905, $P904["backslash"] + unless_null $P905, vivify_226 + new $P905, "Undef" vivify_226: - set $P894, $P893["EXPR"] - unless_null $P894, vivify_227 - new $P894, "Undef" - vivify_227: - $P895 = $P894."ast"() -.annotate "line", 207 - get_hll_global $P896, ["PAST"], "Regex" -.annotate "line", 208 - find_lex $P897, "$/" - unless_null $P897, vivify_228 - new $P897, "Hash" - vivify_228: - set $P898, $P897["GOAL"] - unless_null $P898, vivify_229 - new $P898, "Undef" - vivify_229: - $P899 = $P898."ast"() -.annotate "line", 209 - get_hll_global $P900, ["PAST"], "Regex" - find_lex $P901, "$/" - unless_null $P901, vivify_230 - new $P901, "Hash" - vivify_230: - set $P902, $P901["GOAL"] - unless_null $P902, vivify_231 - new $P902, "Undef" - vivify_231: - set $S903, $P902 - $P904 = $P900."new"("FAILGOAL", $S903, "subrule" :named("pasttype"), "method" :named("subtype")) - $P905 = $P896."new"($P899, $P904, "alt" :named("pasttype")) -.annotate "line", 207 - $P906 = $P892."new"($P895, $P905, "concat" :named("pasttype")) + $P906 = $P905."ast"() + $P907 = $P903."!make"($P906) .annotate "line", 205 - $P907 = $P891."!make"($P906) -.annotate "line", 204 .return ($P907) - control_888: + control_900: .local pmc exception .get_results (exception) getattribute $P908, exception, "payload" @@ -9176,967 +9152,966 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym<{*}>" :subid("61_1258208097.30665") :method :outer("11_1258208097.30665") +.sub "metachar:sym" :subid("59_1258264434.22101") :method :outer("11_1258264434.22101") .param pmc param_912 -.annotate "line", 217 +.annotate "line", 209 new $P911, 'ExceptionHandler' set_addr $P911, control_910 $P911."handle_types"(58) push_eh $P911 .lex "self", self .lex "$/", param_912 +.annotate "line", 210 + find_lex $P913, "$/" + find_lex $P914, "$/" + unless_null $P914, vivify_227 + new $P914, "Hash" + vivify_227: + set $P915, $P914["mod_internal"] + unless_null $P915, vivify_228 + new $P915, "Undef" + vivify_228: + $P916 = $P915."ast"() + $P917 = $P913."!make"($P916) +.annotate "line", 209 + .return ($P917) + control_910: + .local pmc exception + .get_results (exception) + getattribute $P918, exception, "payload" + .return ($P918) + rethrow exception +.end + + +.namespace ["Regex";"P6Regex";"Actions"] +.sub "metachar:sym" :subid("60_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_922 +.annotate "line", 213 + new $P921, 'ExceptionHandler' + set_addr $P921, control_920 + $P921."handle_types"(58) + push_eh $P921 + .lex "self", self + .lex "$/", param_922 +.annotate "line", 214 + find_lex $P923, "$/" + find_lex $P924, "$/" + unless_null $P924, vivify_229 + new $P924, "Hash" + vivify_229: + set $P925, $P924["assertion"] + unless_null $P925, vivify_230 + new $P925, "Undef" + vivify_230: + $P926 = $P925."ast"() + $P927 = $P923."!make"($P926) +.annotate "line", 213 + .return ($P927) + control_920: + .local pmc exception + .get_results (exception) + getattribute $P928, exception, "payload" + .return ($P928) + rethrow exception +.end + + +.namespace ["Regex";"P6Regex";"Actions"] +.sub "metachar:sym<~>" :subid("61_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_932 +.annotate "line", 217 + new $P931, 'ExceptionHandler' + set_addr $P931, control_930 + $P931."handle_types"(58) + push_eh $P931 + .lex "self", self + .lex "$/", param_932 .annotate "line", 218 - new $P913, "Undef" - .lex "$past", $P913 + find_lex $P933, "$/" + get_hll_global $P934, ["PAST"], "Regex" .annotate "line", 219 - find_lex $P916, "$/" - unless_null $P916, vivify_232 - new $P916, "Hash" + find_lex $P935, "$/" + unless_null $P935, vivify_231 + new $P935, "Hash" + vivify_231: + set $P936, $P935["EXPR"] + unless_null $P936, vivify_232 + new $P936, "Undef" vivify_232: - set $P917, $P916["key"] - unless_null $P917, vivify_233 - new $P917, "Undef" + $P937 = $P936."ast"() +.annotate "line", 220 + get_hll_global $P938, ["PAST"], "Regex" +.annotate "line", 221 + find_lex $P939, "$/" + unless_null $P939, vivify_233 + new $P939, "Hash" vivify_233: - if $P917, if_915 - new $P925, "Integer" - assign $P925, 0 - set $P914, $P925 - goto if_915_end - if_915: - get_hll_global $P918, ["PAST"], "Regex" - find_lex $P919, "$/" - unless_null $P919, vivify_234 - new $P919, "Hash" + set $P940, $P939["GOAL"] + unless_null $P940, vivify_234 + new $P940, "Undef" vivify_234: - set $P920, $P919["key"] - unless_null $P920, vivify_235 - new $P920, "ResizablePMCArray" + $P941 = $P940."ast"() +.annotate "line", 222 + get_hll_global $P942, ["PAST"], "Regex" + find_lex $P943, "$/" + unless_null $P943, vivify_235 + new $P943, "Hash" vivify_235: - set $P921, $P920[0] - unless_null $P921, vivify_236 - new $P921, "Undef" + set $P944, $P943["GOAL"] + unless_null $P944, vivify_236 + new $P944, "Undef" vivify_236: - set $S922, $P921 - find_lex $P923, "$/" - $P924 = $P918."new"($S922, "reduce" :named("pasttype"), $P923 :named("node")) - set $P914, $P924 - if_915_end: - store_lex "$past", $P914 -.annotate "line", 221 - find_lex $P926, "$/" - find_lex $P927, "$past" - $P928 = $P926."!make"($P927) + set $S945, $P944 + $P946 = $P942."new"("FAILGOAL", $S945, "subrule" :named("pasttype"), "method" :named("subtype")) + $P947 = $P938."new"($P941, $P946, "alt" :named("pasttype")) +.annotate "line", 220 + $P948 = $P934."new"($P937, $P947, "concat" :named("pasttype")) +.annotate "line", 218 + $P949 = $P933."!make"($P948) .annotate "line", 217 - .return ($P928) - control_910: + .return ($P949) + control_930: .local pmc exception .get_results (exception) - getattribute $P929, exception, "payload" - .return ($P929) + getattribute $P950, exception, "payload" + .return ($P950) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym" :subid("62_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_933 -.annotate "line", 224 - new $P932, 'ExceptionHandler' - set_addr $P932, control_931 - $P932."handle_types"(58) - push_eh $P932 +.sub "metachar:sym<{*}>" :subid("62_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_954 +.annotate "line", 230 + new $P953, 'ExceptionHandler' + set_addr $P953, control_952 + $P953."handle_types"(58) + push_eh $P953 .lex "self", self - .lex "$/", param_933 -.annotate "line", 225 - new $P934, "Undef" - .lex "$past", $P934 -.annotate "line", 226 - new $P935, "Undef" - .lex "$name", $P935 -.annotate "line", 224 - find_lex $P936, "$past" -.annotate "line", 226 - find_lex $P939, "$/" - unless_null $P939, vivify_237 - new $P939, "Hash" + .lex "$/", param_954 +.annotate "line", 231 + new $P955, "Undef" + .lex "$past", $P955 +.annotate "line", 232 + find_lex $P958, "$/" + unless_null $P958, vivify_237 + new $P958, "Hash" vivify_237: - set $P940, $P939["pos"] - unless_null $P940, vivify_238 - new $P940, "Undef" + set $P959, $P958["key"] + unless_null $P959, vivify_238 + new $P959, "Undef" vivify_238: - if $P940, if_938 - find_lex $P944, "$/" - unless_null $P944, vivify_239 - new $P944, "Hash" + if $P959, if_957 + new $P967, "Integer" + assign $P967, 0 + set $P956, $P967 + goto if_957_end + if_957: + get_hll_global $P960, ["PAST"], "Regex" + find_lex $P961, "$/" + unless_null $P961, vivify_239 + new $P961, "Hash" vivify_239: - set $P945, $P944["name"] - unless_null $P945, vivify_240 - new $P945, "Undef" + set $P962, $P961["key"] + unless_null $P962, vivify_240 + new $P962, "ResizablePMCArray" vivify_240: - set $S946, $P945 - new $P937, 'String' - set $P937, $S946 - goto if_938_end - if_938: - find_lex $P941, "$/" - unless_null $P941, vivify_241 - new $P941, "Hash" + set $P963, $P962[0] + unless_null $P963, vivify_241 + new $P963, "Undef" vivify_241: - set $P942, $P941["pos"] - unless_null $P942, vivify_242 - new $P942, "Undef" - vivify_242: - set $N943, $P942 - new $P937, 'Float' - set $P937, $N943 - if_938_end: - store_lex "$name", $P937 -.annotate "line", 227 - find_lex $P948, "$/" - unless_null $P948, vivify_243 - new $P948, "Hash" - vivify_243: - set $P949, $P948["quantified_atom"] - unless_null $P949, vivify_244 - new $P949, "Undef" - vivify_244: - if $P949, if_947 -.annotate "line", 238 - get_hll_global $P978, ["PAST"], "Regex" - find_lex $P979, "$name" - find_lex $P980, "$/" - $P981 = $P978."new"("!BACKREF", $P979, "subrule" :named("pasttype"), "method" :named("subtype"), $P980 :named("node")) - store_lex "$past", $P981 -.annotate "line", 237 - goto if_947_end - if_947: -.annotate "line", 228 - find_lex $P950, "$/" - unless_null $P950, vivify_245 - new $P950, "Hash" - vivify_245: - set $P951, $P950["quantified_atom"] - unless_null $P951, vivify_246 - new $P951, "ResizablePMCArray" - vivify_246: - set $P952, $P951[0] - unless_null $P952, vivify_247 - new $P952, "Undef" - vivify_247: - $P953 = $P952."ast"() - store_lex "$past", $P953 -.annotate "line", 229 - find_lex $P957, "$past" - $S958 = $P957."pasttype"() - iseq $I959, $S958, "quant" - if $I959, if_956 - new $P955, 'Integer' - set $P955, $I959 - goto if_956_end - if_956: - find_lex $P960, "$past" - unless_null $P960, vivify_248 - new $P960, "ResizablePMCArray" - vivify_248: - set $P961, $P960[0] - unless_null $P961, vivify_249 - new $P961, "Undef" - vivify_249: - $S962 = $P961."pasttype"() - iseq $I963, $S962, "subrule" - new $P955, 'Integer' - set $P955, $I963 - if_956_end: - if $P955, if_954 -.annotate "line", 232 - find_lex $P968, "$past" - $S969 = $P968."pasttype"() - iseq $I970, $S969, "subrule" - if $I970, if_967 + set $S964, $P963 + find_lex $P965, "$/" + $P966 = $P960."new"($S964, "reduce" :named("pasttype"), $P965 :named("node")) + set $P956, $P966 + if_957_end: + store_lex "$past", $P956 .annotate "line", 234 - get_hll_global $P973, ["PAST"], "Regex" - find_lex $P974, "$past" - find_lex $P975, "$name" - find_lex $P976, "$/" - $P977 = $P973."new"($P974, $P975 :named("name"), "subcapture" :named("pasttype"), $P976 :named("node")) - store_lex "$past", $P977 -.annotate "line", 233 - goto if_967_end - if_967: -.annotate "line", 232 - find_lex $P971, "$past" - find_lex $P972, "$name" - "subrule_alias"($P971, $P972) - if_967_end: - goto if_954_end - if_954: + find_lex $P968, "$/" + find_lex $P969, "$past" + $P970 = $P968."!make"($P969) .annotate "line", 230 - find_lex $P964, "$past" - unless_null $P964, vivify_250 - new $P964, "ResizablePMCArray" - vivify_250: - set $P965, $P964[0] - unless_null $P965, vivify_251 - new $P965, "Undef" - vivify_251: - find_lex $P966, "$name" - "subrule_alias"($P965, $P966) - if_954_end: - if_947_end: -.annotate "line", 241 - find_lex $P982, "$/" - find_lex $P983, "$past" - $P984 = $P982."!make"($P983) -.annotate "line", 224 - .return ($P984) - control_931: + .return ($P970) + control_952: .local pmc exception .get_results (exception) - getattribute $P985, exception, "payload" - .return ($P985) + getattribute $P971, exception, "payload" + .return ($P971) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "metachar:sym" :subid("63_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_989 -.annotate "line", 244 - new $P988, 'ExceptionHandler' - set_addr $P988, control_987 - $P988."handle_types"(58) - push_eh $P988 +.sub "metachar:sym" :subid("63_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_975 +.annotate "line", 237 + new $P974, 'ExceptionHandler' + set_addr $P974, control_973 + $P974."handle_types"(58) + push_eh $P974 .lex "self", self - .lex "$/", param_989 -.annotate "line", 245 + .lex "$/", param_975 +.annotate "line", 238 + new $P976, "Undef" + .lex "$past", $P976 +.annotate "line", 239 + new $P977, "Undef" + .lex "$name", $P977 +.annotate "line", 237 + find_lex $P978, "$past" +.annotate "line", 239 + find_lex $P981, "$/" + unless_null $P981, vivify_242 + new $P981, "Hash" + vivify_242: + set $P982, $P981["pos"] + unless_null $P982, vivify_243 + new $P982, "Undef" + vivify_243: + if $P982, if_980 + find_lex $P986, "$/" + unless_null $P986, vivify_244 + new $P986, "Hash" + vivify_244: + set $P987, $P986["name"] + unless_null $P987, vivify_245 + new $P987, "Undef" + vivify_245: + set $S988, $P987 + new $P979, 'String' + set $P979, $S988 + goto if_980_end + if_980: + find_lex $P983, "$/" + unless_null $P983, vivify_246 + new $P983, "Hash" + vivify_246: + set $P984, $P983["pos"] + unless_null $P984, vivify_247 + new $P984, "Undef" + vivify_247: + set $N985, $P984 + new $P979, 'Float' + set $P979, $N985 + if_980_end: + store_lex "$name", $P979 +.annotate "line", 240 find_lex $P990, "$/" - get_hll_global $P991, ["PAST"], "Regex" -.annotate "line", 246 - get_hll_global $P992, ["PAST"], "Op" - find_lex $P993, "$/" - unless_null $P993, vivify_252 - new $P993, "Hash" - vivify_252: - set $P994, $P993["pir"] - unless_null $P994, vivify_253 + unless_null $P990, vivify_248 + new $P990, "Hash" + vivify_248: + set $P991, $P990["quantified_atom"] + unless_null $P991, vivify_249 + new $P991, "Undef" + vivify_249: + if $P991, if_989 +.annotate "line", 251 + get_hll_global $P1020, ["PAST"], "Regex" + find_lex $P1021, "$name" + find_lex $P1022, "$/" + $P1023 = $P1020."new"("!BACKREF", $P1021, "subrule" :named("pasttype"), "method" :named("subtype"), $P1022 :named("node")) + store_lex "$past", $P1023 +.annotate "line", 250 + goto if_989_end + if_989: +.annotate "line", 241 + find_lex $P992, "$/" + unless_null $P992, vivify_250 + new $P992, "Hash" + vivify_250: + set $P993, $P992["quantified_atom"] + unless_null $P993, vivify_251 + new $P993, "ResizablePMCArray" + vivify_251: + set $P994, $P993[0] + unless_null $P994, vivify_252 new $P994, "Undef" + vivify_252: + $P995 = $P994."ast"() + store_lex "$past", $P995 +.annotate "line", 242 + find_lex $P999, "$past" + $S1000 = $P999."pasttype"() + iseq $I1001, $S1000, "quant" + if $I1001, if_998 + new $P997, 'Integer' + set $P997, $I1001 + goto if_998_end + if_998: + find_lex $P1002, "$past" + unless_null $P1002, vivify_253 + new $P1002, "ResizablePMCArray" vivify_253: - set $S995, $P994 - $P996 = $P992."new"($S995 :named("inline"), "inline" :named("pasttype")) - find_lex $P997, "$/" - $P998 = $P991."new"($P996, "pastnode" :named("pasttype"), $P997 :named("node")) -.annotate "line", 245 - $P999 = $P990."!make"($P998) -.annotate "line", 244 - .return ($P999) - control_987: - .local pmc exception - .get_results (exception) - getattribute $P1000, exception, "payload" - .return ($P1000) - rethrow exception -.end - - -.namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("64_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1004 -.annotate "line", 252 - new $P1003, 'ExceptionHandler' - set_addr $P1003, control_1002 - $P1003."handle_types"(58) - push_eh $P1003 - .lex "self", self - .lex "$/", param_1004 -.annotate "line", 253 - new $P1005, "Undef" - .lex "$subtype", $P1005 -.annotate "line", 254 - new $P1006, "Undef" - .lex "$past", $P1006 -.annotate "line", 253 - find_lex $P1009, "$/" - unless_null $P1009, vivify_254 - new $P1009, "Hash" + set $P1003, $P1002[0] + unless_null $P1003, vivify_254 + new $P1003, "Undef" vivify_254: - set $P1010, $P1009["sym"] - unless_null $P1010, vivify_255 - new $P1010, "Undef" + $S1004 = $P1003."pasttype"() + iseq $I1005, $S1004, "subrule" + new $P997, 'Integer' + set $P997, $I1005 + if_998_end: + if $P997, if_996 +.annotate "line", 245 + find_lex $P1010, "$past" + $S1011 = $P1010."pasttype"() + iseq $I1012, $S1011, "subrule" + if $I1012, if_1009 +.annotate "line", 247 + get_hll_global $P1015, ["PAST"], "Regex" + find_lex $P1016, "$past" + find_lex $P1017, "$name" + find_lex $P1018, "$/" + $P1019 = $P1015."new"($P1016, $P1017 :named("name"), "subcapture" :named("pasttype"), $P1018 :named("node")) + store_lex "$past", $P1019 +.annotate "line", 246 + goto if_1009_end + if_1009: +.annotate "line", 245 + find_lex $P1013, "$past" + find_lex $P1014, "$name" + "subrule_alias"($P1013, $P1014) + if_1009_end: + goto if_996_end + if_996: +.annotate "line", 243 + find_lex $P1006, "$past" + unless_null $P1006, vivify_255 + new $P1006, "ResizablePMCArray" vivify_255: - set $S1011, $P1010 - iseq $I1012, $S1011, "n" - if $I1012, if_1008 - find_lex $P1014, "$/" - unless_null $P1014, vivify_256 - new $P1014, "Hash" + set $P1007, $P1006[0] + unless_null $P1007, vivify_256 + new $P1007, "Undef" vivify_256: - set $P1015, $P1014["sym"] - unless_null $P1015, vivify_257 - new $P1015, "Undef" - vivify_257: - set $S1016, $P1015 - new $P1007, 'String' - set $P1007, $S1016 - goto if_1008_end - if_1008: - new $P1013, "String" - assign $P1013, "nl" - set $P1007, $P1013 - if_1008_end: - store_lex "$subtype", $P1007 + find_lex $P1008, "$name" + "subrule_alias"($P1007, $P1008) + if_996_end: + if_989_end: .annotate "line", 254 - get_hll_global $P1017, ["PAST"], "Regex" - find_lex $P1018, "$subtype" - find_lex $P1019, "$/" - $P1020 = $P1017."new"("charclass" :named("pasttype"), $P1018 :named("subtype"), $P1019 :named("node")) - store_lex "$past", $P1020 -.annotate "line", 255 - find_lex $P1021, "$/" - find_lex $P1022, "$past" - $P1023 = $P1021."!make"($P1022) -.annotate "line", 252 - .return ($P1023) - control_1002: + find_lex $P1024, "$/" + find_lex $P1025, "$past" + $P1026 = $P1024."!make"($P1025) +.annotate "line", 237 + .return ($P1026) + control_973: .local pmc exception .get_results (exception) - getattribute $P1024, exception, "payload" - .return ($P1024) + getattribute $P1027, exception, "payload" + .return ($P1027) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("65_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1028 -.annotate "line", 258 - new $P1027, 'ExceptionHandler' - set_addr $P1027, control_1026 - $P1027."handle_types"(58) - push_eh $P1027 +.sub "metachar:sym" :subid("64_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1031 +.annotate "line", 257 + new $P1030, 'ExceptionHandler' + set_addr $P1030, control_1029 + $P1030."handle_types"(58) + push_eh $P1030 .lex "self", self - .lex "$/", param_1028 + .lex "$/", param_1031 +.annotate "line", 258 + find_lex $P1032, "$/" + get_hll_global $P1033, ["PAST"], "Regex" .annotate "line", 259 - new $P1029, "Undef" - .lex "$past", $P1029 - get_hll_global $P1030, ["PAST"], "Regex" -.annotate "line", 260 - find_lex $P1031, "$/" - unless_null $P1031, vivify_258 - new $P1031, "Hash" - vivify_258: - set $P1032, $P1031["sym"] - unless_null $P1032, vivify_259 - new $P1032, "Undef" - vivify_259: - set $S1033, $P1032 - iseq $I1034, $S1033, "B" + get_hll_global $P1034, ["PAST"], "Op" find_lex $P1035, "$/" - $P1036 = $P1030."new"("\b", "enumcharlist" :named("pasttype"), $I1034 :named("negate"), $P1035 :named("node")) -.annotate "line", 259 - store_lex "$past", $P1036 -.annotate "line", 261 - find_lex $P1037, "$/" - find_lex $P1038, "$past" - $P1039 = $P1037."!make"($P1038) + unless_null $P1035, vivify_257 + new $P1035, "Hash" + vivify_257: + set $P1036, $P1035["pir"] + unless_null $P1036, vivify_258 + new $P1036, "Undef" + vivify_258: + set $S1037, $P1036 + $P1038 = $P1034."new"($S1037 :named("inline"), "inline" :named("pasttype")) + find_lex $P1039, "$/" + $P1040 = $P1033."new"($P1038, "pastnode" :named("pasttype"), $P1039 :named("node")) .annotate "line", 258 - .return ($P1039) - control_1026: + $P1041 = $P1032."!make"($P1040) +.annotate "line", 257 + .return ($P1041) + control_1029: .local pmc exception .get_results (exception) - getattribute $P1040, exception, "payload" - .return ($P1040) + getattribute $P1042, exception, "payload" + .return ($P1042) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("66_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1044 -.annotate "line", 264 - new $P1043, 'ExceptionHandler' - set_addr $P1043, control_1042 - $P1043."handle_types"(58) - push_eh $P1043 - .lex "self", self - .lex "$/", param_1044 +.sub "backslash:sym" :subid("65_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1046 .annotate "line", 265 - new $P1045, "Undef" - .lex "$past", $P1045 - get_hll_global $P1046, ["PAST"], "Regex" + new $P1045, 'ExceptionHandler' + set_addr $P1045, control_1044 + $P1045."handle_types"(58) + push_eh $P1045 + .lex "self", self + .lex "$/", param_1046 .annotate "line", 266 - find_lex $P1047, "$/" - unless_null $P1047, vivify_260 - new $P1047, "Hash" - vivify_260: - set $P1048, $P1047["sym"] - unless_null $P1048, vivify_261 + new $P1047, "Undef" + .lex "$subtype", $P1047 +.annotate "line", 267 new $P1048, "Undef" - vivify_261: - set $S1049, $P1048 - iseq $I1050, $S1049, "E" + .lex "$past", $P1048 +.annotate "line", 266 find_lex $P1051, "$/" - $P1052 = $P1046."new"("\\e", "enumcharlist" :named("pasttype"), $I1050 :named("negate"), $P1051 :named("node")) -.annotate "line", 265 - store_lex "$past", $P1052 + unless_null $P1051, vivify_259 + new $P1051, "Hash" + vivify_259: + set $P1052, $P1051["sym"] + unless_null $P1052, vivify_260 + new $P1052, "Undef" + vivify_260: + set $S1053, $P1052 + iseq $I1054, $S1053, "n" + if $I1054, if_1050 + find_lex $P1056, "$/" + unless_null $P1056, vivify_261 + new $P1056, "Hash" + vivify_261: + set $P1057, $P1056["sym"] + unless_null $P1057, vivify_262 + new $P1057, "Undef" + vivify_262: + set $S1058, $P1057 + new $P1049, 'String' + set $P1049, $S1058 + goto if_1050_end + if_1050: + new $P1055, "String" + assign $P1055, "nl" + set $P1049, $P1055 + if_1050_end: + store_lex "$subtype", $P1049 .annotate "line", 267 - find_lex $P1053, "$/" - find_lex $P1054, "$past" - $P1055 = $P1053."!make"($P1054) -.annotate "line", 264 - .return ($P1055) - control_1042: + get_hll_global $P1059, ["PAST"], "Regex" + find_lex $P1060, "$subtype" + find_lex $P1061, "$/" + $P1062 = $P1059."new"("charclass" :named("pasttype"), $P1060 :named("subtype"), $P1061 :named("node")) + store_lex "$past", $P1062 +.annotate "line", 268 + find_lex $P1063, "$/" + find_lex $P1064, "$past" + $P1065 = $P1063."!make"($P1064) +.annotate "line", 265 + .return ($P1065) + control_1044: .local pmc exception .get_results (exception) - getattribute $P1056, exception, "payload" - .return ($P1056) + getattribute $P1066, exception, "payload" + .return ($P1066) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("67_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1060 -.annotate "line", 270 - new $P1059, 'ExceptionHandler' - set_addr $P1059, control_1058 - $P1059."handle_types"(58) - push_eh $P1059 - .lex "self", self - .lex "$/", param_1060 +.sub "backslash:sym" :subid("66_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1070 .annotate "line", 271 - new $P1061, "Undef" - .lex "$past", $P1061 - get_hll_global $P1062, ["PAST"], "Regex" + new $P1069, 'ExceptionHandler' + set_addr $P1069, control_1068 + $P1069."handle_types"(58) + push_eh $P1069 + .lex "self", self + .lex "$/", param_1070 .annotate "line", 272 - find_lex $P1063, "$/" - unless_null $P1063, vivify_262 - new $P1063, "Hash" - vivify_262: - set $P1064, $P1063["sym"] - unless_null $P1064, vivify_263 - new $P1064, "Undef" + new $P1071, "Undef" + .lex "$past", $P1071 + get_hll_global $P1072, ["PAST"], "Regex" +.annotate "line", 273 + find_lex $P1073, "$/" + unless_null $P1073, vivify_263 + new $P1073, "Hash" vivify_263: - set $S1065, $P1064 - iseq $I1066, $S1065, "F" - find_lex $P1067, "$/" - $P1068 = $P1062."new"("\\f", "enumcharlist" :named("pasttype"), $I1066 :named("negate"), $P1067 :named("node")) + set $P1074, $P1073["sym"] + unless_null $P1074, vivify_264 + new $P1074, "Undef" + vivify_264: + set $S1075, $P1074 + iseq $I1076, $S1075, "B" + find_lex $P1077, "$/" + $P1078 = $P1072."new"("\b", "enumcharlist" :named("pasttype"), $I1076 :named("negate"), $P1077 :named("node")) +.annotate "line", 272 + store_lex "$past", $P1078 +.annotate "line", 274 + find_lex $P1079, "$/" + find_lex $P1080, "$past" + $P1081 = $P1079."!make"($P1080) .annotate "line", 271 - store_lex "$past", $P1068 -.annotate "line", 273 - find_lex $P1069, "$/" - find_lex $P1070, "$past" - $P1071 = $P1069."!make"($P1070) -.annotate "line", 270 - .return ($P1071) - control_1058: + .return ($P1081) + control_1068: .local pmc exception .get_results (exception) - getattribute $P1072, exception, "payload" - .return ($P1072) + getattribute $P1082, exception, "payload" + .return ($P1082) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("68_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1076 -.annotate "line", 276 - new $P1075, 'ExceptionHandler' - set_addr $P1075, control_1074 - $P1075."handle_types"(58) - push_eh $P1075 - .lex "self", self - .lex "$/", param_1076 +.sub "backslash:sym" :subid("67_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1086 .annotate "line", 277 - new $P1077, "Undef" - .lex "$past", $P1077 - get_hll_global $P1078, ["PAST"], "Regex" + new $P1085, 'ExceptionHandler' + set_addr $P1085, control_1084 + $P1085."handle_types"(58) + push_eh $P1085 + .lex "self", self + .lex "$/", param_1086 .annotate "line", 278 - find_lex $P1079, "$/" - unless_null $P1079, vivify_264 - new $P1079, "Hash" - vivify_264: - set $P1080, $P1079["sym"] - unless_null $P1080, vivify_265 - new $P1080, "Undef" + new $P1087, "Undef" + .lex "$past", $P1087 + get_hll_global $P1088, ["PAST"], "Regex" +.annotate "line", 279 + find_lex $P1089, "$/" + unless_null $P1089, vivify_265 + new $P1089, "Hash" vivify_265: - set $S1081, $P1080 - iseq $I1082, $S1081, "H" - find_lex $P1083, "$/" - $P1084 = $P1078."new"(unicode:"\t \x{a0}\u1680\u180e\u2000\u2001\u2002\u2003\u2004\u2005\u2006\u2007\u2008\u2009\u200a\u202f\u205f\u3000", "enumcharlist" :named("pasttype"), $I1082 :named("negate"), $P1083 :named("node")) + set $P1090, $P1089["sym"] + unless_null $P1090, vivify_266 + new $P1090, "Undef" + vivify_266: + set $S1091, $P1090 + iseq $I1092, $S1091, "E" + find_lex $P1093, "$/" + $P1094 = $P1088."new"("\\e", "enumcharlist" :named("pasttype"), $I1092 :named("negate"), $P1093 :named("node")) +.annotate "line", 278 + store_lex "$past", $P1094 +.annotate "line", 280 + find_lex $P1095, "$/" + find_lex $P1096, "$past" + $P1097 = $P1095."!make"($P1096) .annotate "line", 277 - store_lex "$past", $P1084 -.annotate "line", 279 - find_lex $P1085, "$/" - find_lex $P1086, "$past" - $P1087 = $P1085."!make"($P1086) -.annotate "line", 276 - .return ($P1087) - control_1074: + .return ($P1097) + control_1084: .local pmc exception .get_results (exception) - getattribute $P1088, exception, "payload" - .return ($P1088) + getattribute $P1098, exception, "payload" + .return ($P1098) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("69_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1092 -.annotate "line", 282 - new $P1091, 'ExceptionHandler' - set_addr $P1091, control_1090 - $P1091."handle_types"(58) - push_eh $P1091 - .lex "self", self - .lex "$/", param_1092 +.sub "backslash:sym" :subid("68_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1102 .annotate "line", 283 - new $P1093, "Undef" - .lex "$past", $P1093 - get_hll_global $P1094, ["PAST"], "Regex" + new $P1101, 'ExceptionHandler' + set_addr $P1101, control_1100 + $P1101."handle_types"(58) + push_eh $P1101 + .lex "self", self + .lex "$/", param_1102 .annotate "line", 284 - find_lex $P1095, "$/" - unless_null $P1095, vivify_266 - new $P1095, "Hash" - vivify_266: - set $P1096, $P1095["sym"] - unless_null $P1096, vivify_267 - new $P1096, "Undef" + new $P1103, "Undef" + .lex "$past", $P1103 + get_hll_global $P1104, ["PAST"], "Regex" +.annotate "line", 285 + find_lex $P1105, "$/" + unless_null $P1105, vivify_267 + new $P1105, "Hash" vivify_267: - set $S1097, $P1096 - iseq $I1098, $S1097, "R" - find_lex $P1099, "$/" - $P1100 = $P1094."new"("\r", "enumcharlist" :named("pasttype"), $I1098 :named("negate"), $P1099 :named("node")) + set $P1106, $P1105["sym"] + unless_null $P1106, vivify_268 + new $P1106, "Undef" + vivify_268: + set $S1107, $P1106 + iseq $I1108, $S1107, "F" + find_lex $P1109, "$/" + $P1110 = $P1104."new"("\\f", "enumcharlist" :named("pasttype"), $I1108 :named("negate"), $P1109 :named("node")) +.annotate "line", 284 + store_lex "$past", $P1110 +.annotate "line", 286 + find_lex $P1111, "$/" + find_lex $P1112, "$past" + $P1113 = $P1111."!make"($P1112) .annotate "line", 283 - store_lex "$past", $P1100 -.annotate "line", 285 - find_lex $P1101, "$/" - find_lex $P1102, "$past" - $P1103 = $P1101."!make"($P1102) -.annotate "line", 282 - .return ($P1103) - control_1090: + .return ($P1113) + control_1100: .local pmc exception .get_results (exception) - getattribute $P1104, exception, "payload" - .return ($P1104) + getattribute $P1114, exception, "payload" + .return ($P1114) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("70_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1108 -.annotate "line", 288 - new $P1107, 'ExceptionHandler' - set_addr $P1107, control_1106 - $P1107."handle_types"(58) - push_eh $P1107 - .lex "self", self - .lex "$/", param_1108 +.sub "backslash:sym" :subid("69_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1118 .annotate "line", 289 - new $P1109, "Undef" - .lex "$past", $P1109 - get_hll_global $P1110, ["PAST"], "Regex" + new $P1117, 'ExceptionHandler' + set_addr $P1117, control_1116 + $P1117."handle_types"(58) + push_eh $P1117 + .lex "self", self + .lex "$/", param_1118 .annotate "line", 290 - find_lex $P1111, "$/" - unless_null $P1111, vivify_268 - new $P1111, "Hash" - vivify_268: - set $P1112, $P1111["sym"] - unless_null $P1112, vivify_269 - new $P1112, "Undef" + new $P1119, "Undef" + .lex "$past", $P1119 + get_hll_global $P1120, ["PAST"], "Regex" +.annotate "line", 291 + find_lex $P1121, "$/" + unless_null $P1121, vivify_269 + new $P1121, "Hash" vivify_269: - set $S1113, $P1112 - iseq $I1114, $S1113, "T" - find_lex $P1115, "$/" - $P1116 = $P1110."new"("\t", "enumcharlist" :named("pasttype"), $I1114 :named("negate"), $P1115 :named("node")) + set $P1122, $P1121["sym"] + unless_null $P1122, vivify_270 + new $P1122, "Undef" + vivify_270: + set $S1123, $P1122 + iseq $I1124, $S1123, "H" + find_lex $P1125, "$/" + $P1126 = $P1120."new"(unicode:"\t \x{a0}\u1680\u180e\u2000\u2001\u2002\u2003\u2004\u2005\u2006\u2007\u2008\u2009\u200a\u202f\u205f\u3000", "enumcharlist" :named("pasttype"), $I1124 :named("negate"), $P1125 :named("node")) +.annotate "line", 290 + store_lex "$past", $P1126 +.annotate "line", 292 + find_lex $P1127, "$/" + find_lex $P1128, "$past" + $P1129 = $P1127."!make"($P1128) .annotate "line", 289 - store_lex "$past", $P1116 -.annotate "line", 291 - find_lex $P1117, "$/" - find_lex $P1118, "$past" - $P1119 = $P1117."!make"($P1118) -.annotate "line", 288 - .return ($P1119) - control_1106: + .return ($P1129) + control_1116: .local pmc exception .get_results (exception) - getattribute $P1120, exception, "payload" - .return ($P1120) + getattribute $P1130, exception, "payload" + .return ($P1130) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("71_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1124 -.annotate "line", 294 - new $P1123, 'ExceptionHandler' - set_addr $P1123, control_1122 - $P1123."handle_types"(58) - push_eh $P1123 - .lex "self", self - .lex "$/", param_1124 +.sub "backslash:sym" :subid("70_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1134 .annotate "line", 295 - new $P1125, "Undef" - .lex "$past", $P1125 - get_hll_global $P1126, ["PAST"], "Regex" + new $P1133, 'ExceptionHandler' + set_addr $P1133, control_1132 + $P1133."handle_types"(58) + push_eh $P1133 + .lex "self", self + .lex "$/", param_1134 +.annotate "line", 296 + new $P1135, "Undef" + .lex "$past", $P1135 + get_hll_global $P1136, ["PAST"], "Regex" .annotate "line", 297 - find_lex $P1127, "$/" - unless_null $P1127, vivify_270 - new $P1127, "Hash" - vivify_270: - set $P1128, $P1127["sym"] - unless_null $P1128, vivify_271 - new $P1128, "Undef" + find_lex $P1137, "$/" + unless_null $P1137, vivify_271 + new $P1137, "Hash" vivify_271: - set $S1129, $P1128 - iseq $I1130, $S1129, "V" - find_lex $P1131, "$/" - $P1132 = $P1126."new"(unicode:"\n\x{b}\f\r\x{85}\u2028\u2029", "enumcharlist" :named("pasttype"), $I1130 :named("negate"), $P1131 :named("node")) -.annotate "line", 295 - store_lex "$past", $P1132 + set $P1138, $P1137["sym"] + unless_null $P1138, vivify_272 + new $P1138, "Undef" + vivify_272: + set $S1139, $P1138 + iseq $I1140, $S1139, "R" + find_lex $P1141, "$/" + $P1142 = $P1136."new"("\r", "enumcharlist" :named("pasttype"), $I1140 :named("negate"), $P1141 :named("node")) +.annotate "line", 296 + store_lex "$past", $P1142 .annotate "line", 298 - find_lex $P1133, "$/" - find_lex $P1134, "$past" - $P1135 = $P1133."!make"($P1134) -.annotate "line", 294 - .return ($P1135) - control_1122: + find_lex $P1143, "$/" + find_lex $P1144, "$past" + $P1145 = $P1143."!make"($P1144) +.annotate "line", 295 + .return ($P1145) + control_1132: .local pmc exception .get_results (exception) - getattribute $P1136, exception, "payload" - .return ($P1136) + getattribute $P1146, exception, "payload" + .return ($P1146) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("72_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1140 +.sub "backslash:sym" :subid("71_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1150 .annotate "line", 301 - new $P1139, 'ExceptionHandler' - set_addr $P1139, control_1138 - $P1139."handle_types"(58) - push_eh $P1139 + new $P1149, 'ExceptionHandler' + set_addr $P1149, control_1148 + $P1149."handle_types"(58) + push_eh $P1149 .lex "self", self - .lex "$/", param_1140 + .lex "$/", param_1150 .annotate "line", 302 - new $P1141, "Undef" - .lex "$octlit", $P1141 + new $P1151, "Undef" + .lex "$past", $P1151 + get_hll_global $P1152, ["PAST"], "Regex" .annotate "line", 303 - get_hll_global $P1142, ["HLL";"Actions"], "ints_to_string" - find_lex $P1145, "$/" - unless_null $P1145, vivify_272 - new $P1145, "Hash" - vivify_272: - set $P1146, $P1145["octint"] - unless_null $P1146, vivify_273 - new $P1146, "Undef" - vivify_273: - unless $P1146, unless_1144 - set $P1143, $P1146 - goto unless_1144_end - unless_1144: - find_lex $P1147, "$/" - unless_null $P1147, vivify_274 - new $P1147, "Hash" - vivify_274: - set $P1148, $P1147["octints"] - unless_null $P1148, vivify_275 - new $P1148, "Hash" - vivify_275: - set $P1149, $P1148["octint"] - unless_null $P1149, vivify_276 - new $P1149, "Undef" - vivify_276: - set $P1143, $P1149 - unless_1144_end: - $P1150 = $P1142($P1143) - store_lex "$octlit", $P1150 -.annotate "line", 304 - find_lex $P1151, "$/" - find_lex $P1154, "$/" - unless_null $P1154, vivify_277 - new $P1154, "Hash" - vivify_277: - set $P1155, $P1154["sym"] - unless_null $P1155, vivify_278 - new $P1155, "Undef" - vivify_278: - set $S1156, $P1155 - iseq $I1157, $S1156, "O" - if $I1157, if_1153 -.annotate "line", 307 - get_hll_global $P1162, ["PAST"], "Regex" - find_lex $P1163, "$octlit" - find_lex $P1164, "$/" - $P1165 = $P1162."new"($P1163, "literal" :named("pasttype"), $P1164 :named("node")) - set $P1152, $P1165 + find_lex $P1153, "$/" + unless_null $P1153, vivify_273 + new $P1153, "Hash" + vivify_273: + set $P1154, $P1153["sym"] + unless_null $P1154, vivify_274 + new $P1154, "Undef" + vivify_274: + set $S1155, $P1154 + iseq $I1156, $S1155, "T" + find_lex $P1157, "$/" + $P1158 = $P1152."new"("\t", "enumcharlist" :named("pasttype"), $I1156 :named("negate"), $P1157 :named("node")) +.annotate "line", 302 + store_lex "$past", $P1158 .annotate "line", 304 - goto if_1153_end - if_1153: -.annotate "line", 305 - get_hll_global $P1158, ["PAST"], "Regex" - find_lex $P1159, "$octlit" - find_lex $P1160, "$/" - $P1161 = $P1158."new"($P1159, "enumcharlist" :named("pasttype"), 1 :named("negate"), $P1160 :named("node")) - set $P1152, $P1161 - if_1153_end: - $P1166 = $P1151."!make"($P1152) + find_lex $P1159, "$/" + find_lex $P1160, "$past" + $P1161 = $P1159."!make"($P1160) .annotate "line", 301 - .return ($P1166) - control_1138: + .return ($P1161) + control_1148: .local pmc exception .get_results (exception) - getattribute $P1167, exception, "payload" - .return ($P1167) + getattribute $P1162, exception, "payload" + .return ($P1162) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("73_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1171 -.annotate "line", 310 - new $P1170, 'ExceptionHandler' - set_addr $P1170, control_1169 - $P1170."handle_types"(58) - push_eh $P1170 +.sub "backslash:sym" :subid("72_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1166 +.annotate "line", 307 + new $P1165, 'ExceptionHandler' + set_addr $P1165, control_1164 + $P1165."handle_types"(58) + push_eh $P1165 .lex "self", self - .lex "$/", param_1171 -.annotate "line", 311 - new $P1172, "Undef" - .lex "$hexlit", $P1172 -.annotate "line", 312 - get_hll_global $P1173, ["HLL";"Actions"], "ints_to_string" - find_lex $P1176, "$/" - unless_null $P1176, vivify_279 - new $P1176, "Hash" - vivify_279: - set $P1177, $P1176["hexint"] - unless_null $P1177, vivify_280 - new $P1177, "Undef" - vivify_280: - unless $P1177, unless_1175 - set $P1174, $P1177 - goto unless_1175_end - unless_1175: - find_lex $P1178, "$/" - unless_null $P1178, vivify_281 - new $P1178, "Hash" - vivify_281: - set $P1179, $P1178["hexints"] - unless_null $P1179, vivify_282 - new $P1179, "Hash" - vivify_282: - set $P1180, $P1179["hexint"] - unless_null $P1180, vivify_283 - new $P1180, "Undef" - vivify_283: - set $P1174, $P1180 - unless_1175_end: - $P1181 = $P1173($P1174) - store_lex "$hexlit", $P1181 -.annotate "line", 313 - find_lex $P1182, "$/" - find_lex $P1185, "$/" - unless_null $P1185, vivify_284 - new $P1185, "Hash" - vivify_284: - set $P1186, $P1185["sym"] - unless_null $P1186, vivify_285 - new $P1186, "Undef" - vivify_285: - set $S1187, $P1186 - iseq $I1188, $S1187, "X" - if $I1188, if_1184 -.annotate "line", 316 - get_hll_global $P1193, ["PAST"], "Regex" - find_lex $P1194, "$hexlit" - find_lex $P1195, "$/" - $P1196 = $P1193."new"($P1194, "literal" :named("pasttype"), $P1195 :named("node")) - set $P1183, $P1196 -.annotate "line", 313 - goto if_1184_end - if_1184: -.annotate "line", 314 - get_hll_global $P1189, ["PAST"], "Regex" - find_lex $P1190, "$hexlit" - find_lex $P1191, "$/" - $P1192 = $P1189."new"($P1190, "enumcharlist" :named("pasttype"), 1 :named("negate"), $P1191 :named("node")) - set $P1183, $P1192 - if_1184_end: - $P1197 = $P1182."!make"($P1183) + .lex "$/", param_1166 +.annotate "line", 308 + new $P1167, "Undef" + .lex "$past", $P1167 + get_hll_global $P1168, ["PAST"], "Regex" .annotate "line", 310 - .return ($P1197) - control_1169: + find_lex $P1169, "$/" + unless_null $P1169, vivify_275 + new $P1169, "Hash" + vivify_275: + set $P1170, $P1169["sym"] + unless_null $P1170, vivify_276 + new $P1170, "Undef" + vivify_276: + set $S1171, $P1170 + iseq $I1172, $S1171, "V" + find_lex $P1173, "$/" + $P1174 = $P1168."new"(unicode:"\n\x{b}\f\r\x{85}\u2028\u2029", "enumcharlist" :named("pasttype"), $I1172 :named("negate"), $P1173 :named("node")) +.annotate "line", 308 + store_lex "$past", $P1174 +.annotate "line", 311 + find_lex $P1175, "$/" + find_lex $P1176, "$past" + $P1177 = $P1175."!make"($P1176) +.annotate "line", 307 + .return ($P1177) + control_1164: .local pmc exception .get_results (exception) - getattribute $P1198, exception, "payload" - .return ($P1198) + getattribute $P1178, exception, "payload" + .return ($P1178) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "backslash:sym" :subid("74_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1202 -.annotate "line", 319 - new $P1201, 'ExceptionHandler' - set_addr $P1201, control_1200 - $P1201."handle_types"(58) - push_eh $P1201 +.sub "backslash:sym" :subid("73_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1182 +.annotate "line", 314 + new $P1181, 'ExceptionHandler' + set_addr $P1181, control_1180 + $P1181."handle_types"(58) + push_eh $P1181 .lex "self", self - .lex "$/", param_1202 + .lex "$/", param_1182 +.annotate "line", 315 + new $P1183, "Undef" + .lex "$octlit", $P1183 +.annotate "line", 316 + get_hll_global $P1184, ["HLL";"Actions"], "ints_to_string" + find_lex $P1187, "$/" + unless_null $P1187, vivify_277 + new $P1187, "Hash" + vivify_277: + set $P1188, $P1187["octint"] + unless_null $P1188, vivify_278 + new $P1188, "Undef" + vivify_278: + unless $P1188, unless_1186 + set $P1185, $P1188 + goto unless_1186_end + unless_1186: + find_lex $P1189, "$/" + unless_null $P1189, vivify_279 + new $P1189, "Hash" + vivify_279: + set $P1190, $P1189["octints"] + unless_null $P1190, vivify_280 + new $P1190, "Hash" + vivify_280: + set $P1191, $P1190["octint"] + unless_null $P1191, vivify_281 + new $P1191, "Undef" + vivify_281: + set $P1185, $P1191 + unless_1186_end: + $P1192 = $P1184($P1185) + store_lex "$octlit", $P1192 +.annotate "line", 317 + find_lex $P1193, "$/" + find_lex $P1196, "$/" + unless_null $P1196, vivify_282 + new $P1196, "Hash" + vivify_282: + set $P1197, $P1196["sym"] + unless_null $P1197, vivify_283 + new $P1197, "Undef" + vivify_283: + set $S1198, $P1197 + iseq $I1199, $S1198, "O" + if $I1199, if_1195 .annotate "line", 320 - new $P1203, "Undef" - .lex "$past", $P1203 get_hll_global $P1204, ["PAST"], "Regex" - find_lex $P1205, "$/" - set $S1206, $P1205 - find_lex $P1207, "$/" - $P1208 = $P1204."new"($S1206, "literal" :named("pasttype"), $P1207 :named("node")) - store_lex "$past", $P1208 -.annotate "line", 321 - find_lex $P1209, "$/" - find_lex $P1210, "$past" - $P1211 = $P1209."!make"($P1210) -.annotate "line", 319 - .return ($P1211) - control_1200: + find_lex $P1205, "$octlit" + find_lex $P1206, "$/" + $P1207 = $P1204."new"($P1205, "literal" :named("pasttype"), $P1206 :named("node")) + set $P1194, $P1207 +.annotate "line", 317 + goto if_1195_end + if_1195: +.annotate "line", 318 + get_hll_global $P1200, ["PAST"], "Regex" + find_lex $P1201, "$octlit" + find_lex $P1202, "$/" + $P1203 = $P1200."new"($P1201, "enumcharlist" :named("pasttype"), 1 :named("negate"), $P1202 :named("node")) + set $P1194, $P1203 + if_1195_end: + $P1208 = $P1193."!make"($P1194) +.annotate "line", 314 + .return ($P1208) + control_1180: .local pmc exception .get_results (exception) - getattribute $P1212, exception, "payload" - .return ($P1212) + getattribute $P1209, exception, "payload" + .return ($P1209) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "assertion:sym" :subid("75_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1216 -.annotate "line", 325 - new $P1215, 'ExceptionHandler' - set_addr $P1215, control_1214 - $P1215."handle_types"(58) - push_eh $P1215 +.sub "backslash:sym" :subid("74_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1213 +.annotate "line", 323 + new $P1212, 'ExceptionHandler' + set_addr $P1212, control_1211 + $P1212."handle_types"(58) + push_eh $P1212 .lex "self", self - .lex "$/", param_1216 -.annotate "line", 326 - new $P1217, "Undef" - .lex "$past", $P1217 + .lex "$/", param_1213 +.annotate "line", 324 + new $P1214, "Undef" + .lex "$hexlit", $P1214 .annotate "line", 325 - find_lex $P1218, "$past" -.annotate "line", 327 + get_hll_global $P1215, ["HLL";"Actions"], "ints_to_string" + find_lex $P1218, "$/" + unless_null $P1218, vivify_284 + new $P1218, "Hash" + vivify_284: + set $P1219, $P1218["hexint"] + unless_null $P1219, vivify_285 + new $P1219, "Undef" + vivify_285: + unless $P1219, unless_1217 + set $P1216, $P1219 + goto unless_1217_end + unless_1217: find_lex $P1220, "$/" unless_null $P1220, vivify_286 new $P1220, "Hash" vivify_286: - set $P1221, $P1220["assertion"] + set $P1221, $P1220["hexints"] unless_null $P1221, vivify_287 - new $P1221, "Undef" + new $P1221, "Hash" vivify_287: - if $P1221, if_1219 -.annotate "line", 331 - new $P1226, "Integer" - assign $P1226, 0 - store_lex "$past", $P1226 - goto if_1219_end - if_1219: -.annotate "line", 328 - find_lex $P1222, "$/" + set $P1222, $P1221["hexint"] unless_null $P1222, vivify_288 - new $P1222, "Hash" + new $P1222, "Undef" vivify_288: - set $P1223, $P1222["assertion"] - unless_null $P1223, vivify_289 - new $P1223, "Undef" + set $P1216, $P1222 + unless_1217_end: + $P1223 = $P1215($P1216) + store_lex "$hexlit", $P1223 +.annotate "line", 326 + find_lex $P1224, "$/" + find_lex $P1227, "$/" + unless_null $P1227, vivify_289 + new $P1227, "Hash" vivify_289: - $P1224 = $P1223."ast"() - store_lex "$past", $P1224 + set $P1228, $P1227["sym"] + unless_null $P1228, vivify_290 + new $P1228, "Undef" + vivify_290: + set $S1229, $P1228 + iseq $I1230, $S1229, "X" + if $I1230, if_1226 .annotate "line", 329 - find_lex $P1225, "$past" - $P1225."subtype"("zerowidth") - if_1219_end: -.annotate "line", 332 - find_lex $P1227, "$/" - find_lex $P1228, "$past" - $P1229 = $P1227."!make"($P1228) -.annotate "line", 325 - .return ($P1229) - control_1214: + get_hll_global $P1235, ["PAST"], "Regex" + find_lex $P1236, "$hexlit" + find_lex $P1237, "$/" + $P1238 = $P1235."new"($P1236, "literal" :named("pasttype"), $P1237 :named("node")) + set $P1225, $P1238 +.annotate "line", 326 + goto if_1226_end + if_1226: +.annotate "line", 327 + get_hll_global $P1231, ["PAST"], "Regex" + find_lex $P1232, "$hexlit" + find_lex $P1233, "$/" + $P1234 = $P1231."new"($P1232, "enumcharlist" :named("pasttype"), 1 :named("negate"), $P1233 :named("node")) + set $P1225, $P1234 + if_1226_end: + $P1239 = $P1224."!make"($P1225) +.annotate "line", 323 + .return ($P1239) + control_1211: .local pmc exception .get_results (exception) - getattribute $P1230, exception, "payload" - .return ($P1230) + getattribute $P1240, exception, "payload" + .return ($P1240) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "assertion:sym" :subid("76_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1234 -.annotate "line", 335 - new $P1233, 'ExceptionHandler' - set_addr $P1233, control_1232 - $P1233."handle_types"(58) - push_eh $P1233 +.sub "backslash:sym" :subid("75_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1244 +.annotate "line", 332 + new $P1243, 'ExceptionHandler' + set_addr $P1243, control_1242 + $P1243."handle_types"(58) + push_eh $P1243 .lex "self", self - .lex "$/", param_1234 -.annotate "line", 336 - new $P1235, "Undef" - .lex "$past", $P1235 -.annotate "line", 335 - find_lex $P1236, "$past" -.annotate "line", 337 - find_lex $P1238, "$/" - unless_null $P1238, vivify_290 - new $P1238, "Hash" - vivify_290: - set $P1239, $P1238["assertion"] - unless_null $P1239, vivify_291 - new $P1239, "Undef" - vivify_291: - if $P1239, if_1237 -.annotate "line", 343 - get_hll_global $P1248, ["PAST"], "Regex" + .lex "$/", param_1244 +.annotate "line", 333 + new $P1245, "Undef" + .lex "$past", $P1245 + get_hll_global $P1246, ["PAST"], "Regex" + find_lex $P1247, "$/" + set $S1248, $P1247 find_lex $P1249, "$/" - $P1250 = $P1248."new"("anchor" :named("pasttype"), "fail" :named("subtype"), $P1249 :named("node")) + $P1250 = $P1246."new"($S1248, "literal" :named("pasttype"), $P1249 :named("node")) store_lex "$past", $P1250 -.annotate "line", 342 - goto if_1237_end - if_1237: -.annotate "line", 338 - find_lex $P1240, "$/" - unless_null $P1240, vivify_292 - new $P1240, "Hash" - vivify_292: - set $P1241, $P1240["assertion"] - unless_null $P1241, vivify_293 - new $P1241, "Undef" - vivify_293: - $P1242 = $P1241."ast"() - store_lex "$past", $P1242 -.annotate "line", 339 - find_lex $P1243, "$past" - find_lex $P1244, "$past" - $P1245 = $P1244."negate"() - isfalse $I1246, $P1245 - $P1243."negate"($I1246) -.annotate "line", 340 - find_lex $P1247, "$past" - $P1247."subtype"("zerowidth") - if_1237_end: -.annotate "line", 345 +.annotate "line", 334 find_lex $P1251, "$/" find_lex $P1252, "$past" $P1253 = $P1251."!make"($P1252) -.annotate "line", 335 +.annotate "line", 332 .return ($P1253) - control_1232: + control_1242: .local pmc exception .get_results (exception) getattribute $P1254, exception, "payload" @@ -10146,249 +10121,379 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .namespace ["Regex";"P6Regex";"Actions"] -.sub "assertion:sym" :subid("77_1258208097.30665") :method :outer("11_1258208097.30665") +.sub "assertion:sym" :subid("76_1258264434.22101") :method :outer("11_1258264434.22101") .param pmc param_1258 -.annotate "line", 348 +.annotate "line", 338 new $P1257, 'ExceptionHandler' set_addr $P1257, control_1256 $P1257."handle_types"(58) push_eh $P1257 .lex "self", self .lex "$/", param_1258 -.annotate "line", 349 +.annotate "line", 339 new $P1259, "Undef" .lex "$past", $P1259 - find_lex $P1260, "$/" - unless_null $P1260, vivify_294 - new $P1260, "Hash" +.annotate "line", 338 + find_lex $P1260, "$past" +.annotate "line", 340 + find_lex $P1262, "$/" + unless_null $P1262, vivify_291 + new $P1262, "Hash" + vivify_291: + set $P1263, $P1262["assertion"] + unless_null $P1263, vivify_292 + new $P1263, "Undef" + vivify_292: + if $P1263, if_1261 +.annotate "line", 344 + new $P1268, "Integer" + assign $P1268, 0 + store_lex "$past", $P1268 + goto if_1261_end + if_1261: +.annotate "line", 341 + find_lex $P1264, "$/" + unless_null $P1264, vivify_293 + new $P1264, "Hash" + vivify_293: + set $P1265, $P1264["assertion"] + unless_null $P1265, vivify_294 + new $P1265, "Undef" vivify_294: - set $P1261, $P1260["assertion"] - unless_null $P1261, vivify_295 - new $P1261, "Undef" - vivify_295: - $P1262 = $P1261."ast"() - store_lex "$past", $P1262 -.annotate "line", 350 - find_lex $P1263, "$past" - $P1263."subtype"("method") -.annotate "line", 351 - find_lex $P1264, "$past" - $P1264."name"("") -.annotate "line", 352 - find_lex $P1265, "$/" - find_lex $P1266, "$past" - $P1267 = $P1265."!make"($P1266) -.annotate "line", 348 - .return ($P1267) + $P1266 = $P1265."ast"() + store_lex "$past", $P1266 +.annotate "line", 342 + find_lex $P1267, "$past" + $P1267."subtype"("zerowidth") + if_1261_end: +.annotate "line", 345 + find_lex $P1269, "$/" + find_lex $P1270, "$past" + $P1271 = $P1269."!make"($P1270) +.annotate "line", 338 + .return ($P1271) control_1256: .local pmc exception .get_results (exception) - getattribute $P1268, exception, "payload" - .return ($P1268) + getattribute $P1272, exception, "payload" + .return ($P1272) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "assertion:sym" :subid("78_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1272 -.annotate "line", 355 - .const 'Sub' $P1330 = "80_1258208097.30665" - capture_lex $P1330 - .const 'Sub' $P1294 = "79_1258208097.30665" - capture_lex $P1294 - new $P1271, 'ExceptionHandler' - set_addr $P1271, control_1270 - $P1271."handle_types"(58) - push_eh $P1271 +.sub "assertion:sym" :subid("77_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1276 +.annotate "line", 348 + new $P1275, 'ExceptionHandler' + set_addr $P1275, control_1274 + $P1275."handle_types"(58) + push_eh $P1275 .lex "self", self - .lex "$/", param_1272 -.annotate "line", 356 - new $P1273, "Undef" - .lex "$name", $P1273 -.annotate "line", 357 - new $P1274, "Undef" - .lex "$past", $P1274 -.annotate "line", 356 - find_lex $P1275, "$/" - unless_null $P1275, vivify_296 - new $P1275, "Hash" + .lex "$/", param_1276 +.annotate "line", 349 + new $P1277, "Undef" + .lex "$past", $P1277 +.annotate "line", 348 + find_lex $P1278, "$past" +.annotate "line", 350 + find_lex $P1280, "$/" + unless_null $P1280, vivify_295 + new $P1280, "Hash" + vivify_295: + set $P1281, $P1280["assertion"] + unless_null $P1281, vivify_296 + new $P1281, "Undef" vivify_296: - set $P1276, $P1275["longname"] - unless_null $P1276, vivify_297 - new $P1276, "Undef" + if $P1281, if_1279 +.annotate "line", 356 + get_hll_global $P1290, ["PAST"], "Regex" + find_lex $P1291, "$/" + $P1292 = $P1290."new"("anchor" :named("pasttype"), "fail" :named("subtype"), $P1291 :named("node")) + store_lex "$past", $P1292 +.annotate "line", 355 + goto if_1279_end + if_1279: +.annotate "line", 351 + find_lex $P1282, "$/" + unless_null $P1282, vivify_297 + new $P1282, "Hash" vivify_297: - set $S1277, $P1276 - new $P1278, 'String' - set $P1278, $S1277 - store_lex "$name", $P1278 - find_lex $P1279, "$past" -.annotate "line", 358 - find_lex $P1281, "$/" - unless_null $P1281, vivify_298 - new $P1281, "Hash" + set $P1283, $P1282["assertion"] + unless_null $P1283, vivify_298 + new $P1283, "Undef" vivify_298: - set $P1282, $P1281["assertion"] - unless_null $P1282, vivify_299 - new $P1282, "Undef" - vivify_299: - if $P1282, if_1280 + $P1284 = $P1283."ast"() + store_lex "$past", $P1284 +.annotate "line", 352 + find_lex $P1285, "$past" + find_lex $P1286, "$past" + $P1287 = $P1286."negate"() + isfalse $I1288, $P1287 + $P1285."negate"($I1288) +.annotate "line", 353 + find_lex $P1289, "$past" + $P1289."subtype"("zerowidth") + if_1279_end: +.annotate "line", 358 + find_lex $P1293, "$/" + find_lex $P1294, "$past" + $P1295 = $P1293."!make"($P1294) +.annotate "line", 348 + .return ($P1295) + control_1274: + .local pmc exception + .get_results (exception) + getattribute $P1296, exception, "payload" + .return ($P1296) + rethrow exception +.end + + +.namespace ["Regex";"P6Regex";"Actions"] +.sub "assertion:sym" :subid("78_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1300 +.annotate "line", 361 + new $P1299, 'ExceptionHandler' + set_addr $P1299, control_1298 + $P1299."handle_types"(58) + push_eh $P1299 + .lex "self", self + .lex "$/", param_1300 .annotate "line", 362 - find_lex $P1290, "$name" - set $S1291, $P1290 - iseq $I1292, $S1291, "sym" - if $I1292, if_1289 -.annotate "line", 378 - get_hll_global $P1304, ["PAST"], "Regex" - find_lex $P1305, "$name" - find_lex $P1306, "$name" - find_lex $P1307, "$/" - $P1308 = $P1304."new"($P1305, $P1306 :named("name"), "subrule" :named("pasttype"), "capture" :named("subtype"), $P1307 :named("node")) - store_lex "$past", $P1308 -.annotate "line", 380 - find_lex $P1310, "$/" - unless_null $P1310, vivify_300 - new $P1310, "Hash" + new $P1301, "Undef" + .lex "$past", $P1301 + find_lex $P1302, "$/" + unless_null $P1302, vivify_299 + new $P1302, "Hash" + vivify_299: + set $P1303, $P1302["assertion"] + unless_null $P1303, vivify_300 + new $P1303, "Undef" vivify_300: - set $P1311, $P1310["nibbler"] - unless_null $P1311, vivify_301 - new $P1311, "Undef" + $P1304 = $P1303."ast"() + store_lex "$past", $P1304 +.annotate "line", 363 + find_lex $P1305, "$past" + $P1305."subtype"("method") +.annotate "line", 364 + find_lex $P1306, "$past" + $P1306."name"("") +.annotate "line", 365 + find_lex $P1307, "$/" + find_lex $P1308, "$past" + $P1309 = $P1307."!make"($P1308) +.annotate "line", 361 + .return ($P1309) + control_1298: + .local pmc exception + .get_results (exception) + getattribute $P1310, exception, "payload" + .return ($P1310) + rethrow exception +.end + + +.namespace ["Regex";"P6Regex";"Actions"] +.sub "assertion:sym" :subid("79_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1314 +.annotate "line", 368 + .const 'Sub' $P1372 = "81_1258264434.22101" + capture_lex $P1372 + .const 'Sub' $P1336 = "80_1258264434.22101" + capture_lex $P1336 + new $P1313, 'ExceptionHandler' + set_addr $P1313, control_1312 + $P1313."handle_types"(58) + push_eh $P1313 + .lex "self", self + .lex "$/", param_1314 +.annotate "line", 369 + new $P1315, "Undef" + .lex "$name", $P1315 +.annotate "line", 370 + new $P1316, "Undef" + .lex "$past", $P1316 +.annotate "line", 369 + find_lex $P1317, "$/" + unless_null $P1317, vivify_301 + new $P1317, "Hash" vivify_301: - if $P1311, if_1309 -.annotate "line", 383 - find_lex $P1319, "$/" - unless_null $P1319, vivify_302 - new $P1319, "Hash" + set $P1318, $P1317["longname"] + unless_null $P1318, vivify_302 + new $P1318, "Undef" vivify_302: - set $P1320, $P1319["arglist"] - unless_null $P1320, vivify_303 - new $P1320, "Undef" + set $S1319, $P1318 + new $P1320, 'String' + set $P1320, $S1319 + store_lex "$name", $P1320 + find_lex $P1321, "$past" +.annotate "line", 371 + find_lex $P1323, "$/" + unless_null $P1323, vivify_303 + new $P1323, "Hash" vivify_303: - unless $P1320, if_1318_end -.annotate "line", 384 - find_lex $P1322, "$/" - unless_null $P1322, vivify_304 - new $P1322, "Hash" + set $P1324, $P1323["assertion"] + unless_null $P1324, vivify_304 + new $P1324, "Undef" vivify_304: - set $P1323, $P1322["arglist"] - unless_null $P1323, vivify_305 - new $P1323, "ResizablePMCArray" + if $P1324, if_1322 +.annotate "line", 375 + find_lex $P1332, "$name" + set $S1333, $P1332 + iseq $I1334, $S1333, "sym" + if $I1334, if_1331 +.annotate "line", 391 + get_hll_global $P1346, ["PAST"], "Regex" + find_lex $P1347, "$name" + find_lex $P1348, "$name" + find_lex $P1349, "$/" + $P1350 = $P1346."new"($P1347, $P1348 :named("name"), "subrule" :named("pasttype"), "capture" :named("subtype"), $P1349 :named("node")) + store_lex "$past", $P1350 +.annotate "line", 393 + find_lex $P1352, "$/" + unless_null $P1352, vivify_305 + new $P1352, "Hash" vivify_305: - set $P1324, $P1323[0] - unless_null $P1324, vivify_306 - new $P1324, "Undef" + set $P1353, $P1352["nibbler"] + unless_null $P1353, vivify_306 + new $P1353, "Undef" vivify_306: - $P1325 = $P1324."ast"() - $P1326 = $P1325."list"() - defined $I1327, $P1326 - unless $I1327, for_undef_307 - iter $P1321, $P1326 - new $P1336, 'ExceptionHandler' - set_addr $P1336, loop1335_handler - $P1336."handle_types"(65, 67, 66) - push_eh $P1336 - loop1335_test: - unless $P1321, loop1335_done - shift $P1328, $P1321 - loop1335_redo: - .const 'Sub' $P1330 = "80_1258208097.30665" - capture_lex $P1330 - $P1330($P1328) - loop1335_next: - goto loop1335_test - loop1335_handler: - .local pmc exception - .get_results (exception) - getattribute $P1337, exception, 'type' - eq $P1337, 65, loop1335_next - eq $P1337, 67, loop1335_redo - loop1335_done: - pop_eh - for_undef_307: - if_1318_end: -.annotate "line", 383 - goto if_1309_end - if_1309: -.annotate "line", 381 - find_lex $P1312, "$past" - find_lex $P1313, "$/" - unless_null $P1313, vivify_308 - new $P1313, "Hash" + if $P1353, if_1351 +.annotate "line", 396 + find_lex $P1361, "$/" + unless_null $P1361, vivify_307 + new $P1361, "Hash" + vivify_307: + set $P1362, $P1361["arglist"] + unless_null $P1362, vivify_308 + new $P1362, "Undef" vivify_308: - set $P1314, $P1313["nibbler"] - unless_null $P1314, vivify_309 - new $P1314, "ResizablePMCArray" + unless $P1362, if_1360_end +.annotate "line", 397 + find_lex $P1364, "$/" + unless_null $P1364, vivify_309 + new $P1364, "Hash" vivify_309: - set $P1315, $P1314[0] - unless_null $P1315, vivify_310 - new $P1315, "Undef" + set $P1365, $P1364["arglist"] + unless_null $P1365, vivify_310 + new $P1365, "ResizablePMCArray" vivify_310: - $P1316 = $P1315."ast"() - $P1317 = "buildsub"($P1316) - $P1312."push"($P1317) - if_1309_end: -.annotate "line", 377 - goto if_1289_end - if_1289: -.annotate "line", 362 - .const 'Sub' $P1294 = "79_1258208097.30665" - capture_lex $P1294 - $P1294() - if_1289_end: - goto if_1280_end - if_1280: -.annotate "line", 359 - find_lex $P1283, "$/" - unless_null $P1283, vivify_311 - new $P1283, "Hash" + set $P1366, $P1365[0] + unless_null $P1366, vivify_311 + new $P1366, "Undef" vivify_311: - set $P1284, $P1283["assertion"] - unless_null $P1284, vivify_312 - new $P1284, "ResizablePMCArray" - vivify_312: - set $P1285, $P1284[0] - unless_null $P1285, vivify_313 - new $P1285, "Undef" + $P1367 = $P1366."ast"() + $P1368 = $P1367."list"() + defined $I1369, $P1368 + unless $I1369, for_undef_312 + iter $P1363, $P1368 + new $P1378, 'ExceptionHandler' + set_addr $P1378, loop1377_handler + $P1378."handle_types"(65, 67, 66) + push_eh $P1378 + loop1377_test: + unless $P1363, loop1377_done + shift $P1370, $P1363 + loop1377_redo: + .const 'Sub' $P1372 = "81_1258264434.22101" + capture_lex $P1372 + $P1372($P1370) + loop1377_next: + goto loop1377_test + loop1377_handler: + .local pmc exception + .get_results (exception) + getattribute $P1379, exception, 'type' + eq $P1379, 65, loop1377_next + eq $P1379, 67, loop1377_redo + loop1377_done: + pop_eh + for_undef_312: + if_1360_end: +.annotate "line", 396 + goto if_1351_end + if_1351: +.annotate "line", 394 + find_lex $P1354, "$past" + find_lex $P1355, "$/" + unless_null $P1355, vivify_313 + new $P1355, "Hash" vivify_313: - $P1286 = $P1285."ast"() - store_lex "$past", $P1286 -.annotate "line", 360 - find_lex $P1287, "$past" - find_lex $P1288, "$name" - "subrule_alias"($P1287, $P1288) - if_1280_end: -.annotate "line", 387 - find_lex $P1338, "$/" - find_lex $P1339, "$past" - $P1340 = $P1338."!make"($P1339) -.annotate "line", 355 - .return ($P1340) - control_1270: + set $P1356, $P1355["nibbler"] + unless_null $P1356, vivify_314 + new $P1356, "ResizablePMCArray" + vivify_314: + set $P1357, $P1356[0] + unless_null $P1357, vivify_315 + new $P1357, "Undef" + vivify_315: + $P1358 = $P1357."ast"() + $P1359 = "buildsub"($P1358) + $P1354."push"($P1359) + if_1351_end: +.annotate "line", 390 + goto if_1331_end + if_1331: +.annotate "line", 375 + .const 'Sub' $P1336 = "80_1258264434.22101" + capture_lex $P1336 + $P1336() + if_1331_end: + goto if_1322_end + if_1322: +.annotate "line", 372 + find_lex $P1325, "$/" + unless_null $P1325, vivify_316 + new $P1325, "Hash" + vivify_316: + set $P1326, $P1325["assertion"] + unless_null $P1326, vivify_317 + new $P1326, "ResizablePMCArray" + vivify_317: + set $P1327, $P1326[0] + unless_null $P1327, vivify_318 + new $P1327, "Undef" + vivify_318: + $P1328 = $P1327."ast"() + store_lex "$past", $P1328 +.annotate "line", 373 + find_lex $P1329, "$past" + find_lex $P1330, "$name" + "subrule_alias"($P1329, $P1330) + if_1322_end: +.annotate "line", 400 + find_lex $P1380, "$/" + find_lex $P1381, "$past" + $P1382 = $P1380."!make"($P1381) +.annotate "line", 368 + .return ($P1382) + control_1312: .local pmc exception .get_results (exception) - getattribute $P1341, exception, "payload" - .return ($P1341) + getattribute $P1383, exception, "payload" + .return ($P1383) rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block1329" :anon :subid("80_1258208097.30665") :outer("78_1258208097.30665") - .param pmc param_1331 -.annotate "line", 384 - .lex "$_", param_1331 - find_lex $P1332, "$past" - find_lex $P1333, "$_" - $P1334 = $P1332."push"($P1333) - .return ($P1334) +.sub "_block1371" :anon :subid("81_1258264434.22101") :outer("79_1258264434.22101") + .param pmc param_1373 +.annotate "line", 397 + .lex "$_", param_1373 + find_lex $P1374, "$past" + find_lex $P1375, "$_" + $P1376 = $P1374."push"($P1375) + .return ($P1376) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block1293" :anon :subid("79_1258208097.30665") :outer("78_1258208097.30665") -.annotate "line", 363 - new $P1295, "Undef" - .lex "$regexsym", $P1295 +.sub "_block1335" :anon :subid("80_1258264434.22101") :outer("79_1258264434.22101") +.annotate "line", 376 + new $P1337, "Undef" + .lex "$regexsym", $P1337 $P0 = get_global '$REGEXNAME' $S0 = $P0 @@ -10396,390 +10501,390 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes add $I0, 5 $S0 = substr $S0, $I0 chopn $S0, 1 - $P1296 = box $S0 + $P1338 = box $S0 - store_lex "$regexsym", $P1296 -.annotate "line", 372 - get_hll_global $P1297, ["PAST"], "Regex" -.annotate "line", 373 - get_hll_global $P1298, ["PAST"], "Regex" - find_lex $P1299, "$regexsym" - $P1300 = $P1298."new"($P1299, "literal" :named("pasttype")) - find_lex $P1301, "$name" - find_lex $P1302, "$/" - $P1303 = $P1297."new"($P1300, $P1301 :named("name"), "subcapture" :named("pasttype"), $P1302 :named("node")) -.annotate "line", 372 - store_lex "$past", $P1303 -.annotate "line", 362 - .return ($P1303) + store_lex "$regexsym", $P1338 +.annotate "line", 385 + get_hll_global $P1339, ["PAST"], "Regex" +.annotate "line", 386 + get_hll_global $P1340, ["PAST"], "Regex" + find_lex $P1341, "$regexsym" + $P1342 = $P1340."new"($P1341, "literal" :named("pasttype")) + find_lex $P1343, "$name" + find_lex $P1344, "$/" + $P1345 = $P1339."new"($P1342, $P1343 :named("name"), "subcapture" :named("pasttype"), $P1344 :named("node")) +.annotate "line", 385 + store_lex "$past", $P1345 +.annotate "line", 375 + .return ($P1345) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "assertion:sym<[>" :subid("81_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1345 -.annotate "line", 390 - .const 'Sub' $P1380 = "82_1258208097.30665" - capture_lex $P1380 - new $P1344, 'ExceptionHandler' - set_addr $P1344, control_1343 - $P1344."handle_types"(58) - push_eh $P1344 - .lex "self", self - .lex "$/", param_1345 -.annotate "line", 391 - new $P1346, "Undef" - .lex "$clist", $P1346 -.annotate "line", 392 - new $P1347, "Undef" - .lex "$past", $P1347 -.annotate "line", 401 - new $P1348, "Undef" - .lex "$i", $P1348 -.annotate "line", 402 - new $P1349, "Undef" - .lex "$n", $P1349 -.annotate "line", 391 - find_lex $P1350, "$/" - unless_null $P1350, vivify_314 - new $P1350, "Hash" - vivify_314: - set $P1351, $P1350["cclass_elem"] - unless_null $P1351, vivify_315 - new $P1351, "Undef" - vivify_315: - store_lex "$clist", $P1351 -.annotate "line", 392 - find_lex $P1352, "$clist" - unless_null $P1352, vivify_316 - new $P1352, "ResizablePMCArray" - vivify_316: - set $P1353, $P1352[0] - unless_null $P1353, vivify_317 - new $P1353, "Undef" - vivify_317: - $P1354 = $P1353."ast"() - store_lex "$past", $P1354 -.annotate "line", 393 - find_lex $P1358, "$past" - $P1359 = $P1358."negate"() - if $P1359, if_1357 - set $P1356, $P1359 - goto if_1357_end - if_1357: - find_lex $P1360, "$past" - $S1361 = $P1360."pasttype"() - iseq $I1362, $S1361, "subrule" - new $P1356, 'Integer' - set $P1356, $I1362 - if_1357_end: - unless $P1356, if_1355_end -.annotate "line", 394 - find_lex $P1363, "$past" - $P1363."subtype"("zerowidth") -.annotate "line", 395 - get_hll_global $P1364, ["PAST"], "Regex" - find_lex $P1365, "$past" -.annotate "line", 397 - get_hll_global $P1366, ["PAST"], "Regex" - $P1367 = $P1366."new"("charclass" :named("pasttype"), "." :named("subtype")) - find_lex $P1368, "$/" - $P1369 = $P1364."new"($P1365, $P1367, $P1368 :named("node")) -.annotate "line", 395 - store_lex "$past", $P1369 - if_1355_end: -.annotate "line", 401 - new $P1370, "Integer" - assign $P1370, 1 - store_lex "$i", $P1370 -.annotate "line", 402 - find_lex $P1371, "$clist" - set $N1372, $P1371 - new $P1373, 'Float' - set $P1373, $N1372 - store_lex "$n", $P1373 +.sub "assertion:sym<[>" :subid("82_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1387 .annotate "line", 403 - new $P1404, 'ExceptionHandler' - set_addr $P1404, loop1403_handler - $P1404."handle_types"(65, 67, 66) - push_eh $P1404 - loop1403_test: - find_lex $P1374, "$i" - set $N1375, $P1374 - find_lex $P1376, "$n" - set $N1377, $P1376 - islt $I1378, $N1375, $N1377 - unless $I1378, loop1403_done - loop1403_redo: - .const 'Sub' $P1380 = "82_1258208097.30665" - capture_lex $P1380 - $P1380() - loop1403_next: - goto loop1403_test - loop1403_handler: - .local pmc exception - .get_results (exception) - getattribute $P1405, exception, 'type' - eq $P1405, 65, loop1403_next - eq $P1405, 67, loop1403_redo - loop1403_done: - pop_eh + .const 'Sub' $P1422 = "83_1258264434.22101" + capture_lex $P1422 + new $P1386, 'ExceptionHandler' + set_addr $P1386, control_1385 + $P1386."handle_types"(58) + push_eh $P1386 + .lex "self", self + .lex "$/", param_1387 +.annotate "line", 404 + new $P1388, "Undef" + .lex "$clist", $P1388 +.annotate "line", 405 + new $P1389, "Undef" + .lex "$past", $P1389 .annotate "line", 414 - find_lex $P1406, "$/" - find_lex $P1407, "$past" - $P1408 = $P1406."!make"($P1407) -.annotate "line", 390 - .return ($P1408) - control_1343: - .local pmc exception - .get_results (exception) - getattribute $P1409, exception, "payload" - .return ($P1409) - rethrow exception -.end - - -.namespace ["Regex";"P6Regex";"Actions"] -.sub "_block1379" :anon :subid("82_1258208097.30665") :outer("81_1258208097.30665") + new $P1390, "Undef" + .lex "$i", $P1390 +.annotate "line", 415 + new $P1391, "Undef" + .lex "$n", $P1391 .annotate "line", 404 - new $P1381, "Undef" - .lex "$ast", $P1381 - find_lex $P1382, "$i" - set $I1383, $P1382 - find_lex $P1384, "$clist" - unless_null $P1384, vivify_318 - new $P1384, "ResizablePMCArray" - vivify_318: - set $P1385, $P1384[$I1383] - unless_null $P1385, vivify_319 - new $P1385, "Undef" + find_lex $P1392, "$/" + unless_null $P1392, vivify_319 + new $P1392, "Hash" vivify_319: - $P1386 = $P1385."ast"() - store_lex "$ast", $P1386 + set $P1393, $P1392["cclass_elem"] + unless_null $P1393, vivify_320 + new $P1393, "Undef" + vivify_320: + store_lex "$clist", $P1393 .annotate "line", 405 - find_lex $P1388, "$ast" - $P1389 = $P1388."negate"() - if $P1389, if_1387 -.annotate "line", 410 - get_hll_global $P1396, ["PAST"], "Regex" - find_lex $P1397, "$past" - find_lex $P1398, "$ast" - find_lex $P1399, "$/" - $P1400 = $P1396."new"($P1397, $P1398, "alt" :named("pasttype"), $P1399 :named("node")) - store_lex "$past", $P1400 -.annotate "line", 409 - goto if_1387_end - if_1387: + find_lex $P1394, "$clist" + unless_null $P1394, vivify_321 + new $P1394, "ResizablePMCArray" + vivify_321: + set $P1395, $P1394[0] + unless_null $P1395, vivify_322 + new $P1395, "Undef" + vivify_322: + $P1396 = $P1395."ast"() + store_lex "$past", $P1396 .annotate "line", 406 - find_lex $P1390, "$ast" - $P1390."subtype"("zerowidth") + find_lex $P1400, "$past" + $P1401 = $P1400."negate"() + if $P1401, if_1399 + set $P1398, $P1401 + goto if_1399_end + if_1399: + find_lex $P1402, "$past" + $S1403 = $P1402."pasttype"() + iseq $I1404, $S1403, "subrule" + new $P1398, 'Integer' + set $P1398, $I1404 + if_1399_end: + unless $P1398, if_1397_end .annotate "line", 407 - get_hll_global $P1391, ["PAST"], "Regex" - find_lex $P1392, "$ast" - find_lex $P1393, "$past" - find_lex $P1394, "$/" - $P1395 = $P1391."new"($P1392, $P1393, "concat" :named("pasttype"), $P1394 :named("node")) - store_lex "$past", $P1395 - if_1387_end: -.annotate "line", 412 - find_lex $P1401, "$i" - add $P1402, $P1401, 1 - store_lex "$i", $P1402 + find_lex $P1405, "$past" + $P1405."subtype"("zerowidth") +.annotate "line", 408 + get_hll_global $P1406, ["PAST"], "Regex" + find_lex $P1407, "$past" +.annotate "line", 410 + get_hll_global $P1408, ["PAST"], "Regex" + $P1409 = $P1408."new"("charclass" :named("pasttype"), "." :named("subtype")) + find_lex $P1410, "$/" + $P1411 = $P1406."new"($P1407, $P1409, $P1410 :named("node")) +.annotate "line", 408 + store_lex "$past", $P1411 + if_1397_end: +.annotate "line", 414 + new $P1412, "Integer" + assign $P1412, 1 + store_lex "$i", $P1412 +.annotate "line", 415 + find_lex $P1413, "$clist" + set $N1414, $P1413 + new $P1415, 'Float' + set $P1415, $N1414 + store_lex "$n", $P1415 +.annotate "line", 416 + new $P1446, 'ExceptionHandler' + set_addr $P1446, loop1445_handler + $P1446."handle_types"(65, 67, 66) + push_eh $P1446 + loop1445_test: + find_lex $P1416, "$i" + set $N1417, $P1416 + find_lex $P1418, "$n" + set $N1419, $P1418 + islt $I1420, $N1417, $N1419 + unless $I1420, loop1445_done + loop1445_redo: + .const 'Sub' $P1422 = "83_1258264434.22101" + capture_lex $P1422 + $P1422() + loop1445_next: + goto loop1445_test + loop1445_handler: + .local pmc exception + .get_results (exception) + getattribute $P1447, exception, 'type' + eq $P1447, 65, loop1445_next + eq $P1447, 67, loop1445_redo + loop1445_done: + pop_eh +.annotate "line", 427 + find_lex $P1448, "$/" + find_lex $P1449, "$past" + $P1450 = $P1448."!make"($P1449) .annotate "line", 403 - .return ($P1402) + .return ($P1450) + control_1385: + .local pmc exception + .get_results (exception) + getattribute $P1451, exception, "payload" + .return ($P1451) + rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "cclass_elem" :subid("83_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1413 +.sub "_block1421" :anon :subid("83_1258264434.22101") :outer("82_1258264434.22101") .annotate "line", 417 - .const 'Sub' $P1438 = "85_1258208097.30665" - capture_lex $P1438 - .const 'Sub' $P1422 = "84_1258208097.30665" - capture_lex $P1422 - new $P1412, 'ExceptionHandler' - set_addr $P1412, control_1411 - $P1412."handle_types"(58) - push_eh $P1412 - .lex "self", self - .lex "$/", param_1413 -.annotate "line", 418 - new $P1414, "Undef" - .lex "$str", $P1414 -.annotate "line", 419 - new $P1415, "Undef" - .lex "$past", $P1415 -.annotate "line", 418 - new $P1416, "String" - assign $P1416, "" - store_lex "$str", $P1416 - find_lex $P1417, "$past" -.annotate "line", 420 - find_lex $P1419, "$/" - unless_null $P1419, vivify_320 - new $P1419, "Hash" - vivify_320: - set $P1420, $P1419["name"] - unless_null $P1420, vivify_321 - new $P1420, "Undef" - vivify_321: - if $P1420, if_1418 -.annotate "line", 424 - find_lex $P1433, "$/" - unless_null $P1433, vivify_322 - new $P1433, "Hash" - vivify_322: - set $P1434, $P1433["charspec"] - unless_null $P1434, vivify_323 - new $P1434, "Undef" + new $P1423, "Undef" + .lex "$ast", $P1423 + find_lex $P1424, "$i" + set $I1425, $P1424 + find_lex $P1426, "$clist" + unless_null $P1426, vivify_323 + new $P1426, "ResizablePMCArray" vivify_323: - defined $I1435, $P1434 - unless $I1435, for_undef_324 - iter $P1432, $P1434 - new $P1464, 'ExceptionHandler' - set_addr $P1464, loop1463_handler - $P1464."handle_types"(65, 67, 66) - push_eh $P1464 - loop1463_test: - unless $P1432, loop1463_done - shift $P1436, $P1432 - loop1463_redo: - .const 'Sub' $P1438 = "85_1258208097.30665" - capture_lex $P1438 - $P1438($P1436) - loop1463_next: - goto loop1463_test - loop1463_handler: - .local pmc exception - .get_results (exception) - getattribute $P1465, exception, 'type' - eq $P1465, 65, loop1463_next - eq $P1465, 67, loop1463_redo - loop1463_done: - pop_eh - for_undef_324: -.annotate "line", 449 - get_hll_global $P1466, ["PAST"], "Regex" - find_lex $P1467, "$str" - find_lex $P1468, "$/" - $P1469 = $P1466."new"($P1467, "enumcharlist" :named("pasttype"), $P1468 :named("node")) - store_lex "$past", $P1469 + set $P1427, $P1426[$I1425] + unless_null $P1427, vivify_324 + new $P1427, "Undef" + vivify_324: + $P1428 = $P1427."ast"() + store_lex "$ast", $P1428 +.annotate "line", 418 + find_lex $P1430, "$ast" + $P1431 = $P1430."negate"() + if $P1431, if_1429 .annotate "line", 423 - goto if_1418_end - if_1418: + get_hll_global $P1438, ["PAST"], "Regex" + find_lex $P1439, "$past" + find_lex $P1440, "$ast" + find_lex $P1441, "$/" + $P1442 = $P1438."new"($P1439, $P1440, "alt" :named("pasttype"), $P1441 :named("node")) + store_lex "$past", $P1442 +.annotate "line", 422 + goto if_1429_end + if_1429: +.annotate "line", 419 + find_lex $P1432, "$ast" + $P1432."subtype"("zerowidth") .annotate "line", 420 - .const 'Sub' $P1422 = "84_1258208097.30665" - capture_lex $P1422 - $P1422() - if_1418_end: -.annotate "line", 451 - find_lex $P1470, "$past" - find_lex $P1471, "$/" - unless_null $P1471, vivify_336 - new $P1471, "Hash" - vivify_336: - set $P1472, $P1471["sign"] - unless_null $P1472, vivify_337 - new $P1472, "Undef" - vivify_337: - set $S1473, $P1472 - iseq $I1474, $S1473, "-" - $P1470."negate"($I1474) -.annotate "line", 452 - find_lex $P1475, "$/" - find_lex $P1476, "$past" - $P1477 = $P1475."!make"($P1476) -.annotate "line", 417 - .return ($P1477) - control_1411: - .local pmc exception - .get_results (exception) - getattribute $P1478, exception, "payload" - .return ($P1478) - rethrow exception + get_hll_global $P1433, ["PAST"], "Regex" + find_lex $P1434, "$ast" + find_lex $P1435, "$past" + find_lex $P1436, "$/" + $P1437 = $P1433."new"($P1434, $P1435, "concat" :named("pasttype"), $P1436 :named("node")) + store_lex "$past", $P1437 + if_1429_end: +.annotate "line", 425 + find_lex $P1443, "$i" + add $P1444, $P1443, 1 + store_lex "$i", $P1444 +.annotate "line", 416 + .return ($P1444) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block1437" :anon :subid("85_1258208097.30665") :outer("83_1258208097.30665") - .param pmc param_1439 -.annotate "line", 424 - .const 'Sub' $P1445 = "86_1258208097.30665" - capture_lex $P1445 - .lex "$_", param_1439 -.annotate "line", 425 - find_lex $P1442, "$_" - unless_null $P1442, vivify_325 - new $P1442, "ResizablePMCArray" +.sub "cclass_elem" :subid("84_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1455 +.annotate "line", 430 + .const 'Sub' $P1480 = "86_1258264434.22101" + capture_lex $P1480 + .const 'Sub' $P1464 = "85_1258264434.22101" + capture_lex $P1464 + new $P1454, 'ExceptionHandler' + set_addr $P1454, control_1453 + $P1454."handle_types"(58) + push_eh $P1454 + .lex "self", self + .lex "$/", param_1455 +.annotate "line", 431 + new $P1456, "Undef" + .lex "$str", $P1456 +.annotate "line", 432 + new $P1457, "Undef" + .lex "$past", $P1457 +.annotate "line", 431 + new $P1458, "String" + assign $P1458, "" + store_lex "$str", $P1458 + find_lex $P1459, "$past" +.annotate "line", 433 + find_lex $P1461, "$/" + unless_null $P1461, vivify_325 + new $P1461, "Hash" vivify_325: - set $P1443, $P1442[1] - unless_null $P1443, vivify_326 - new $P1443, "Undef" + set $P1462, $P1461["name"] + unless_null $P1462, vivify_326 + new $P1462, "Undef" vivify_326: - if $P1443, if_1441 -.annotate "line", 447 - find_lex $P1459, "$str" - find_lex $P1460, "$_" - unless_null $P1460, vivify_327 - new $P1460, "ResizablePMCArray" + if $P1462, if_1460 +.annotate "line", 437 + find_lex $P1475, "$/" + unless_null $P1475, vivify_327 + new $P1475, "Hash" vivify_327: - set $P1461, $P1460[0] - unless_null $P1461, vivify_328 - new $P1461, "Undef" + set $P1476, $P1475["charspec"] + unless_null $P1476, vivify_328 + new $P1476, "Undef" vivify_328: - concat $P1462, $P1459, $P1461 - store_lex "$str", $P1462 - set $P1440, $P1462 -.annotate "line", 425 - goto if_1441_end - if_1441: - .const 'Sub' $P1445 = "86_1258208097.30665" - capture_lex $P1445 - $P1458 = $P1445() - set $P1440, $P1458 - if_1441_end: -.annotate "line", 424 - .return ($P1440) + defined $I1477, $P1476 + unless $I1477, for_undef_329 + iter $P1474, $P1476 + new $P1506, 'ExceptionHandler' + set_addr $P1506, loop1505_handler + $P1506."handle_types"(65, 67, 66) + push_eh $P1506 + loop1505_test: + unless $P1474, loop1505_done + shift $P1478, $P1474 + loop1505_redo: + .const 'Sub' $P1480 = "86_1258264434.22101" + capture_lex $P1480 + $P1480($P1478) + loop1505_next: + goto loop1505_test + loop1505_handler: + .local pmc exception + .get_results (exception) + getattribute $P1507, exception, 'type' + eq $P1507, 65, loop1505_next + eq $P1507, 67, loop1505_redo + loop1505_done: + pop_eh + for_undef_329: +.annotate "line", 462 + get_hll_global $P1508, ["PAST"], "Regex" + find_lex $P1509, "$str" + find_lex $P1510, "$/" + $P1511 = $P1508."new"($P1509, "enumcharlist" :named("pasttype"), $P1510 :named("node")) + store_lex "$past", $P1511 +.annotate "line", 436 + goto if_1460_end + if_1460: +.annotate "line", 433 + .const 'Sub' $P1464 = "85_1258264434.22101" + capture_lex $P1464 + $P1464() + if_1460_end: +.annotate "line", 464 + find_lex $P1512, "$past" + find_lex $P1513, "$/" + unless_null $P1513, vivify_341 + new $P1513, "Hash" + vivify_341: + set $P1514, $P1513["sign"] + unless_null $P1514, vivify_342 + new $P1514, "Undef" + vivify_342: + set $S1515, $P1514 + iseq $I1516, $S1515, "-" + $P1512."negate"($I1516) +.annotate "line", 465 + find_lex $P1517, "$/" + find_lex $P1518, "$past" + $P1519 = $P1517."!make"($P1518) +.annotate "line", 430 + .return ($P1519) + control_1453: + .local pmc exception + .get_results (exception) + getattribute $P1520, exception, "payload" + .return ($P1520) + rethrow exception .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block1444" :anon :subid("86_1258208097.30665") :outer("85_1258208097.30665") -.annotate "line", 426 - new $P1446, "Undef" - .lex "$a", $P1446 -.annotate "line", 427 - new $P1447, "Undef" - .lex "$b", $P1447 -.annotate "line", 428 - new $P1448, "Undef" - .lex "$c", $P1448 -.annotate "line", 426 - find_lex $P1449, "$_" - unless_null $P1449, vivify_329 - new $P1449, "ResizablePMCArray" - vivify_329: - set $P1450, $P1449[0] - unless_null $P1450, vivify_330 - new $P1450, "Undef" +.sub "_block1479" :anon :subid("86_1258264434.22101") :outer("84_1258264434.22101") + .param pmc param_1481 +.annotate "line", 437 + .const 'Sub' $P1487 = "87_1258264434.22101" + capture_lex $P1487 + .lex "$_", param_1481 +.annotate "line", 438 + find_lex $P1484, "$_" + unless_null $P1484, vivify_330 + new $P1484, "ResizablePMCArray" vivify_330: - store_lex "$a", $P1450 -.annotate "line", 427 - find_lex $P1451, "$_" - unless_null $P1451, vivify_331 - new $P1451, "ResizablePMCArray" + set $P1485, $P1484[1] + unless_null $P1485, vivify_331 + new $P1485, "Undef" vivify_331: - set $P1452, $P1451[1] - unless_null $P1452, vivify_332 - new $P1452, "ResizablePMCArray" + if $P1485, if_1483 +.annotate "line", 460 + find_lex $P1501, "$str" + find_lex $P1502, "$_" + unless_null $P1502, vivify_332 + new $P1502, "ResizablePMCArray" vivify_332: - set $P1453, $P1452[0] - unless_null $P1453, vivify_333 - new $P1453, "Undef" + set $P1503, $P1502[0] + unless_null $P1503, vivify_333 + new $P1503, "Undef" vivify_333: - store_lex "$b", $P1453 -.annotate "line", 428 + concat $P1504, $P1501, $P1503 + store_lex "$str", $P1504 + set $P1482, $P1504 +.annotate "line", 438 + goto if_1483_end + if_1483: + .const 'Sub' $P1487 = "87_1258264434.22101" + capture_lex $P1487 + $P1500 = $P1487() + set $P1482, $P1500 + if_1483_end: +.annotate "line", 437 + .return ($P1482) +.end + + +.namespace ["Regex";"P6Regex";"Actions"] +.sub "_block1486" :anon :subid("87_1258264434.22101") :outer("86_1258264434.22101") +.annotate "line", 439 + new $P1488, "Undef" + .lex "$a", $P1488 +.annotate "line", 440 + new $P1489, "Undef" + .lex "$b", $P1489 +.annotate "line", 441 + new $P1490, "Undef" + .lex "$c", $P1490 +.annotate "line", 439 + find_lex $P1491, "$_" + unless_null $P1491, vivify_334 + new $P1491, "ResizablePMCArray" + vivify_334: + set $P1492, $P1491[0] + unless_null $P1492, vivify_335 + new $P1492, "Undef" + vivify_335: + store_lex "$a", $P1492 +.annotate "line", 440 + find_lex $P1493, "$_" + unless_null $P1493, vivify_336 + new $P1493, "ResizablePMCArray" + vivify_336: + set $P1494, $P1493[1] + unless_null $P1494, vivify_337 + new $P1494, "ResizablePMCArray" + vivify_337: + set $P1495, $P1494[0] + unless_null $P1495, vivify_338 + new $P1495, "Undef" + vivify_338: + store_lex "$b", $P1495 +.annotate "line", 441 $P0 = find_lex '$a' $S0 = $P0 @@ -10795,142 +10900,142 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes inc $I0 goto cclass_loop cclass_done: - $P1454 = box $S2 + $P1496 = box $S2 - store_lex "$c", $P1454 -.annotate "line", 445 - find_lex $P1455, "$str" - find_lex $P1456, "$c" - concat $P1457, $P1455, $P1456 - store_lex "$str", $P1457 -.annotate "line", 425 - .return ($P1457) + store_lex "$c", $P1496 +.annotate "line", 458 + find_lex $P1497, "$str" + find_lex $P1498, "$c" + concat $P1499, $P1497, $P1498 + store_lex "$str", $P1499 +.annotate "line", 438 + .return ($P1499) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "_block1421" :anon :subid("84_1258208097.30665") :outer("83_1258208097.30665") -.annotate "line", 421 - new $P1423, "Undef" - .lex "$name", $P1423 - find_lex $P1424, "$/" - unless_null $P1424, vivify_334 - new $P1424, "Hash" - vivify_334: - set $P1425, $P1424["name"] - unless_null $P1425, vivify_335 - new $P1425, "Undef" - vivify_335: - set $S1426, $P1425 - new $P1427, 'String' - set $P1427, $S1426 - store_lex "$name", $P1427 -.annotate "line", 422 - get_hll_global $P1428, ["PAST"], "Regex" - find_lex $P1429, "$name" - find_lex $P1430, "$/" - $P1431 = $P1428."new"($P1429, "subrule" :named("pasttype"), "method" :named("subtype"), $P1430 :named("node")) - store_lex "$past", $P1431 -.annotate "line", 420 - .return ($P1431) +.sub "_block1463" :anon :subid("85_1258264434.22101") :outer("84_1258264434.22101") +.annotate "line", 434 + new $P1465, "Undef" + .lex "$name", $P1465 + find_lex $P1466, "$/" + unless_null $P1466, vivify_339 + new $P1466, "Hash" + vivify_339: + set $P1467, $P1466["name"] + unless_null $P1467, vivify_340 + new $P1467, "Undef" + vivify_340: + set $S1468, $P1467 + new $P1469, 'String' + set $P1469, $S1468 + store_lex "$name", $P1469 +.annotate "line", 435 + get_hll_global $P1470, ["PAST"], "Regex" + find_lex $P1471, "$name" + find_lex $P1472, "$/" + $P1473 = $P1470."new"($P1471, "subrule" :named("pasttype"), "method" :named("subtype"), $P1472 :named("node")) + store_lex "$past", $P1473 +.annotate "line", 433 + .return ($P1473) .end .namespace ["Regex";"P6Regex";"Actions"] -.sub "mod_internal" :subid("87_1258208097.30665") :method :outer("11_1258208097.30665") - .param pmc param_1482 -.annotate "line", 455 - new $P1481, 'ExceptionHandler' - set_addr $P1481, control_1480 - $P1481."handle_types"(58) - push_eh $P1481 +.sub "mod_internal" :subid("88_1258264434.22101") :method :outer("11_1258264434.22101") + .param pmc param_1524 +.annotate "line", 468 + new $P1523, 'ExceptionHandler' + set_addr $P1523, control_1522 + $P1523."handle_types"(58) + push_eh $P1523 .lex "self", self - .lex "$/", param_1482 -.annotate "line", 456 - new $P1483, "Hash" - .lex "%mods", $P1483 -.annotate "line", 457 - new $P1484, "Undef" - .lex "$n", $P1484 -.annotate "line", 456 - get_global $P1485, "@MODIFIERS" - unless_null $P1485, vivify_338 - new $P1485, "ResizablePMCArray" - vivify_338: - set $P1486, $P1485[0] - unless_null $P1486, vivify_339 - new $P1486, "Undef" - vivify_339: - store_lex "%mods", $P1486 -.annotate "line", 457 - find_lex $P1489, "$/" - unless_null $P1489, vivify_340 - new $P1489, "Hash" - vivify_340: - set $P1490, $P1489["n"] - unless_null $P1490, vivify_341 - new $P1490, "ResizablePMCArray" - vivify_341: - set $P1491, $P1490[0] - unless_null $P1491, vivify_342 - new $P1491, "Undef" - vivify_342: - set $S1492, $P1491 - isgt $I1493, $S1492, "" - if $I1493, if_1488 - new $P1498, "Integer" - assign $P1498, 1 - set $P1487, $P1498 - goto if_1488_end - if_1488: - find_lex $P1494, "$/" - unless_null $P1494, vivify_343 - new $P1494, "Hash" + .lex "$/", param_1524 +.annotate "line", 469 + new $P1525, "Hash" + .lex "%mods", $P1525 +.annotate "line", 470 + new $P1526, "Undef" + .lex "$n", $P1526 +.annotate "line", 469 + get_global $P1527, "@MODIFIERS" + unless_null $P1527, vivify_343 + new $P1527, "ResizablePMCArray" vivify_343: - set $P1495, $P1494["n"] - unless_null $P1495, vivify_344 - new $P1495, "ResizablePMCArray" + set $P1528, $P1527[0] + unless_null $P1528, vivify_344 + new $P1528, "Undef" vivify_344: - set $P1496, $P1495[0] - unless_null $P1496, vivify_345 - new $P1496, "Undef" + store_lex "%mods", $P1528 +.annotate "line", 470 + find_lex $P1531, "$/" + unless_null $P1531, vivify_345 + new $P1531, "Hash" vivify_345: - set $N1497, $P1496 - new $P1487, 'Float' - set $P1487, $N1497 - if_1488_end: - store_lex "$n", $P1487 -.annotate "line", 458 - find_lex $P1499, "$n" - find_lex $P1500, "$/" - unless_null $P1500, vivify_346 - new $P1500, "Hash" + set $P1532, $P1531["n"] + unless_null $P1532, vivify_346 + new $P1532, "ResizablePMCArray" vivify_346: - set $P1501, $P1500["mod_ident"] - unless_null $P1501, vivify_347 - new $P1501, "Hash" + set $P1533, $P1532[0] + unless_null $P1533, vivify_347 + new $P1533, "Undef" vivify_347: - set $P1502, $P1501["sym"] - unless_null $P1502, vivify_348 - new $P1502, "Undef" + set $S1534, $P1533 + isgt $I1535, $S1534, "" + if $I1535, if_1530 + new $P1540, "Integer" + assign $P1540, 1 + set $P1529, $P1540 + goto if_1530_end + if_1530: + find_lex $P1536, "$/" + unless_null $P1536, vivify_348 + new $P1536, "Hash" vivify_348: - set $S1503, $P1502 - find_lex $P1504, "%mods" - unless_null $P1504, vivify_349 - new $P1504, "Hash" - store_lex "%mods", $P1504 + set $P1537, $P1536["n"] + unless_null $P1537, vivify_349 + new $P1537, "ResizablePMCArray" vivify_349: - set $P1504[$S1503], $P1499 -.annotate "line", 459 - find_lex $P1505, "$/" - $P1506 = $P1505."!make"(0) -.annotate "line", 455 - .return ($P1506) - control_1480: + set $P1538, $P1537[0] + unless_null $P1538, vivify_350 + new $P1538, "Undef" + vivify_350: + set $N1539, $P1538 + new $P1529, 'Float' + set $P1529, $N1539 + if_1530_end: + store_lex "$n", $P1529 +.annotate "line", 471 + find_lex $P1541, "$n" + find_lex $P1542, "$/" + unless_null $P1542, vivify_351 + new $P1542, "Hash" + vivify_351: + set $P1543, $P1542["mod_ident"] + unless_null $P1543, vivify_352 + new $P1543, "Hash" + vivify_352: + set $P1544, $P1543["sym"] + unless_null $P1544, vivify_353 + new $P1544, "Undef" + vivify_353: + set $S1545, $P1544 + find_lex $P1546, "%mods" + unless_null $P1546, vivify_354 + new $P1546, "Hash" + store_lex "%mods", $P1546 + vivify_354: + set $P1546[$S1545], $P1541 +.annotate "line", 472 + find_lex $P1547, "$/" + $P1548 = $P1547."!make"(0) +.annotate "line", 468 + .return ($P1548) + control_1522: .local pmc exception .get_results (exception) - getattribute $P1507, exception, "payload" - .return ($P1507) + getattribute $P1549, exception, "payload" + .return ($P1549) rethrow exception .end @@ -10961,8 +11066,6 @@ Regex::P6Regex - Parser/compiler for Perl 6 regexes .end -=cut - # Local Variables: # mode: pir # fill-column: 100 diff --git a/src/stage0/Regex-s0.pir b/src/stage0/Regex-s0.pir index 3d7a0b5..bf5423a 100644 --- a/src/stage0/Regex-s0.pir +++ b/src/stage0/Regex-s0.pir @@ -2778,26 +2778,37 @@ second child of this node. .local int litconst lpast = node[0] litconst = isa lpast, ['String'] - unless litconst goto lpast_done + if litconst goto lpast_string + litconst = isa lpast, ['PAST';'Val'] + if litconst goto lpast_val + lpast_expr: + lpost = self.'as_post'(lpast, 'rtype'=>'~') unless ignorecase goto lpast_done + $S0 = lpost.'result'() + lpost.'push_pirop'('downcase', $S0, $S0) + goto lpast_done + lpast_val: + $S0 = lpast.'value'() + lpast = box $S0 + lpast_string: + unless ignorecase goto lpast_const $S0 = lpast $S0 = downcase $S0 lpast = box $S0 - lpast_done: + lpast_const: lpost = self.'as_post'(lpast, 'rtype'=>'~') + lpast_done: $S0 = lpost.'result'() ops.'push_pirop'('inline', subtype, $S0, 'inline'=>' # rx literal %0 %1') ops.'push'(lpost) - # compute constant literal length at compile time - .local string litlen - $I0 = isa lpast, ['String'] - if $I0 goto literal_string + .local int litlen + if litconst goto litlen_const litlen = '$I10' ops.'push_pirop'('length', '$I10', lpost) goto have_litlen - literal_string: + litlen_const: $S0 = lpast $I0 = length $S0 litlen = $I0