diff options
| author | dgp <dgp@users.sourceforge.net> | 2016-11-08 02:56:11 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2016-11-08 02:56:11 (GMT) |
| commit | 3555752d45183e123a7bc2a5e8695e243bcb9d77 (patch) | |
| tree | e1ef2f40fc3b0408147198398113220f4f9d7eb4 /generic/tclInt.h | |
| parent | 37fb43ad48ee8d158656f4daab42d79a02f03756 (diff) | |
| download | tcl-3555752d45183e123a7bc2a5e8695e243bcb9d77.zip tcl-3555752d45183e123a7bc2a5e8695e243bcb9d77.tar.gz tcl-3555752d45183e123a7bc2a5e8695e243bcb9d77.tar.bz2 | |
Route all [string last] operations through a common implementation.
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 26592f9..e468f3d 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -3139,7 +3139,9 @@ MODULE_SCOPE int TclStringCatObjv(Tcl_Interp *interp, int inPlace, int objc, Tcl_Obj *const objv[], Tcl_Obj **objPtrPtr); MODULE_SCOPE int TclStringFind(Tcl_Obj *needle, Tcl_Obj *haystack, - unsigned int start); + int start); +MODULE_SCOPE int TclStringLast(Tcl_Obj *needle, Tcl_Obj *haystack, + int last); MODULE_SCOPE int TclStringMatch(const char *str, int strLen, const char *pattern, int ptnLen, int flags); MODULE_SCOPE int TclStringMatchObj(Tcl_Obj *stringObj, |