summaryrefslogtreecommitdiffstats
path: root/mac/tkMacXStubs.c
diff options
context:
space:
mode:
authordgp <dgp@users.sourceforge.net>2002-01-25 21:09:35 (GMT)
committerdgp <dgp@users.sourceforge.net>2002-01-25 21:09:35 (GMT)
commit6ed2bb40b9be7079b3eb3b9872657d06d568dc7f (patch)
tree2041d0c0de9f76a800e1af4c067e78376fbdd570 /mac/tkMacXStubs.c
parent7b64060dd94a995160cc8ccbd5bee7556fd996a9 (diff)
downloadtk-6ed2bb40b9be7079b3eb3b9872657d06d568dc7f.zip
tk-6ed2bb40b9be7079b3eb3b9872657d06d568dc7f.tar.gz
tk-6ed2bb40b9be7079b3eb3b9872657d06d568dc7f.tar.bz2
* Updated callers of Tcl_SplitList and Tcl_Merge.
* Updated callers of Tcl_GetStringResult. Rewrote PrintScrollFractions to ScrollFractions to stop scribbling directly on interp->result. * Updated callers of Tcl_GetVar, Tcl_GetVar2 * Updated callers of Tcl_SplitPath, Tcl_JoinPath, and Tcl_TranslateFileName.
Diffstat (limited to 'mac/tkMacXStubs.c')
-rw-r--r--mac/tkMacXStubs.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/mac/tkMacXStubs.c b/mac/tkMacXStubs.c
index 7fd822e..8661392 100644
--- a/mac/tkMacXStubs.c
+++ b/mac/tkMacXStubs.c
@@ -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: tkMacXStubs.c,v 1.10 2000/02/10 09:00:31 jingham Exp $
+ * RCS: @(#) $Id: tkMacXStubs.c,v 1.11 2002/01/25 21:09:37 dgp Exp $
*/
#include "tkInt.h"
@@ -90,7 +90,7 @@ int _XInitImageFuncPtrs _ANSI_ARGS_((XImage *image));
TkDisplay *
TkpOpenDisplay(
- char *display_name)
+ CONST char *display_name)
{
Display *display;
Screen *screen;
@@ -793,10 +793,10 @@ XCreateIC(
*----------------------------------------------------------------------
*/
-char *
+CONST char *
TkGetDefaultScreenName(
Tcl_Interp *interp, /* Not used. */
- char *screenName) /* If NULL, use default string. */
+ CONST char *screenName) /* If NULL, use default string. */
{
if ((screenName == NULL) || (screenName[0] == '\0')) {
screenName = macScreenName;