diff options
| author | dgp <dgp@users.sourceforge.net> | 2013-06-27 12:05:00 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2013-06-27 12:05:00 (GMT) |
| commit | 05ee22d705676f10827b8ffc1f31e0436fa231d7 (patch) | |
| tree | cfd4668b701642fcd61a0b56e37a71b5c4d6face /generic/tcl.h | |
| parent | 04ccb7817ce7656204d750f7205d441dceb94ac3 (diff) | |
| parent | a57835e07ae4443feed31888c2fdb0e44b2748e0 (diff) | |
| download | tcl-05ee22d705676f10827b8ffc1f31e0436fa231d7.zip tcl-05ee22d705676f10827b8ffc1f31e0436fa231d7.tar.gz tcl-05ee22d705676f10827b8ffc1f31e0436fa231d7.tar.bz2 | |
merge trunk
Diffstat (limited to 'generic/tcl.h')
| -rw-r--r-- | generic/tcl.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tcl.h b/generic/tcl.h index d47e931..a833218 100644 --- a/generic/tcl.h +++ b/generic/tcl.h @@ -2417,7 +2417,7 @@ const char * TclTomMathInitializeStubs(Tcl_Interp *interp, */ #define Tcl_Main(argc, argv, proc) Tcl_MainEx(argc, argv, proc, \ - (Tcl_FindExecutable(argv[0]), (Tcl_CreateInterp)())) + ((Tcl_CreateInterp)())) EXTERN void Tcl_MainEx(int argc, char **argv, Tcl_AppInitProc *appInitProc, Tcl_Interp *interp); EXTERN const char * Tcl_PkgInitStubsCheck(Tcl_Interp *interp, |