diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-01-31 13:27:28 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2017-01-31 13:27:28 (GMT) |
| commit | 17cf9db2f7a0bae5eb6386ba4b443948f1b4b9a4 (patch) | |
| tree | 5ce71463c7228e4d0c14a757255d6ae02d632a60 /generic/tclObj.c | |
| parent | 4b357897d532c34fb10a853da41bbd7d273e729f (diff) | |
| parent | e7e8174dbaeced18b08cb902666c2a04b475a171 (diff) | |
| download | tcl-17cf9db2f7a0bae5eb6386ba4b443948f1b4b9a4.zip tcl-17cf9db2f7a0bae5eb6386ba4b443948f1b4b9a4.tar.gz tcl-17cf9db2f7a0bae5eb6386ba4b443948f1b4b9a4.tar.bz2 | |
Update documentation on recent changes in Tcl_LinkVar.
Minor code clean-up. No functional changes.
Diffstat (limited to 'generic/tclObj.c')
| -rw-r--r-- | generic/tclObj.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclObj.c b/generic/tclObj.c index d0f7480..90df579 100644 --- a/generic/tclObj.c +++ b/generic/tclObj.c @@ -2785,7 +2785,7 @@ Tcl_GetLongFromObj( if (interp != NULL) { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "expected integer but got \"%s\"", - Tcl_GetString(objPtr))); + TclGetString(objPtr))); Tcl_SetErrorCode(interp, "TCL", "VALUE", "INTEGER", NULL); } return TCL_ERROR; @@ -3086,7 +3086,7 @@ Tcl_GetWideIntFromObj( if (interp != NULL) { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "expected integer but got \"%s\"", - Tcl_GetString(objPtr))); + TclGetString(objPtr))); Tcl_SetErrorCode(interp, "TCL", "VALUE", "INTEGER", NULL); } return TCL_ERROR; @@ -3415,7 +3415,7 @@ GetBignumFromObj( if (interp != NULL) { Tcl_SetObjResult(interp, Tcl_ObjPrintf( "expected integer but got \"%s\"", - Tcl_GetString(objPtr))); + TclGetString(objPtr))); Tcl_SetErrorCode(interp, "TCL", "VALUE", "INTEGER", NULL); } return TCL_ERROR; @@ -3965,7 +3965,7 @@ TclCompareObjKeys( Tcl_Obj *objPtr1 = keyPtr; Tcl_Obj *objPtr2 = (Tcl_Obj *) hPtr->key.oneWordValue; register const char *p1, *p2; - register int l1, l2; + register size_t l1, l2; /* * If the object pointers are the same then they match. |