diff options
author | oehhar <harald.oehlmann@elmicron.de> | 2022-03-14 18:15:03 (GMT) |
---|---|---|
committer | oehhar <harald.oehlmann@elmicron.de> | 2022-03-14 18:15:03 (GMT) |
commit | 2fc2f3a009206556a3f311f7905d3923e058d881 (patch) | |
tree | b9d215280c18ff04c63e96111c76f17e21441a10 | |
parent | 97299abbed9fd4bee8a5f2b8e3efabdb9e525ff7 (diff) | |
download | tcl-2fc2f3a009206556a3f311f7905d3923e058d881.zip tcl-2fc2f3a009206556a3f311f7905d3923e058d881.tar.gz tcl-2fc2f3a009206556a3f311f7905d3923e058d881.tar.bz2 |
Add "const" to TclObjLookupVar parameter 6 and 7 to avoid compiler failure on MS-VC 2015. Hope this is ok...
-rw-r--r-- | generic/tclIntDecls.h | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h index 48cec3d..8430fae 100644 --- a/generic/tclIntDecls.h +++ b/generic/tclIntDecls.h @@ -484,8 +484,8 @@ EXTERN int TclPtrMakeUpvar(Tcl_Interp *interp, Var *otherP1Ptr, /* 230 */ EXTERN Var * TclObjLookupVar(Tcl_Interp *interp, Tcl_Obj *part1Ptr, const char *part2, - int flags, const char *msg, int createPart1, - int createPart2, Var **arrayPtrPtr); + int flags, const char *msg, const int createPart1, + const int createPart2, Var **arrayPtrPtr); /* 231 */ EXTERN int TclGetNamespaceFromObj(Tcl_Interp *interp, Tcl_Obj *objPtr, Tcl_Namespace **nsPtrPtr); |