#772: [BUG] Duplicate identifier in PGE;Perl6Grammar.compile
----------------------+-----------------------------------------------------
Reporter: NotFound | Owner: pmichaud
Type: bug | Status: assigned
Priority: normal | Milestone:
Component: none | Version: 1.2.0
Severity: medium | Keywords:
Lang: | Patch:
Platform: |
----------------------+-----------------------------------------------------
Comment(by bacek):
Replying to [comment:1 pmichaud]:
Any objections against this patch?
{{{
diff --git a/runtime/parrot/library/PGE/Perl6Grammar.pir
b/runtime/parrot/library/PGE/Perl6Grammar.pir
index e6fe3f0..43d5c66 100644
--- a/runtime/parrot/library/PGE/Perl6Grammar.pir
+++ b/runtime/parrot/library/PGE/Perl6Grammar.pir
@@ -140,9 +140,9 @@ the output to the correct output file.
.param pmc source
.param pmc adverbs :slurpy :named
- .local pmc nstable, namespace
+ .local pmc nstable, ns
nstable = new 'Hash'
- namespace = new 'String'
+ ns = new 'String'
$P0 = new 'Hash'
$P1 = new 'CodeString'
$P0['optable'] = $P1
@@ -165,7 +165,7 @@ the output to the correct output file.
$S0 = match['cmd']
concat $S0, '_stmt'
$P0 = find_name $S0
- $P0(match, namespace, nstable)
+ $P0(match, ns, nstable)
goto stmt_loop
stmt_end:
}}}
--
Bacek
--
Ticket URL: <https://trac.parrot.org/parrot/ticket/772#comment:2>
Parrot <https://trac.parrot.org/parrot/>
Parrot Development
_______________________________________________
parrot-tickets mailing list
[email protected]
http://lists.parrot.org/mailman/listinfo/parrot-tickets
