diff options
author | dgp <dgp@users.sourceforge.net> | 2011-04-28 14:44:47 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2011-04-28 14:44:47 (GMT) |
commit | 7fa90bb19565f59f0c918cac88e2a34bf51cd0fa (patch) | |
tree | c826199d351b0c6f0746a66124227d102686a420 /generic/tclInt.h | |
parent | 319c5292645aa41b4f56539f615ba5314b27c957 (diff) | |
parent | 5702e695062ec36c3addd403d748af48164db8b1 (diff) | |
download | tcl-7fa90bb19565f59f0c918cac88e2a34bf51cd0fa.zip tcl-7fa90bb19565f59f0c918cac88e2a34bf51cd0fa.tar.gz tcl-7fa90bb19565f59f0c918cac88e2a34bf51cd0fa.tar.bz2 |
New utility routines: TclIsSpaceProc() and TclCountSpaceRuns()
Use to replace calls to isspace() and their /* INTL */ risk.
Diffstat (limited to 'generic/tclInt.h')
-rw-r--r-- | generic/tclInt.h | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index 95a497b..7d9f066 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2900,6 +2900,8 @@ MODULE_SCOPE void TclContinuationsEnterDerived(Tcl_Obj *objPtr, MODULE_SCOPE ContLineLoc *TclContinuationsGet(Tcl_Obj *objPtr); MODULE_SCOPE void TclContinuationsCopy(Tcl_Obj *objPtr, Tcl_Obj *originObjPtr); +MODULE_SCOPE int TclCountSpaceRuns(CONST char *bytes, int numBytes, + CONST char **endPtr); MODULE_SCOPE void TclDeleteNamespaceVars(Namespace *nsPtr); /* TIP #280 - Modified token based evulation, with line information. */ MODULE_SCOPE int TclEvalEx(Tcl_Interp *interp, const char *script, @@ -2991,6 +2993,7 @@ MODULE_SCOPE void TclInitObjSubsystem(void); MODULE_SCOPE void TclInitSubsystems(void); MODULE_SCOPE int TclInterpReady(Tcl_Interp *interp); MODULE_SCOPE int TclIsLocalScalar(const char *src, int len); +MODULE_SCOPE int TclIsSpaceProc(char byte); MODULE_SCOPE int TclJoinThread(Tcl_ThreadId id, int *result); MODULE_SCOPE void TclLimitRemoveAllHandlers(Tcl_Interp *interp); MODULE_SCOPE Tcl_Obj * TclLindexList(Tcl_Interp *interp, |