aboutsummaryrefslogtreecommitdiffstats
path: root/io.c
diff options
context:
space:
mode:
authorArnold D. Robbins <arnold@skeeve.com>2018-06-17 21:53:04 +0300
committerArnold D. Robbins <arnold@skeeve.com>2018-06-17 21:53:04 +0300
commit7f57d12c835729207aea12e22021efce1705e6a0 (patch)
treed218d51151c96bd671dd6797462ff9fa6d1ea362 /io.c
parent1e80e4d9f9bb3df825fe93e807f4045e1d07eac8 (diff)
parentedaf82c330629586b1158a3dec407d53084b02e3 (diff)
downloadegawk-7f57d12c835729207aea12e22021efce1705e6a0.tar.gz
egawk-7f57d12c835729207aea12e22021efce1705e6a0.tar.bz2
egawk-7f57d12c835729207aea12e22021efce1705e6a0.zip
Merge branch 'gawk-4.2-stable'
Diffstat (limited to 'io.c')
-rw-r--r--io.c9
1 files changed, 8 insertions, 1 deletions
diff --git a/io.c b/io.c
index 9ca29dac..a3d68ce0 100644
--- a/io.c
+++ b/io.c
@@ -1474,12 +1474,13 @@ flush_io()
/* close_io --- close all open files, called when exiting */
int
-close_io(bool *stdio_problem)
+close_io(bool *stdio_problem, bool *got_EPIPE)
{
struct redirect *rp;
struct redirect *next;
int status = 0;
+ *stdio_problem = *got_EPIPE = false;
errno = 0;
for (rp = red_head; rp != NULL; rp = next) {
next = rp->next;
@@ -1505,6 +1506,9 @@ close_io(bool *stdio_problem)
#endif
if (errno != EPIPE)
warning(_("error writing standard output (%s)"), strerror(errno));
+ else
+ *got_EPIPE = true;
+
status++;
*stdio_problem = true;
}
@@ -1515,6 +1519,9 @@ close_io(bool *stdio_problem)
#endif
if (errno != EPIPE)
warning(_("error writing standard error (%s)"), strerror(errno));
+ else
+ *got_EPIPE = true;
+
status++;
*stdio_problem = true;
}