diff options
| author | oehhar <harald.oehlmann@elmicron.de> | 2022-03-14 18:24:01 (GMT) |
|---|---|---|
| committer | oehhar <harald.oehlmann@elmicron.de> | 2022-03-14 18:24:01 (GMT) |
| commit | ceda5f91cc98f11b93b81de0ad16f487af3aaef7 (patch) | |
| tree | 48a37bf83e3d9bfcd8572b53f9724b97054cd3cf | |
| parent | 2fc2f3a009206556a3f311f7905d3923e058d881 (diff) | |
| download | tcl-ceda5f91cc98f11b93b81de0ad16f487af3aaef7.zip tcl-ceda5f91cc98f11b93b81de0ad16f487af3aaef7.tar.gz tcl-ceda5f91cc98f11b93b81de0ad16f487af3aaef7.tar.bz2 | |
Add "const" to some other parameters to avoid compiler failure on MS-VC 2015. Hope this is ok.
| -rw-r--r-- | generic/tclIntDecls.h | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclIntDecls.h b/generic/tclIntDecls.h index 8430fae..0fa7b82 100644 --- a/generic/tclIntDecls.h +++ b/generic/tclIntDecls.h @@ -551,17 +551,17 @@ EXTERN int TclRegisterLiteral(void *envPtr, const char *bytes, /* 252 */ EXTERN Tcl_Obj * TclPtrGetVar(Tcl_Interp *interp, Tcl_Var varPtr, Tcl_Var arrayPtr, Tcl_Obj *part1Ptr, - Tcl_Obj *part2Ptr, int flags); + Tcl_Obj *part2Ptr, const int flags); /* 253 */ EXTERN Tcl_Obj * TclPtrSetVar(Tcl_Interp *interp, Tcl_Var varPtr, Tcl_Var arrayPtr, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr, - int flags); + const int flags); /* 254 */ EXTERN Tcl_Obj * TclPtrIncrObjVar(Tcl_Interp *interp, Tcl_Var varPtr, Tcl_Var arrayPtr, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, Tcl_Obj *incrPtr, - int flags); + const int flags); /* 255 */ EXTERN int TclPtrObjMakeUpvar(Tcl_Interp *interp, Tcl_Var otherPtr, Tcl_Obj *myNamePtr, @@ -569,7 +569,7 @@ EXTERN int TclPtrObjMakeUpvar(Tcl_Interp *interp, /* 256 */ EXTERN int TclPtrUnsetVar(Tcl_Interp *interp, Tcl_Var varPtr, Tcl_Var arrayPtr, Tcl_Obj *part1Ptr, - Tcl_Obj *part2Ptr, int flags); + Tcl_Obj *part2Ptr, const int flags); /* 257 */ EXTERN void TclStaticLibrary(Tcl_Interp *interp, const char *prefix, |