diff options
Diffstat (limited to 'unix')
| -rw-r--r-- | unix/configure.in | 4 | ||||
| -rw-r--r-- | unix/tclUnixChan.c | 5 |
2 files changed, 6 insertions, 3 deletions
diff --git a/unix/configure.in b/unix/configure.in index 1d5c418..8b6a51e 100644 --- a/unix/configure.in +++ b/unix/configure.in @@ -2,12 +2,12 @@ dnl This file is an input file used by the GNU "autoconf" program to dnl generate the file "configure", which is run during Tcl installation dnl to configure the system for the local environment. AC_INIT(../generic/tcl.h) -# RCS: @(#) $Id: configure.in,v 1.22 1998/10/28 18:34:23 suresh Exp $ +# RCS: @(#) $Id: configure.in,v 1.23 1999/01/04 19:25:04 rjohnson Exp $ TCL_VERSION=8.0 TCL_MAJOR_VERSION=8 TCL_MINOR_VERSION=0 -TCL_PATCH_LEVEL=".4" +TCL_PATCH_LEVEL=".5" VERSION=${TCL_VERSION} if test "${prefix}" = "NONE"; then diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c index 5da3024..4fe0144 100644 --- a/unix/tclUnixChan.c +++ b/unix/tclUnixChan.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclUnixChan.c,v 1.7 1998/09/14 18:40:17 stanton Exp $ + * RCS: @(#) $Id: tclUnixChan.c,v 1.8 1999/01/04 19:25:04 rjohnson Exp $ */ #include "tclInt.h" /* Internal definitions for Tcl. */ @@ -2320,6 +2320,9 @@ TclGetDefaultStdChannel(type) } channel = Tcl_MakeFileChannel((ClientData) fd, mode); + if (channel == NULL) { + return NULL; + } /* * Set up the normal channel options for stdio handles. |