[svn:parrot] r42549 - trunk/t/pmc
mikehh at svn.parrot.org
mikehh at svn.parrot.org
Tue Nov 17 12:09:27 UTC 2009
Author: mikehh
Date: Tue Nov 17 12:09:26 2009
New Revision: 42549
URL: https://trac.parrot.org/parrot/changeset/42549
Log:
fix test so it only sets TODO for testr on amd64 with cc-gcc and not g++
Modified:
trunk/t/pmc/eval.t
Modified: trunk/t/pmc/eval.t
==============================================================================
--- trunk/t/pmc/eval.t Tue Nov 17 12:03:28 2009 (r42548)
+++ trunk/t/pmc/eval.t Tue Nov 17 12:09:26 2009 (r42549)
@@ -10,6 +10,7 @@
use Parrot::Test::Util 'create_tempfile';
use Parrot::Test tests => 17;
+use Parrot::Config;
=head1 NAME
@@ -316,9 +317,9 @@
2 1 1 1
OUTPUT
-(my $fh, $temp_pbc) = create_tempfile( SUFFIX => '.pbc', UNLINK => 1 );
+(my $fh, $temp_pbc) = create_tempfile( SUFFIX => '.pbc', UNLINK => 1 );
close $fh;
-
+
pir_output_is( <<"CODE", <<'OUTPUT', "eval.get_string - same file" );
.sub main :main
.local pmc f1, f2
@@ -396,7 +397,8 @@
TODO: {
local $TODO = q|fails eval.thaw test in testr with Segmentation fault - TT #1142|
- if defined $ENV{TEST_PROG_ARGS} && $ENV{TEST_PROG_ARGS} =~ /--run-pbc/;
+ if (defined $ENV{TEST_PROG_ARGS} && $ENV{TEST_PROG_ARGS} =~ /--run-pbc/)
+ && ($PConfig{cpuarch} eq 'amd64' && $PConfig{cc} =~ /cc/);
pir_output_is( <<"CODE", <<'OUTPUT', "eval.thaw" );
.sub main :main
More information about the parrot-commits
mailing list