Fix CBuilder test that has been failing on Win32
Steve Hay [Thu, 21 Feb 2008 13:38:57 +0000 (13:38 +0000)]
since the upgrade at #33263

p4raw-id: //depot/perl@33339

lib/ExtUtils/CBuilder.pm
lib/ExtUtils/CBuilder/t/01-basic.t

index 077fecd..209200d 100644 (file)
@@ -5,7 +5,7 @@ use File::Path ();
 use File::Basename ();
 
 use vars qw($VERSION @ISA);
-$VERSION = '0.22';
+$VERSION = '0.22_01';
 $VERSION = eval $VERSION;
 
 # Okay, this is the brute-force method of finding out what kind of
index 9f14e8f..869350e 100644 (file)
@@ -53,6 +53,13 @@ for ($source_file, $object_file, $lib_file) {
 }
 
 my @words = $b->split_like_shell(' foo bar');
-ok @words, 2;
-ok $words[0], 'foo';
-ok $words[1], 'bar';
+if ($^O eq 'MSWin32') {
+  ok @words, 1;
+  ok $words[0], ' foo bar';
+  skip 'No splitting in split_like_shell() on Win32';
+}
+else {
+  ok @words, 2;
+  ok $words[0], 'foo';
+  ok $words[1], 'bar';
+}