diff options
| author | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-06-27 08:28:42 (GMT) |
|---|---|---|
| committer | nijtmans@users.sourceforge.net <jan.nijtmans> | 2013-06-27 08:28:42 (GMT) |
| commit | f3572e6ffd92a8ec6597304614d716c48ecb3bc7 (patch) | |
| tree | 77d05d82c5a8fbeb6ee8d944f752d800e1721b99 /generic/tclMain.c | |
| parent | ea8248d4cd6fb83be98af5e17c1ea525938fc57b (diff) | |
| parent | 353837182c2d150d59c0478c0fed2f1c45eebf82 (diff) | |
| download | tcl-f3572e6ffd92a8ec6597304614d716c48ecb3bc7.zip tcl-f3572e6ffd92a8ec6597304614d716c48ecb3bc7.tar.gz tcl-f3572e6ffd92a8ec6597304614d716c48ecb3bc7.tar.bz2 | |
Bug [9b2e636361]: Tcl_CreateInterp() needs initialized encodings.
Diffstat (limited to 'generic/tclMain.c')
| -rw-r--r-- | generic/tclMain.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tclMain.c b/generic/tclMain.c index 7a19a38..5e5109b 100644 --- a/generic/tclMain.c +++ b/generic/tclMain.c @@ -342,9 +342,10 @@ Tcl_Main( Tcl_Interp *interp; Tcl_DString appName; - Tcl_FindExecutable(argv[0]); - interp = Tcl_CreateInterp(); + TclpSetInitialEncodings(); + TclpFindExecutable(argv[0]); + Tcl_InitMemory(interp); /* |