diff options
| author | hobbs <hobbs> | 1999-08-19 17:39:15 (GMT) |
|---|---|---|
| committer | hobbs <hobbs> | 1999-08-19 17:39:15 (GMT) |
| commit | 6d54731bf1a1ddeccdceeb7c46b3c590a8f8140c (patch) | |
| tree | e9b5e3293c8385177fadde4bab16c1254dad1828 /generic/tclIO.c | |
| parent | 3623d06f54ae85532a4f9853ef274227b3540fae (diff) | |
| download | tcl-6d54731bf1a1ddeccdceeb7c46b3c590a8f8140c.zip tcl-6d54731bf1a1ddeccdceeb7c46b3c590a8f8140c.tar.gz tcl-6d54731bf1a1ddeccdceeb7c46b3c590a8f8140c.tar.bz2 | |
1999-08-19 Jeff Hobbs <hobbs@scriptics.com>
* generic/tclIO.c: changed Tcl_GetChannelNames* to use K&R
style headers (style guide, also pleases HP cc)
Diffstat (limited to 'generic/tclIO.c')
| -rw-r--r-- | generic/tclIO.c | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/generic/tclIO.c b/generic/tclIO.c index ea281a4..1dc808a 100644 --- a/generic/tclIO.c +++ b/generic/tclIO.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclIO.c,v 1.15 1999/08/19 02:59:10 hobbs Exp $ + * RCS: @(#) $Id: tclIO.c,v 1.16 1999/08/19 17:39:17 hobbs Exp $ */ #include "tclInt.h" @@ -8175,7 +8175,8 @@ SetBlockMode(interp, chanPtr, mode) */ int -Tcl_GetChannelNames(Tcl_Interp *interp) +Tcl_GetChannelNames(interp) + Tcl_Interp *interp; /* Interp for error reporting. */ { return Tcl_GetChannelNamesEx(interp, (char *) NULL); } @@ -8199,7 +8200,9 @@ Tcl_GetChannelNames(Tcl_Interp *interp) */ int -Tcl_GetChannelNamesEx(Tcl_Interp *interp, char *pattern) +Tcl_GetChannelNamesEx(interp, pattern) + Tcl_Interp *interp; /* Interp for error reporting. */ + char *pattern; /* pattern to filter on. */ { Channel *chanPtr; ThreadSpecificData *tsdPtr = TCL_TSD_INIT(&dataKey); |