I'm currently writing few tests for PGE. So far I've found 2 failing tests: (with parrot_2004-12-16_160001.tar.gz)

p6rule_like('abcabbc', 'ab+?bc', qr/0: <abbc @ 3>/, '');
p6rule_like('abbcabbbc', 'ab+?', qr/0: <ab @ 0>/, '');


output from "perl t/harness mytests/*.t" is attached.


Larry mentioned 're_tests' file from perl5-source. Is anyone working on it currently? I could make a simple script to convert at least some of it to this pge-testing format which uses p6rule_*

mytests/capture....#     Failed test (lib/Parrot/Test/PGE.pm at line 73)
#                   'error:imcc:parse error, unexpected LABEL, expecting 
IDENTIFIER or PARROT_OP
# in file 'EVAL_1' line 136
# '
#     doesn't match '(?-xism:0: <abbc @ 3>)'
# '(cd . && ./parrot  
"/home/malaire/omat/downloads/parrot/mytests/capture_6.imc")' failed with exit 
code 17
#     Failed test (lib/Parrot/Test/PGE.pm at line 73)
#                   'error:imcc:parse error, unexpected LABEL, expecting 
IDENTIFIER or PARROT_OP
# in file 'EVAL_1' line 134
# '
#     doesn't match '(?-xism:0: <ab @ 0>)'
# '(cd . && ./parrot  
"/home/malaire/omat/downloads/parrot/mytests/capture_7.imc")' failed with exit 
code 17
# Looks like you failed 2 tests of 7.
dubious
        Test returned status 2 (wstat 512, 0x200)
Scalar found where operator expected at (eval 158) line 1, near "'int'  $__val"
        (Missing operator before   $__val?)
DIED. FAILED tests 6-7
        Failed 2/7 tests, 71.43% okay
Failed 1/1 test scripts, 0.00% okay. 2/7 subtests failed, 71.43% okay.
Failed Test       Stat Wstat Total Fail  Failed  List of Failed
-------------------------------------------------------------------------------
mytests/capture.t    2   512     7    2  28.57%  6-7

Reply via email to