summaryrefslogtreecommitdiffstats
path: root/generic/tclIntPlatDecls.h
diff options
context:
space:
mode:
authordas <das>2008-04-02 21:30:03 (GMT)
committerdas <das>2008-04-02 21:30:03 (GMT)
commitb8976fa1042002dfdf6692b7ae8b215423087d24 (patch)
tree493cf76e04c6f1a9654735af98eaafeff8d06b07 /generic/tclIntPlatDecls.h
parent039faefdd7231c1ffac3a2f89d3fe4d9ca05049c (diff)
downloadtcl-b8976fa1042002dfdf6692b7ae8b215423087d24.zip
tcl-b8976fa1042002dfdf6692b7ae8b215423087d24.tar.gz
tcl-b8976fa1042002dfdf6692b7ae8b215423087d24.tar.bz2
* generic/tclDecls.h: make genstubs
* generic/tclIntDecls.h: * generic/tclIntPlatDecls.h: * generic/tclPlatDecls.h: * generic/tclStubInit.c: * generic/tclTomMathDecls.h:
Diffstat (limited to 'generic/tclIntPlatDecls.h')
-rw-r--r--generic/tclIntPlatDecls.h14
1 files changed, 3 insertions, 11 deletions
diff --git a/generic/tclIntPlatDecls.h b/generic/tclIntPlatDecls.h
index 7b8ab8e..8985677 100644
--- a/generic/tclIntPlatDecls.h
+++ b/generic/tclIntPlatDecls.h
@@ -9,7 +9,7 @@
* Copyright (c) 1998-1999 by Scriptics Corporation.
* All rights reserved.
*
- * RCS: @(#) $Id: tclIntPlatDecls.h,v 1.33 2008/04/01 16:23:41 dgp Exp $
+ * RCS: @(#) $Id: tclIntPlatDecls.h,v 1.34 2008/04/02 21:30:04 das Exp $
*/
#ifndef _TCLINTPLATDECLS
@@ -372,7 +372,7 @@ EXTERN int TclMacOSXMatchType (Tcl_Interp * interp,
typedef struct TclIntPlatStubs {
int magic;
- struct TclIntPlatStubHooks *hooks;
+ CONST struct TclIntPlatStubHooks *hooks;
#if !defined(__WIN32__) && !defined(MAC_OSX_TCL) /* UNIX */
void (*tclGetAndDetachPids) (Tcl_Interp * interp, Tcl_Channel chan); /* 0 */
@@ -447,15 +447,7 @@ typedef struct TclIntPlatStubs {
} TclIntPlatStubs;
#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)
-
-#ifdef __cplusplus
-extern "C" {
-#endif
-extern TclIntPlatStubs *tclIntPlatStubsPtr;
-#ifdef __cplusplus
-}
-#endif
-
+EXTERN CONST TclIntPlatStubs *tclIntPlatStubsPtr;
#endif /* defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS) */
#if defined(USE_TCL_STUBS) && !defined(USE_TCL_STUB_PROCS)