--- Coro/t/11_deadlock.t	2007/04/13 12:56:55	1.2
+++ Coro/t/11_deadlock.t	2008/11/24 06:48:38	1.3
@@ -1,3 +1,12 @@
+BEGIN {
+   if ($^O =~ /mswin32/i) {
+      print <<EOF;
+1..0 # Perl binary broken, skipping test. Upgrading to a working perl is advised.
+EOF
+      exit 0;
+   }
+}
+
 BEGIN { $| = 1; print "1..5\n"; }
 
 use Coro;