diff options
| author | dgp <dgp@users.sourceforge.net> | 2011-04-28 14:39:42 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2011-04-28 14:39:42 (GMT) |
| commit | 5702e695062ec36c3addd403d748af48164db8b1 (patch) | |
| tree | 0d25400a3f10a579b1905153391d01db6cb2a9d4 /generic/tclInt.h | |
| parent | 24517f610fc4cd90b353209a77a26e7818c7a209 (diff) | |
| download | tcl-5702e695062ec36c3addd403d748af48164db8b1.zip tcl-5702e695062ec36c3addd403d748af48164db8b1.tar.gz tcl-5702e695062ec36c3addd403d748af48164db8b1.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 0705492..a560fe8 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2573,6 +2573,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, @@ -2659,6 +2661,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, |