diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-06-07 14:18:40 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-06-07 14:18:40 (GMT) |
| commit | 860a7252bb242157af32c222cca494d3d9635bc4 (patch) | |
| tree | 92e97e060472f0662cb300189f025d1c30885d4f /generic/tclInt.h | |
| parent | 0fbfb196c3b93d788a90aecc5b76dfedbbd9f007 (diff) | |
| download | tcl-860a7252bb242157af32c222cca494d3d9635bc4.zip tcl-860a7252bb242157af32c222cca494d3d9635bc4.tar.gz tcl-860a7252bb242157af32c222cca494d3d9635bc4.tar.bz2 | |
Improved the error messages.
We do not want parsing an invalid dictionary to give errors about lists!
As compensation, we get greater precision in the errorcode.
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 b1a368e..9a2e8dd 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -2881,6 +2881,10 @@ MODULE_SCOPE void TclContinuationsCopy(Tcl_Obj *objPtr, MODULE_SCOPE int TclConvertElement(const char *src, int length, char *dst, int flags); MODULE_SCOPE void TclDeleteNamespaceVars(Namespace *nsPtr); +MODULE_SCOPE int TclFindDictElement(Tcl_Interp *interp, + const char *dict, int dictLength, + const char **elementPtr, const char **nextPtr, + int *sizePtr, int *literalPtr); /* TIP #280 - Modified token based evulation, with line information. */ MODULE_SCOPE int TclEvalEx(Tcl_Interp *interp, const char *script, int numBytes, int flags, int line, |