[svn:parrot] r43526 - branches/tt389_fix/t/compilers/pge
tene at svn.parrot.org
tene at svn.parrot.org
Thu Jan 21 07:39:45 UTC 2010
Author: tene
Date: Thu Jan 21 07:39:44 2010
New Revision: 43526
URL: https://trac.parrot.org/parrot/changeset/43526
Log:
[pge] Fix another test
Modified:
branches/tt389_fix/t/compilers/pge/06-grammar.t
Modified: branches/tt389_fix/t/compilers/pge/06-grammar.t
==============================================================================
--- branches/tt389_fix/t/compilers/pge/06-grammar.t Thu Jan 21 07:34:44 2010 (r43525)
+++ branches/tt389_fix/t/compilers/pge/06-grammar.t Thu Jan 21 07:39:44 2010 (r43526)
@@ -150,7 +150,7 @@
.local string target
target = shift targets
- ok = '_match_expr'( parser, target )
+ ok = '_match_expr'( parser, target, test_name )
test.'ok'( ok, description )
$I0 = targets
if $I0 goto next_target
@@ -173,6 +173,7 @@
.sub '_match_expr'
.param pmc parser
.param string expr
+ .param string grammar
.local int ok
.local string result, test_name, test_num_str
@@ -183,7 +184,7 @@
load_bytecode 'PGE/Perl6Grammar.pbc'
ok = 1
- match = parser(expr)
+ match = parser(expr, 'grammar' => grammar)
result = match
if result == expr goto match_ok
More information about the parrot-commits
mailing list