summaryrefslogtreecommitdiffstats
path: root/generic/tclIO.c
diff options
context:
space:
mode:
authorhobbs <hobbs>1999-08-19 17:39:15 (GMT)
committerhobbs <hobbs>1999-08-19 17:39:15 (GMT)
commit6d54731bf1a1ddeccdceeb7c46b3c590a8f8140c (patch)
treee9b5e3293c8385177fadde4bab16c1254dad1828 /generic/tclIO.c
parent3623d06f54ae85532a4f9853ef274227b3540fae (diff)
downloadtcl-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.c9
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);