summaryrefslogtreecommitdiff
path: root/t/04_channel_threads.t
diff options
context:
space:
mode:
authorgregor herrmann <gregoa@debian.org>2023-01-07 20:23:40 +0100
committergregor herrmann <gregoa@debian.org>2023-01-07 20:23:40 +0100
commit0f536969c36e194c8c87ea00d1951b8836f3e5cb (patch)
tree4c897018026c2c7aa6aff7039e473adace527084 /t/04_channel_threads.t
parente1a71380b1da4644ee5e51fc68ac583eb3980bde (diff)
parentdde6cb55cfe5be3276ef6ad97ea0c1e213c28517 (diff)
Update upstream source from tag 'upstream/1.884'
Update to upstream version '1.884' with Debian dir a6f0cfb35883d24406531f75d958ce2e6b8e07c2
Diffstat (limited to 't/04_channel_threads.t')
-rw-r--r--t/04_channel_threads.t3
1 files changed, 3 insertions, 0 deletions
diff --git a/t/04_channel_threads.t b/t/04_channel_threads.t
index 46f9397..4622ae4 100644
--- a/t/04_channel_threads.t
+++ b/t/04_channel_threads.t
@@ -59,6 +59,7 @@ is $chnl->impl(), 'Threads', 'implementation name';
}
# send recv_nb
+if ($^O ne 'MSWin32')
{
$chnl->send('a string');
is $chnl->recv_nb, 'a string', 'send recv_nb scalar';
@@ -95,6 +96,7 @@ is $chnl->impl(), 'Threads', 'implementation name';
}
# send2 recv2_nb
+if ($^O ne 'MSWin32')
{
$chnl->send2('a string');
is $chnl->recv2_nb, 'a string', 'send2 recv2_nb scalar';
@@ -137,6 +139,7 @@ is $chnl->impl(), 'Threads', 'implementation name';
}
# enqueue dequeue_nb
+if ($^O ne 'MSWin32')
{
$chnl->enqueue('a string');
is $chnl->dequeue_nb, 'a string', 'enqueue dequeue_nb scalar';