diff options
author | Bryan Henderson <bryanh@giraffe.netgate.net> | 1996-11-26 01:14:38 +0000 |
---|---|---|
committer | Bryan Henderson <bryanh@giraffe.netgate.net> | 1996-11-26 01:14:38 +0000 |
commit | f93f780269affefe477946e0d7f1311331c793bc (patch) | |
tree | 2c44232fb427787d31c4b8faa019675fd754fd99 /src/bin/pgtclsh/pgtclAppInit.c | |
parent | 46c4e6f6262b5c4aa16ce9fe85f8c3c3a2c1522c (diff) | |
download | postgresql-f93f780269affefe477946e0d7f1311331c793bc.tar.gz postgresql-f93f780269affefe477946e0d7f1311331c793bc.zip |
-Werror fixes from D'Arcy.
Diffstat (limited to 'src/bin/pgtclsh/pgtclAppInit.c')
-rw-r--r-- | src/bin/pgtclsh/pgtclAppInit.c | 15 |
1 files changed, 4 insertions, 11 deletions
diff --git a/src/bin/pgtclsh/pgtclAppInit.c b/src/bin/pgtclsh/pgtclAppInit.c index acdce124f8d..b44a46f6811 100644 --- a/src/bin/pgtclsh/pgtclAppInit.c +++ b/src/bin/pgtclsh/pgtclAppInit.c @@ -11,11 +11,7 @@ * of this file, and for a DISCLAIMER OF ALL WARRANTIES. */ -#ifndef lint -static char sccsid[] = "@(#) tclAppInit.c 1.11 94/12/17 16:14:03"; -#endif /* not lint */ - -#include "tcl.h" +#include <tcl.h> #include <libpgtcl.h> @@ -47,9 +43,7 @@ int *tclDummyMathPtr = (int *) matherr; */ int -main(argc, argv) - int argc; /* Number of command-line arguments. */ - char **argv; /* Values of command-line arguments. */ +main(int argc, char **argv) { Tcl_Main(argc, argv, Tcl_AppInit); return 0; /* Needed only to prevent compiler warning. */ @@ -75,8 +69,7 @@ main(argc, argv) */ int -Tcl_AppInit(interp) - Tcl_Interp *interp; /* Interpreter for application. */ +Tcl_AppInit(Tcl_Interp *interp) { if (Tcl_Init(interp) == TCL_ERROR) { return TCL_ERROR; @@ -93,7 +86,7 @@ Tcl_AppInit(interp) * where "Mod" is the name of the module. */ - if (Pg_Init(interp) == TCL_ERROR) { + if (Pgtcl_Init(interp) == TCL_ERROR) { return TCL_ERROR; } |