summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog8
-rw-r--r--generic/tkConsole.c5
-rw-r--r--generic/tkInt.h6
-rw-r--r--mac/tkMacAppInit.c8
4 files changed, 10 insertions, 17 deletions
diff --git a/ChangeLog b/ChangeLog
index a3ec4f1..ea86ca7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,8 +1,10 @@
2002-01-04 Don Porter <dgp@users.sourceforge.net>
- * generic/tkConsole.c (ConsoleOutputProc): Updated Tk's console
- to CONSTified channel driver interface. [Tcl Patch 503565,
- Tk Patch 503983]
+ * generic/tkConsole.c (ConsoleOutputProc,TkConsolePrint):
+ * generic/tkInt.h (TkConsolePrint):
+ * mac/tkMacAppInit.c (TkConsolePrint): Updated Tk's console to
+ CONSTified channel driver interface. [Tcl Patch 503565, Tk Patch
+ 503983]
2002-01-11 Mo DeJong <mdejong@users.sourceforge.net>
diff --git a/generic/tkConsole.c b/generic/tkConsole.c
index 1a5a267..e51d687 100644
--- a/generic/tkConsole.c
+++ b/generic/tkConsole.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: tkConsole.c,v 1.15 2002/01/15 18:19:14 dgp Exp $
+ * RCS: @(#) $Id: tkConsole.c,v 1.16 2002/01/15 20:48:29 dgp Exp $
*/
#include "tk.h"
@@ -47,9 +47,6 @@ TCL_DECLARE_MUTEX(consoleMutex)
* The first three will be used in the tk app shells...
*/
-void TkConsolePrint _ANSI_ARGS_((Tcl_Interp *interp,
- int devId, char *buffer, long size));
-
static int ConsoleCmd _ANSI_ARGS_((ClientData clientData,
Tcl_Interp *interp, int argc, char **argv));
static void ConsoleDeleteProc _ANSI_ARGS_((ClientData clientData));
diff --git a/generic/tkInt.h b/generic/tkInt.h
index 440c339..c5c085d 100644
--- a/generic/tkInt.h
+++ b/generic/tkInt.h
@@ -11,7 +11,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: $Id: tkInt.h,v 1.40 2001/09/26 21:36:19 pspjuth Exp $
+ * RCS: $Id: tkInt.h,v 1.41 2002/01/15 20:48:30 dgp Exp $
*/
#ifndef _TKINT
@@ -1035,8 +1035,8 @@ EXTERN int Tk_WinfoObjCmd _ANSI_ARGS_((ClientData clientData,
EXTERN int Tk_WmCmd _ANSI_ARGS_((ClientData clientData,
Tcl_Interp *interp, int argc, char **argv));
-void TkConsolePrint _ANSI_ARGS_((Tcl_Interp *interp,
- int devId, char *buffer, long size));
+EXTERN void TkConsolePrint _ANSI_ARGS_((Tcl_Interp *interp,
+ int devId, CONST char *buffer, long size));
EXTERN void TkEventInit _ANSI_ARGS_((void));
diff --git a/mac/tkMacAppInit.c b/mac/tkMacAppInit.c
index 670e8fa..c625609 100644
--- a/mac/tkMacAppInit.c
+++ b/mac/tkMacAppInit.c
@@ -9,7 +9,7 @@
* See the file "license.terms" for information on usage and redistribution
* of this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tkMacAppInit.c,v 1.12 2000/02/10 08:53:06 jingham Exp $
+ * RCS: @(#) $Id: tkMacAppInit.c,v 1.13 2002/01/15 20:48:30 dgp Exp $
*/
#include <Gestalt.h>
@@ -52,12 +52,6 @@ extern char * __ttyname _ANSI_ARGS_((long fildes));
short SIOUXHandleOneEvent _ANSI_ARGS_((EventRecord *event));
/*
- * Prototypes for functions from the tkConsole.c file.
- */
-
-EXTERN void TkConsolePrint _ANSI_ARGS_((Tcl_Interp *interp,
- int devId, char *buffer, long size));
-/*
* Forward declarations for procedures defined later in this file:
*/