# 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"