On Sun, 13 Oct 2002, Steve Fink wrote:
[Discussion snipped] > Yes, I get this also. I was trying to figure out how to properly use > TODO or SKIP or something to suppress this, but none of them worked > quite right -- it would say that the failed test was a TODO, but it > still counted it as a failure. Locally, I am using the following > (incorrect) patch. Could someone who understands this better do it the > right way? Your problem was probably forgetting to use Test::More (which defines skip). In any case, the enclosed patch should do the trick. Simon --- t/op/interp.t.old Sun Oct 13 20:48:36 2002 +++ t/op/interp.t Sun Oct 13 20:50:53 2002 @@ -1,6 +1,7 @@ #! perl -w use Parrot::Test tests => 2; +use Test::More; output_is(<<'CODE', <<'OUTPUT', "runinterp"); newinterp P0, 0 @@ -18,6 +19,7 @@ In 2 ending OUTPUT +SKIP: { skip("Doesn't work with JIT enabled", 1); output_like(<<'CODE', <<'OUTPUT', "restart trace"); print 2, "ok 1\n" set I0, 1 @@ -35,5 +37,6 @@ ok\s2\n (?:PC=13.*)?\n ok\s3\n$/x OUTPUT +} 1;