From dad5f25058c4ecf69ebe4543a13281d3f28c69bc Mon Sep 17 00:00:00 2001 From: "Arnold D. Robbins" Date: Mon, 30 Dec 2013 21:52:45 +0200 Subject: Build and test dynamic extensions on VMS. Documented too. --- vms/vms_popen.c | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'vms/vms_popen.c') diff --git a/vms/vms_popen.c b/vms/vms_popen.c index 6c5c5086..d9568119 100644 --- a/vms/vms_popen.c +++ b/vms/vms_popen.c @@ -133,8 +133,8 @@ pclose( FILE *current ) int rval, cur = fileno(current); /* assert( cur >= 0 && cur < pipes_lim ); */ - if (pipes[cur].pmode == unopened) - return -1; /* should never happen */ + if ((cur < 0) || (pipes[cur].pmode == unopened)) + return -1; /* should never happen, but does with two-way */ rval = fclose(current); /* close temp file; if reading, we're done */ if (pipes[cur].pmode == writing) { -- cgit v1.2.3