diff options
| author | dkf <dkf@noemail.net> | 2007-04-16 13:36:33 (GMT) |
|---|---|---|
| committer | dkf <dkf@noemail.net> | 2007-04-16 13:36:33 (GMT) |
| commit | 456b27b65d6a747ee743d375a87577bc18563b23 (patch) | |
| tree | 88437ef1c667959b00a3b86ee638cc3a94300aab /unix/tclAppInit.c | |
| parent | c6c59eac39637cd6e0216f003ce2a25559a1d714 (diff) | |
| download | tcl-456b27b65d6a747ee743d375a87577bc18563b23.zip tcl-456b27b65d6a747ee743d375a87577bc18563b23.tar.gz tcl-456b27b65d6a747ee743d375a87577bc18563b23.tar.bz2 | |
Complete the purge of K&R function definitions from manually-written code.
FossilOrigin-Name: 645aed2fcdcd55ca81df269a4ea262eeca2b9ff2
Diffstat (limited to 'unix/tclAppInit.c')
| -rw-r--r-- | unix/tclAppInit.c | 12 |
1 files changed, 6 insertions, 6 deletions
diff --git a/unix/tclAppInit.c b/unix/tclAppInit.c index 8875b92..a5058d8 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.16 2005/07/20 23:16:00 dkf Exp $ + * RCS: @(#) $Id: tclAppInit.c,v 1.17 2007/04/16 13:36:35 dkf Exp $ */ #include "tcl.h" @@ -50,9 +50,9 @@ extern int Tclxttest_Init _ANSI_ARGS_((Tcl_Interp *interp)); */ int -main(argc, argv) - int argc; /* Number of command-line arguments. */ - char **argv; /* Values of command-line arguments. */ +main( + int argc, /* Number of command-line arguments. */ + char **argv) /* Values of command-line arguments. */ { /* * The following #if block allows you to change the AppInit function by @@ -109,8 +109,8 @@ main(argc, argv) */ int -Tcl_AppInit(interp) - Tcl_Interp *interp; /* Interpreter for application. */ +Tcl_AppInit( + Tcl_Interp *interp) /* Interpreter for application. */ { if (Tcl_Init(interp) == TCL_ERROR) { return TCL_ERROR; |