perl.cvs.parrot
[Top] [All Lists]

[svn:parrot] r29873 - trunk/t/steps

Subject: [svn:parrot] r29873 - trunk/t/steps
From: jkeenan@xxxxxxxxxxxx
Date: Wed, 30 Jul 2008 04:32:50 -0700 (PDT)
Newsgroups: perl.cvs.parrot

Author: jkeenan
Date: Wed Jul 30 04:32:48 2008
New Revision: 29873

Modified:
   trunk/t/steps/auto_warnings-01.t

Log:
Skip 39 tests if OS is Sun or Solaris.

Modified: trunk/t/steps/auto_warnings-01.t
==============================================================================
--- trunk/t/steps/auto_warnings-01.t    (original)
+++ trunk/t/steps/auto_warnings-01.t    Wed Jul 30 04:32:48 2008
@@ -5,7 +5,7 @@
 
 use strict;
 use warnings;
-use Test::More tests =>  56;
+use Test::More qw(no_plan); # tests =>  56;
 use Carp;
 use lib qw( lib t/configure/testlib );
 use_ok('config::init::defaults');
@@ -40,6 +40,11 @@
 my $serialized = $conf->pcfreeze();
 
 $conf->options->set( %{$args} );
+SKIP: {
+    skip 'Tests not yet passing on Sun/Solaris',
+    39
+    if $^O =~ m/sun|solaris/;
+
 my $step = test_step_constructor_and_description($conf);
 
 my %potential_warnings_seen;
@@ -49,7 +54,6 @@
 ok($potential_warnings_seen{'-std=c89'}, "Cage warning added");
 
 $conf->replenish($serialized);
-
 $conf->options->set( %{$args} );
 $step = test_step_constructor_and_description($conf);
 $conf->options->set(maintainer => 1);
@@ -139,6 +143,8 @@
     );
 }
 
+} # End SKIP block for Sun/Solaris
+
 pass("Completed all tests in $0");
 
 ################### DOCUMENTATION ###################

<Prev in Thread] Current Thread [Next in Thread>
  • [svn:parrot] r29873 - trunk/t/steps, jkeenan <=