# New Ticket Created by  jerry gay 
# Please include the string:  [perl #35305]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=35305 >


the 'detatch' threads test hangs on win32. this small patch skips one
test, so others may fail :)

~jerry


Index: t/pmc/threads.t

===================================================================

--- t/pmc/threads.t     (revision 7994)

+++ t/pmc/threads.t     (working copy)

@@ -263,6 +263,8 @@

 500500
 OUTPUT
 
+SKIP: {
+  skip("detach broken on $^O", 1) if ($^O =~ /MSWin32/);
 output_like(<<'CODE', <<'OUTPUT', "detach");
     find_global P5, "_foo"
     new P2, .ParrotThread
@@ -290,6 +292,7 @@

 CODE
 /(done\nthread\n)|(thread\ndone\n)/
 OUTPUT
+}
 
 output_is(<<'CODE', <<'OUTPUT', "share a PMC");
     find_global P5, "_foo"

Reply via email to