Hi,

I am adding an additional pmc (Perl5LV), however a test fails

t/pmc/pmc...........NOK 75#     Failed test (t/pmc/pmc.t at line 1650)
#          got: 'Perl5LV PMCs have incorrect name ""
# '
#     expected: 'All names and ids ok.
# '
t/pmc/pmc...........ok 91/91# Looks like you failed 1 tests of 91.
t/pmc/pmc...........dubious
        Test returned status 1 (wstat 256, 0x100)
DIED. FAILED test 75
        Failed 1/91 tests, 98.90% okay

so this patch just ignores Perl5 types, (if someone knows why the test fails and how I can fix it, that would of course be even better :)

Arthur

diff -u -r1.59 pmc.t
--- t/pmc/pmc.t 9 Sep 2003 10:25:43 -0000       1.59
+++ t/pmc/pmc.t 10 Sep 2003 15:48:58 -0000
@@ -1629,6 +1629,7 @@
 while (my ($type, $id) = each %pmc_types) {
     next if $type eq "Iterator";
     next if $type eq "Ref";
+    next if $type =~ /^Perl5/; #ignore the perl5 pmcs
     my $set_ro = ($type =~ /^Const\w+/) ? <<EOPASM : '';
     new P10, .PerlInt
     inc P10



Reply via email to