From 21be065ddf74d97cd400c7cc9df5ddfa436c00d7 Mon Sep 17 00:00:00 2001
From: "Barton E. Schaefer" <schaefer@zsh.org>
Date: Sat, 21 Dec 2013 12:53:59 -0800
Subject: 32172: regression test for 32171

---
 Test/A05execution.ztst | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'Test')

diff --git a/Test/A05execution.ztst b/Test/A05execution.ztst
index c8320a14d..61d24fe1e 100644
--- a/Test/A05execution.ztst
+++ b/Test/A05execution.ztst
@@ -202,3 +202,15 @@ F:the bug is still there or it reappeared. See workers-29973 for details.
 0:Check $pipestatus with a known difficult case
 >1 0 1 0 0
 F:This similar test was triggering a reproducible failure with pipestatus.
+
+  { unsetopt MONITOR } 2>/dev/null
+  coproc { read -Et 5 || kill -INT $$ }
+  print -u $ZTST_fd 'This test takes 5 seconds to fail...'
+  { printf "%d\n" {1..20000} } | ( read -E )
+  print -p done
+  read -Ep
+0:Bug regression: piping a shell construct to an external process may hang
+>1
+>done
+F:This test checks for a file descriptor leak that could cause the left
+F:side of a pipe to block on write after the right side has exited
-- 
cgit 1.4.1