diff options
| author | dgp <dgp@users.sourceforge.net> | 2011-05-10 16:52:35 (GMT) |
|---|---|---|
| committer | dgp <dgp@users.sourceforge.net> | 2011-05-10 16:52:35 (GMT) |
| commit | d8668e5c5d98e9b11f6c85e8bd3c7c6ac6834838 (patch) | |
| tree | f83cbc6f986fb625947631c42b0f9c3930475634 /generic/tclInt.h | |
| parent | a4456778c8605e05c3598b6848b2660ae7b10d27 (diff) | |
| parent | f9dece7738d140a66ebb5d47ee85c4d57249258a (diff) | |
| download | tcl-d8668e5c5d98e9b11f6c85e8bd3c7c6ac6834838.zip tcl-d8668e5c5d98e9b11f6c85e8bd3c7c6ac6834838.tar.gz tcl-d8668e5c5d98e9b11f6c85e8bd3c7c6ac6834838.tar.bz2 | |
New internal routines TclScanElement() and TclConvertElement().
Rewritten guts of machinery to produce string rep of lists. [Bug 3173086]
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index f2fd0b8..1c1e615 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 TclConvertElement(CONST char *src, int length, + char *dst, int flags); 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, @@ -2781,6 +2783,8 @@ MODULE_SCOPE void TclRememberMutex(Tcl_Mutex *mutex); MODULE_SCOPE void TclRemoveScriptLimitCallbacks(Tcl_Interp *interp); MODULE_SCOPE int TclReToGlob(Tcl_Interp *interp, const char *reStr, int reStrLen, Tcl_DString *dsPtr, int *flagsPtr); +MODULE_SCOPE int TclScanElement(CONST char *string, int length, + int *flagPtr); MODULE_SCOPE void TclSetBgErrorHandler(Tcl_Interp *interp, Tcl_Obj *cmdPrefix); MODULE_SCOPE void TclSetBignumIntRep(Tcl_Obj *objPtr, |