Author: chromatic
Date: Fri Jun 1 21:13:29 2007
New Revision: 18758
Modified:
trunk/t/pmc/threads.t
Log:
[t] Fix a warning in the threads tests when running with the default core.
Modified: trunk/t/pmc/threads.t
==============================================================================
--- trunk/t/pmc/threads.t (original)
+++ trunk/t/pmc/threads.t Fri Jun 1 21:13:29 2007
@@ -805,8 +805,11 @@
OUTPUT
my @todo;
[EMAIL PROTECTED] = ( todo => 'Broken with CGP' ) if $ENV{TEST_PROG_ARGS} =~
/-C/;
[EMAIL PROTECTED] = ( todo => 'Broken with JIT' ) if $ENV{TEST_PROG_ARGS} =~
/-j/;
+
+if ($ENV{TEST_PROG_ARGS}) {
+ push @todo, ( todo => 'Broken with CGP' ) if $ENV{TEST_PROG_ARGS} =~ /-C/;
+ push @todo, ( todo => 'Broken with JIT' ) if $ENV{TEST_PROG_ARGS} =~ /-j/;
+}
pir_output_unlike( <<'CODE', qr/not/, "globals + constant table subs issue",
@todo );
.namespace [ 'Foo' ]
