From d94accfbbdf67223f238d232babcbdda6a9d420d Mon Sep 17 00:00:00 2001
From: suresh <suresh>
Date: Wed, 3 Jun 1998 09:14:10 +0000
Subject: Renamed function 'Tcl_OpenFileChannel' to 'TclpOpenFileChannel'.

---
 mac/tclMacChan.c   | 4 ++--
 unix/tclUnixChan.c | 6 +++---
 win/tclWinChan.c   | 6 +++---
 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;
     }
 
-- 
cgit v0.12