diff options
author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 12:35:02 (GMT) |
---|---|---|
committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2024-04-04 12:35:02 (GMT) |
commit | bd12eef0809ee8745b15fa5709711881f139f1e1 (patch) | |
tree | 5b3a1dcdb575f5f66d1c37aa14c631a01aceacbb /generic/tclLoad.c | |
parent | c0279cc641d237a25c2a4fc47b6a17d4b9f9b58a (diff) | |
parent | 1fbedd426d7faecbf706afa024c4316bf31ff8b1 (diff) | |
download | tcl-bd12eef0809ee8745b15fa5709711881f139f1e1.zip tcl-bd12eef0809ee8745b15fa5709711881f139f1e1.tar.gz tcl-bd12eef0809ee8745b15fa5709711881f139f1e1.tar.bz2 |
Merge 8.7. encodingPtr -> encodingNamePtr (for consistency)
Diffstat (limited to 'generic/tclLoad.c')
-rw-r--r-- | generic/tclLoad.c | 24 |
1 files changed, 12 insertions, 12 deletions
diff --git a/generic/tclLoad.c b/generic/tclLoad.c index a689833..d7c13d1 100644 --- a/generic/tclLoad.c +++ b/generic/tclLoad.c @@ -194,7 +194,7 @@ Tcl_LoadObjCmd( Tcl_SetObjResult(interp, Tcl_NewStringObj( "must specify either file name or prefix", -1)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "LOAD", "NOLIBRARY", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -260,7 +260,7 @@ Tcl_LoadObjCmd( "file \"%s\" is already loaded for prefix \"%s\"", fullFileName, libraryPtr->prefix)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "LOAD", - "SPLITPERSONALITY", (void *)NULL); + "SPLITPERSONALITY", (char *)NULL); code = TCL_ERROR; Tcl_MutexUnlock(&libraryMutex); goto done; @@ -297,7 +297,7 @@ Tcl_LoadObjCmd( Tcl_SetObjResult(interp, Tcl_ObjPrintf( "no library with prefix \"%s\" is loaded statically", prefix)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "LOAD", "NOTSTATIC", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -359,7 +359,7 @@ Tcl_LoadObjCmd( "couldn't figure out prefix for %s", fullFileName)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "LOAD", - "WHATLIBRARY", (void *)NULL); + "WHATLIBRARY", (char *)NULL); code = TCL_ERROR; goto done; } @@ -456,7 +456,7 @@ Tcl_LoadObjCmd( "can't use library in a safe interpreter: no" " %s_SafeInit procedure", libraryPtr->prefix)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "LOAD", "UNSAFE", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -467,7 +467,7 @@ Tcl_LoadObjCmd( "can't attach library to interpreter: no %s_Init procedure", libraryPtr->prefix)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "LOAD", "ENTRYPOINT", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -627,7 +627,7 @@ Tcl_UnloadObjCmd( Tcl_SetObjResult(interp, Tcl_NewStringObj( "must specify either file name or prefix", -1)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "UNLOAD", "NOLIBRARY", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -695,7 +695,7 @@ Tcl_UnloadObjCmd( "library with prefix \"%s\" is loaded statically and cannot be unloaded", prefix)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "UNLOAD", "STATIC", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -707,7 +707,7 @@ Tcl_UnloadObjCmd( Tcl_SetObjResult(interp, Tcl_ObjPrintf( "file \"%s\" has never been loaded", fullFileName)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "UNLOAD", "NEVERLOADED", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -737,7 +737,7 @@ Tcl_UnloadObjCmd( "file \"%s\" has never been loaded in this interpreter", fullFileName)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "UNLOAD", "NEVERLOADED", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -800,7 +800,7 @@ UnloadLibrary( "file \"%s\" cannot be unloaded under a safe interpreter", fullFileName)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "UNLOAD", "CANNOT", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } @@ -813,7 +813,7 @@ UnloadLibrary( "file \"%s\" cannot be unloaded under a trusted interpreter", fullFileName)); Tcl_SetErrorCode(interp, "TCL", "OPERATION", "UNLOAD", "CANNOT", - (void *)NULL); + (char *)NULL); code = TCL_ERROR; goto done; } |