diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-07-19 08:35:05 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2022-07-19 08:35:05 (GMT) |
commit | 850b3e24a87d95e1efbabbc401cf1412078e584c (patch) | |
tree | 09dce83025f2b8e66665b73ede309b35c027efcf /unix/tclLoadNext.c | |
parent | 86196ac2048f44c7bc4fc2c057558b8e7ebdca11 (diff) | |
download | tcl-850b3e24a87d95e1efbabbc401cf1412078e584c.zip tcl-850b3e24a87d95e1efbabbc401cf1412078e584c.tar.gz tcl-850b3e24a87d95e1efbabbc401cf1412078e584c.tar.bz2 |
Make a start converting -1 -> TCL_INDEX_NONE where appropriate
Diffstat (limited to 'unix/tclLoadNext.c')
-rw-r--r-- | unix/tclLoadNext.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/unix/tclLoadNext.c b/unix/tclLoadNext.c index 2055210..dc827fc 100644 --- a/unix/tclLoadNext.c +++ b/unix/tclLoadNext.c @@ -83,7 +83,7 @@ TclpDlopen( Tcl_DString ds; - native = Tcl_UtfToExternalDString(NULL, fileName, -1, &ds); + native = Tcl_UtfToExternalDString(NULL, fileName, TCL_INDEX_NONE, &ds); files = {native,NULL}; result = rld_load(errorStream, &header, files, NULL); Tcl_DStringFree(&ds); |