summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorsuresh <suresh>1998-06-03 09:14:10 (GMT)
committersuresh <suresh>1998-06-03 09:14:10 (GMT)
commitd94accfbbdf67223f238d232babcbdda6a9d420d (patch)
treef474511af705cb7021b560b191cfe65c7d33c999
parente57eeca0a36b6a0e2d707791bfc0a1953b98a1fb (diff)
downloadtcl-d94accfbbdf67223f238d232babcbdda6a9d420d.zip
tcl-d94accfbbdf67223f238d232babcbdda6a9d420d.tar.gz
tcl-d94accfbbdf67223f238d232babcbdda6a9d420d.tar.bz2
Renamed function 'Tcl_OpenFileChannel' to 'TclpOpenFileChannel'.
-rw-r--r--mac/tclMacChan.c4
-rw-r--r--unix/tclUnixChan.c6
-rw-r--r--win/tclWinChan.c6
3 files changed, 8 insertions, 8 deletions
diff --git a/mac/tclMacChan.c b/mac/tclMacChan.c
index b05d2f5..e11e47d 100644
--- a/mac/tclMacChan.c
+++ b/mac/tclMacChan.c
@@ -731,7 +731,7 @@ TclGetDefaultStdChannel(
/*
*----------------------------------------------------------------------
*
- * Tcl_OpenFileChannel --
+ * TclpOpenFileChannel --
*
* Open an File based channel on Unix systems.
*
@@ -747,7 +747,7 @@ TclGetDefaultStdChannel(
*/
Tcl_Channel
-Tcl_OpenFileChannel(
+TclpOpenFileChannel(
Tcl_Interp *interp, /* Interpreter for error reporting;
* can be NULL. */
char *fileName, /* Name of file to open. */
diff --git a/unix/tclUnixChan.c b/unix/tclUnixChan.c
index 2c0e996..c194b66 100644
--- a/unix/tclUnixChan.c
+++ b/unix/tclUnixChan.c
@@ -1150,7 +1150,7 @@ TtyParseMode(interp, mode, speedPtr, parityPtr, dataPtr, stopPtr)
/*
*----------------------------------------------------------------------
*
- * Tcl_OpenFileChannel --
+ * TclpOpenFileChannel --
*
* Open an file based channel on Unix systems.
*
@@ -1167,7 +1167,7 @@ TtyParseMode(interp, mode, speedPtr, parityPtr, dataPtr, stopPtr)
*/
Tcl_Channel
-Tcl_OpenFileChannel(interp, fileName, modeString, permissions)
+TclpOpenFileChannel(interp, fileName, modeString, permissions)
Tcl_Interp *interp; /* Interpreter for error reporting;
* can be NULL. */
char *fileName; /* Name of file to open. */
@@ -1201,7 +1201,7 @@ Tcl_OpenFileChannel(interp, fileName, modeString, permissions)
/*
* This may occurr if modeString was "", for example.
*/
- panic("Tcl_OpenFileChannel: invalid mode value");
+ panic("TclpOpenFileChannel: invalid mode value");
return NULL;
}
diff --git a/win/tclWinChan.c b/win/tclWinChan.c
index 248e14b..76382d9 100644
--- a/win/tclWinChan.c
+++ b/win/tclWinChan.c
@@ -826,7 +826,7 @@ ComGetOptionProc(instanceData, interp, optionName, dsPtr)
/*
*----------------------------------------------------------------------
*
- * Tcl_OpenFileChannel --
+ * TclpOpenFileChannel --
*
* Open an File based channel on Unix systems.
*
@@ -842,7 +842,7 @@ ComGetOptionProc(instanceData, interp, optionName, dsPtr)
*/
Tcl_Channel
-Tcl_OpenFileChannel(interp, fileName, modeString, permissions)
+TclpOpenFileChannel(interp, fileName, modeString, permissions)
Tcl_Interp *interp; /* Interpreter for error reporting;
* can be NULL. */
char *fileName; /* Name of file to open. */
@@ -889,7 +889,7 @@ Tcl_OpenFileChannel(interp, fileName, modeString, permissions)
channelPermissions = (TCL_READABLE | TCL_WRITABLE);
break;
default:
- panic("Tcl_OpenFileChannel: invalid mode value");
+ panic("TclpOpenFileChannel: invalid mode value");
break;
}