diff options
Diffstat (limited to 'generic/tclIOUtil.c')
| -rw-r--r-- | generic/tclIOUtil.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/generic/tclIOUtil.c b/generic/tclIOUtil.c index 0f31689..befc9c7 100644 --- a/generic/tclIOUtil.c +++ b/generic/tclIOUtil.c @@ -17,7 +17,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclIOUtil.c,v 1.111 2004/10/07 14:50:22 vincentdarley Exp $ + * RCS: @(#) $Id: tclIOUtil.c,v 1.112 2004/10/15 04:01:31 dgp Exp $ */ #include "tclInt.h" @@ -1783,23 +1783,23 @@ Tcl_SetErrno(err) * * This procedure is typically called after UNIX kernel calls * return errors. It stores machine-readable information about - * the error in $errorCode returns an information string for - * the caller's use. + * the error in errorCode field of interp and returns an + * information string for the caller's use. * * Results: * The return value is a human-readable string describing the * error. * * Side effects: - * The global variable $errorCode is reset. + * The errorCode field of the interp is set. * *---------------------------------------------------------------------- */ CONST char * Tcl_PosixError(interp) - Tcl_Interp *interp; /* Interpreter whose $errorCode variable - * is to be changed. */ + Tcl_Interp *interp; /* Interpreter whose errorCode field + * is to be set. */ { CONST char *id, *msg; |