diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-08-19 11:42:23 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2019-08-19 11:42:23 (GMT) |
commit | 527a50063119029f73a49e4566233c8fbef68a76 (patch) | |
tree | a1e6c9353f0e00e50b9e9b41a860668d39c57d36 /generic/tclEncoding.c | |
parent | 69a117efbec37b54138ee4c70d9dde7b352f5362 (diff) | |
parent | f44c65ff893ab9fe381cbd0556fe81c35d09c6fa (diff) | |
download | tcl-527a50063119029f73a49e4566233c8fbef68a76.zip tcl-527a50063119029f73a49e4566233c8fbef68a76.tar.gz tcl-527a50063119029f73a49e4566233c8fbef68a76.tar.bz2 |
Rebase to 9.0
Diffstat (limited to 'generic/tclEncoding.c')
-rw-r--r-- | generic/tclEncoding.c | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 6b4cc8e..387a2a6 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -1448,14 +1448,15 @@ Tcl_UtfToExternal( *--------------------------------------------------------------------------- */ #undef Tcl_FindExecutable -void +const char * Tcl_FindExecutable( const char *argv0) /* The value of the application's argv[0] * (native). */ { - TclInitSubsystems(); + const char *version = TclInitSubsystems(); TclpSetInitialEncodings(); TclpFindExecutable(argv0); + return version; } /* |