diff options
author | das <das> | 2008-04-02 21:30:03 (GMT) |
---|---|---|
committer | das <das> | 2008-04-02 21:30:03 (GMT) |
commit | b8976fa1042002dfdf6692b7ae8b215423087d24 (patch) | |
tree | 493cf76e04c6f1a9654735af98eaafeff8d06b07 /generic/tclIntPlatDecls.h | |
parent | 039faefdd7231c1ffac3a2f89d3fe4d9ca05049c (diff) | |
download | tcl-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.h | 14 |
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) |