diff options
| author | dkf <dkf@noemail.net> | 2008-04-27 22:21:26 (GMT) |
|---|---|---|
| committer | dkf <dkf@noemail.net> | 2008-04-27 22:21:26 (GMT) |
| commit | a6ee7f7e74b9345ae2cb9407865230327d0d576a (patch) | |
| tree | 4e7b1367d8eb030241db8325caa541ce387b7313 /unix/tclAppInit.c | |
| parent | 29b75f74f37139eb2b27dbcd0a6a1aa874c45517 (diff) | |
| download | tcl-a6ee7f7e74b9345ae2cb9407865230327d0d576a.zip tcl-a6ee7f7e74b9345ae2cb9407865230327d0d576a.tar.gz tcl-a6ee7f7e74b9345ae2cb9407865230327d0d576a.tar.bz2 | |
Get rid of pre-C89-isms (esp. CONST vs const).
FossilOrigin-Name: 2d205c22fbe5def21ccd36bc6f7b2d3831f6122d
Diffstat (limited to 'unix/tclAppInit.c')
| -rw-r--r-- | unix/tclAppInit.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/unix/tclAppInit.c b/unix/tclAppInit.c index a5058d8..4183c7c 100644 --- a/unix/tclAppInit.c +++ b/unix/tclAppInit.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: tclAppInit.c,v 1.17 2007/04/16 13:36:35 dkf Exp $ + * RCS: @(#) $Id: tclAppInit.c,v 1.18 2008/04/27 22:21:33 dkf Exp $ */ #include "tcl.h" @@ -28,8 +28,8 @@ extern Tcl_PackageInitProc Tcltest_Init; #endif /* TCL_TEST */ #ifdef TCL_XT_TEST -extern void XtToolkitInitialize _ANSI_ARGS_((void)); -extern int Tclxttest_Init _ANSI_ARGS_((Tcl_Interp *interp)); +extern void XtToolkitInitialize(void); +extern int Tclxttest_Init(Tcl_Interp *interp); #endif /* @@ -64,7 +64,7 @@ main( #ifndef TCL_LOCAL_APPINIT #define TCL_LOCAL_APPINIT Tcl_AppInit #endif - extern int TCL_LOCAL_APPINIT _ANSI_ARGS_((Tcl_Interp *interp)); + extern int TCL_LOCAL_APPINIT(Tcl_Interp *interp); /* * The following #if block allows you to change how Tcl finds the startup @@ -73,7 +73,7 @@ main( */ #ifdef TCL_LOCAL_MAIN_HOOK - extern int TCL_LOCAL_MAIN_HOOK _ANSI_ARGS_((int *argc, char ***argv)); + extern int TCL_LOCAL_MAIN_HOOK(int *argc, char ***argv); #endif #ifdef TCL_XT_TEST |