| Subject: | alarm unsupported on Win32 |
The 'alarm' function is not correctly support on most implementations of Windows. As such the 29_downcopy.t and 29a_upcopy.t test scripts fail on Windows. The attached patch is a catch all and simply skips the tests, until there is a more acknowledge way of detecting whether 'alarm' is supported or not.
See my cpan-testers report for more details:
http://www.nntp.perl.org/group/perl.cpan.testers/119596
--- C:\wip\diffs\Tie-File\Tie-File-0.96/t/29_downcopy.t Mon Jan 17 18:04:23 2005
+++ C:\wip\diffs\Tie-File\Tie-File-0.96-barbie/t/29_downcopy.t Mon Jan 17 17:05:48 2005
@@ -12,6 +12,10 @@
my $file = "tf$$.txt";
+if ($^O =~ /^(MSWin32|dos)$/) {
+ print "1..0\n"; exit;
+}
+
print "1..718\n";
my $N = 1;
--- C:\wip\diffs\Tie-File\Tie-File-0.96/t/29a_upcopy.t Mon Jan 17 18:04:23 2005
+++ C:\wip\diffs\Tie-File\Tie-File-0.96-barbie/t/29a_upcopy.t Mon Jan 17 17:05:48 2005
@@ -12,6 +12,10 @@
my $file = "tf$$.txt";
+if ($^O =~ /^(MSWin32|dos)$/) {
+ print "1..0\n"; exit;
+}
+
print "1..55\n";
my $N = 1;