Skip to content
This repository has been archived by the owner on Feb 3, 2021. It is now read-only.

Commit

Permalink
Browse files Browse the repository at this point in the history
Update stage-0 compilers.
  • Loading branch information
pmichaud committed Oct 18, 2009
1 parent 1e495f8 commit cafd369
Show file tree
Hide file tree
Showing 2 changed files with 466 additions and 466 deletions.
70 changes: 35 additions & 35 deletions src/stage0/P6Grammar-s0.pir
Expand Up @@ -17,28 +17,28 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
### .include 'src/gen/p6grammar-grammar.pir'

.namespace ["Regex";"P6Grammar";"Grammar"]
.sub "_block11" :subid("10_1255770776")
.sub "_block11" :subid("10_1255814466.59391")
.annotate "line", 0
.const 'Sub' $P41 = "15_1255770776"
.const 'Sub' $P41 = "15_1255814466.59391"
capture_lex $P41
.const 'Sub' $P28 = "14_1255770776"
.const 'Sub' $P28 = "14_1255814466.59391"
capture_lex $P28
.const 'Sub' $P22 = "13_1255770776"
.const 'Sub' $P22 = "13_1255814466.59391"
capture_lex $P22
.const 'Sub' $P18 = "12_1255770776"
.const 'Sub' $P18 = "12_1255814466.59391"
capture_lex $P18
.const 'Sub' $P13 = "11_1255770776"
.const 'Sub' $P13 = "11_1255814466.59391"
capture_lex $P13
.annotate "line", 21
.const 'Sub' $P41 = "15_1255770776"
.const 'Sub' $P41 = "15_1255814466.59391"
capture_lex $P41
.annotate "line", 1
.return ($P41)
.end


.namespace ["Regex";"P6Grammar";"Grammar"]
.sub "" :load :init :subid("post16") :outer("10_1255770776")
.sub "" :load :init :subid("post16") :outer("10_1255814466.59391")
.annotate "line", 0
get_hll_global $P12, ["Regex";"P6Grammar";"Grammar"], "_block11"
.local pmc block
Expand All @@ -50,7 +50,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Grammar"]
.sub "TOP" :subid("11_1255770776") :method :outer("10_1255770776")
.sub "TOP" :subid("11_1255814466.59391") :method :outer("10_1255814466.59391")
.annotate "line", 3
.local string rx14_tgt
.local int rx14_pos
Expand Down Expand Up @@ -123,7 +123,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Grammar"]
.sub "name" :subid("12_1255770776") :method :outer("10_1255770776")
.sub "name" :subid("12_1255814466.59391") :method :outer("10_1255814466.59391")
.annotate "line", 10
.local string rx19_tgt
.local int rx19_pos
Expand Down Expand Up @@ -176,7 +176,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Grammar"]
.sub "longname" :subid("13_1255770776") :method :outer("10_1255770776")
.sub "longname" :subid("13_1255814466.59391") :method :outer("10_1255814466.59391")
.annotate "line", 12
.local string rx23_tgt
.local int rx23_pos
Expand Down Expand Up @@ -251,7 +251,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Grammar"]
.sub "grammar_stmt" :subid("14_1255770776") :method :outer("10_1255770776")
.sub "grammar_stmt" :subid("14_1255814466.59391") :method :outer("10_1255814466.59391")
.annotate "line", 19
.local string rx29_tgt
.local int rx29_pos
Expand Down Expand Up @@ -379,7 +379,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Grammar"]
.sub "regex_stmt" :subid("15_1255770776") :method :outer("10_1255770776")
.sub "regex_stmt" :subid("15_1255814466.59391") :method :outer("10_1255814466.59391")
.annotate "line", 21
.local string rx42_tgt
.local int rx42_pos
Expand Down Expand Up @@ -530,7 +530,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
### .include 'src/gen/p6grammar-actions.pir'
.namespace []
.sub "_block11" :anon :subid("10_1255770772")
.sub "_block11" :anon :subid("10_1255814461.84204")
.annotate "line", 3
get_hll_global $P14, ["Regex";"P6Grammar";"Actions"], "_block13"
.annotate "line", 1
Expand All @@ -539,29 +539,29 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Actions"]
.sub "_block13" :init :load :subid("11_1255770772")
.sub "_block13" :init :load :subid("11_1255814461.84204")
.annotate "line", 3
.const 'Sub' $P83 = "15_1255770772"
.const 'Sub' $P83 = "15_1255814461.84204"
capture_lex $P83
.const 'Sub' $P44 = "14_1255770772"
.const 'Sub' $P44 = "14_1255814461.84204"
capture_lex $P44
.const 'Sub' $P16 = "12_1255770772"
.const 'Sub' $P16 = "12_1255814461.84204"
capture_lex $P16
get_hll_global $P15, "P6metaclass"
$P15 = get_root_global ["parrot"], "P6metaclass"
$P15."new_class"("Regex::P6Grammar::Actions", "Regex::P6Regex::Actions" :named("parent"))
.annotate "line", 30
.const 'Sub' $P83 = "15_1255770772"
.const 'Sub' $P83 = "15_1255814461.84204"
capture_lex $P83
.annotate "line", 3
.return ($P83)
.end
.namespace ["Regex";"P6Grammar";"Actions"]
.sub "TOP" :subid("12_1255770772") :method :outer("11_1255770772")
.sub "TOP" :subid("12_1255814461.84204") :method :outer("11_1255814461.84204")
.param pmc param_19
.annotate "line", 3
.const 'Sub' $P29 = "13_1255770772"
.const 'Sub' $P29 = "13_1255814461.84204"
capture_lex $P29
new $P18, 'ExceptionHandler'
set_addr $P18, control_17
Expand Down Expand Up @@ -594,7 +594,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
unless $P23, loop35_done
shift $P27, $P23
loop35_redo:
.const 'Sub' $P29 = "13_1255770772"
.const 'Sub' $P29 = "13_1255814461.84204"
capture_lex $P29
$P29($P27)
loop35_next:
Expand Down Expand Up @@ -637,7 +637,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Actions"]
.sub "_block28" :anon :subid("13_1255770772") :outer("12_1255770772")
.sub "_block28" :anon :subid("13_1255814461.84204") :outer("12_1255814461.84204")
.param pmc param_30
.annotate "line", 5
.lex "$_", param_30
Expand All @@ -658,7 +658,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Actions"]
.sub "grammar_stmt" :subid("14_1255770772") :method :outer("11_1255770772")
.sub "grammar_stmt" :subid("14_1255814461.84204") :method :outer("11_1255814461.84204")
.param pmc param_47
.annotate "line", 13
new $P46, 'ExceptionHandler'
Expand Down Expand Up @@ -772,12 +772,12 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Actions"]
.sub "regex_stmt" :subid("15_1255770772") :method :outer("11_1255770772")
.sub "regex_stmt" :subid("15_1255814461.84204") :method :outer("11_1255814461.84204")
.param pmc param_86
.param pmc param_87 :optional
.param int has_param_87 :opt_flag
.annotate "line", 30
.const 'Sub' $P95 = "16_1255770772"
.const 'Sub' $P95 = "16_1255814461.84204"
capture_lex $P95
new $P85, 'ExceptionHandler'
set_addr $P85, control_84
Expand All @@ -803,7 +803,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
set $S92, $P91
iseq $I93, $S92, "open"
unless $I93, if_90_end
.const 'Sub' $P95 = "16_1255770772"
.const 'Sub' $P95 = "16_1255814461.84204"
capture_lex $P95
$P95()
if_90_end:
Expand Down Expand Up @@ -893,11 +893,11 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Actions"]
.sub "_block94" :anon :subid("16_1255770772") :outer("15_1255770772")
.sub "_block94" :anon :subid("16_1255814461.84204") :outer("15_1255814461.84204")
.annotate "line", 34
.const 'Sub' $P112 = "18_1255770772"
.const 'Sub' $P112 = "18_1255814461.84204"
capture_lex $P112
.const 'Sub' $P103 = "17_1255770772"
.const 'Sub' $P103 = "17_1255814461.84204"
capture_lex $P103
.annotate "line", 35
new $P96, "Hash"
Expand All @@ -911,7 +911,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
set $S100, $P99
iseq $I101, $S100, "token"
unless $I101, if_97_end
.const 'Sub' $P103 = "17_1255770772"
.const 'Sub' $P103 = "17_1255814461.84204"
capture_lex $P103
$P103()
if_97_end:
Expand All @@ -924,7 +924,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
set $S109, $P108
iseq $I110, $S109, "rule"
unless $I110, if_106_end
.const 'Sub' $P112 = "18_1255770772"
.const 'Sub' $P112 = "18_1255814461.84204"
capture_lex $P112
$P112()
if_106_end:
Expand All @@ -951,7 +951,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Actions"]
.sub "_block102" :anon :subid("17_1255770772") :outer("16_1255770772")
.sub "_block102" :anon :subid("17_1255814461.84204") :outer("16_1255814461.84204")
.annotate "line", 36
new $P104, "Integer"
assign $P104, 1
Expand All @@ -966,7 +966,7 @@ Regex::P6Grammar - scaffolding compiler for NQP / Perl 6 grammars
.namespace ["Regex";"P6Grammar";"Actions"]
.sub "_block111" :anon :subid("18_1255770772") :outer("16_1255770772")
.sub "_block111" :anon :subid("18_1255814461.84204") :outer("16_1255814461.84204")
.annotate "line", 37
new $P113, "Integer"
assign $P113, 1
Expand Down

0 comments on commit cafd369

Please sign in to comment.