diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-27 08:28:42 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2013-06-27 08:28:42 (GMT) |
| commit | c515a5da53a5c61527c77bfd7c062c02b66af1e2 (patch) | |
| tree | 77d05d82c5a8fbeb6ee8d944f752d800e1721b99 /generic/tclMain.c | |
| parent | 75b009d2316ab41a1ff6bd841da8fd207aba7b9d (diff) | |
| parent | e0e8990257bc75fdafa895f309145353c400923e (diff) | |
| download | tcl-c515a5da53a5c61527c77bfd7c062c02b66af1e2.zip tcl-c515a5da53a5c61527c77bfd7c062c02b66af1e2.tar.gz tcl-c515a5da53a5c61527c77bfd7c062c02b66af1e2.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); /* |