Author: particle
Date: Mon Mar 13 11:54:14 2006
New Revision: 11890

Modified:
   trunk/t/src/basic.t
   trunk/t/src/compiler.t
   trunk/t/src/exit.t
   trunk/t/src/extend.t
   trunk/t/src/hash.t
   trunk/t/src/intlist.t
   trunk/t/src/io.t
   trunk/t/src/list.t
   trunk/t/src/sprintf.t
   trunk/t/src/string.t

Log:
t: skip failing t/src/ tests on win32 until Parrot::Test is fixed

Modified: trunk/t/src/basic.t
==============================================================================
--- trunk/t/src/basic.t (original)
+++ trunk/t/src/basic.t Mon Mar 13 11:54:14 2006
@@ -6,8 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 3;
+use Parrot::Test;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 3);
 
 =head1 NAME
 

Modified: trunk/t/src/compiler.t
==============================================================================
--- trunk/t/src/compiler.t      (original)
+++ trunk/t/src/compiler.t      Mon Mar 13 11:54:14 2006
@@ -6,8 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 1;
+use Parrot::Test;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 1);
 
 =head1 NAME
 

Modified: trunk/t/src/exit.t
==============================================================================
--- trunk/t/src/exit.t  (original)
+++ trunk/t/src/exit.t  Mon Mar 13 11:54:14 2006
@@ -6,8 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 3;
+use Parrot::Test;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 3);
 
 =head1 NAME
 

Modified: trunk/t/src/extend.t
==============================================================================
--- trunk/t/src/extend.t        (original)
+++ trunk/t/src/extend.t        Mon Mar 13 11:54:14 2006
@@ -6,9 +6,10 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 13;
+use Parrot::Test;
 use Parrot::Config;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 13);
 
 =head1 NAME
 

Modified: trunk/t/src/hash.t
==============================================================================
--- trunk/t/src/hash.t  (original)
+++ trunk/t/src/hash.t  Mon Mar 13 11:54:14 2006
@@ -6,8 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 11;
+use Parrot::Test;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 11);
 
 =head1 NAME
 

Modified: trunk/t/src/intlist.t
==============================================================================
--- trunk/t/src/intlist.t       (original)
+++ trunk/t/src/intlist.t       Mon Mar 13 11:54:14 2006
@@ -6,8 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 4;
+use Parrot::Test;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 4);
 
 =head1 NAME
 

Modified: trunk/t/src/io.t
==============================================================================
--- trunk/t/src/io.t    (original)
+++ trunk/t/src/io.t    Mon Mar 13 11:54:14 2006
@@ -6,8 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 20;
+use Parrot::Test;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 20);
 
 =head1 NAME
 

Modified: trunk/t/src/list.t
==============================================================================
--- trunk/t/src/list.t  (original)
+++ trunk/t/src/list.t  Mon Mar 13 11:54:14 2006
@@ -6,8 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 2;
+use Parrot::Test;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 2);
 
 =head1 NAME
 

Modified: trunk/t/src/sprintf.t
==============================================================================
--- trunk/t/src/sprintf.t       (original)
+++ trunk/t/src/sprintf.t       Mon Mar 13 11:54:14 2006
@@ -6,8 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 3;
+use Parrot::Test;
 
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 3);
 
 =head1 NAME
 

Modified: trunk/t/src/string.t
==============================================================================
--- trunk/t/src/string.t        (original)
+++ trunk/t/src/string.t        Mon Mar 13 11:54:14 2006
@@ -6,7 +6,9 @@
 use warnings;
 use lib qw( . lib ../lib ../../lib );
 use Test::More;
-use Parrot::Test tests => 1;
+use Parrot::Test;
+
+plan $^O =~ m/MSWin32/ ? (skip_all => 'broken on win32') : (tests => 1);
 
 
 =head1 NAME

Reply via email to