diff options
author | dgp <dgp@users.sourceforge.net> | 2002-01-09 17:50:55 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2002-01-09 17:50:55 (GMT) |
commit | d55b7e9abbd01beb0d95f7b4e4b4db30d2c0611a (patch) | |
tree | 8d05d7dab01a5821a33f04aca19ce4af3d4b0bd2 /generic/tclTest.c | |
parent | 14b7b5ca29e03707a077b5469a53c848a385270c (diff) | |
download | tcl-d55b7e9abbd01beb0d95f7b4e4b4db30d2c0611a.zip tcl-d55b7e9abbd01beb0d95f7b4e4b4db30d2c0611a.tar.gz tcl-d55b7e9abbd01beb0d95f7b4e4b4db30d2c0611a.tar.bz2 |
* generic/tclTest.c (MainLoop):
* tests/main.test (Tcl_Main-1.{3,4,5,6}): Corrected some non-portable
tests from the new Tcl_Main changes. Thanks to Kevin Kenny.
Diffstat (limited to 'generic/tclTest.c')
-rw-r--r-- | generic/tclTest.c | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/generic/tclTest.c b/generic/tclTest.c index 2b977f2..b2a1af2 100644 --- a/generic/tclTest.c +++ b/generic/tclTest.c @@ -13,7 +13,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclTest.c,v 1.35 2002/01/05 22:55:52 dgp Exp $ + * RCS: @(#) $Id: tclTest.c,v 1.36 2002/01/09 17:50:56 dgp Exp $ */ #define TCL_TEST @@ -162,6 +162,7 @@ static void ExitProcEven _ANSI_ARGS_((ClientData clientData)); static void ExitProcOdd _ANSI_ARGS_((ClientData clientData)); static int GetTimesCmd _ANSI_ARGS_((ClientData clientData, Tcl_Interp *interp, int argc, char **argv)); +static void MainLoop _ANSI_ARGS_((void)); static int NoopCmd _ANSI_ARGS_((ClientData clientData, Tcl_Interp *interp, int argc, char **argv)); static int NoopObjCmd _ANSI_ARGS_((ClientData clientData, |