diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2016-07-07 10:08:44 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2016-07-07 10:08:44 (GMT) |
| commit | 38f4a53699309fdec415cf81e5c2ba6137ff8cf4 (patch) | |
| tree | 08157cc1abfdc178d86fa2411644a51a26e50bde /generic/tclInt.h | |
| parent | cb3f1f4d66a91e4efc123a4518e8fa171af58145 (diff) | |
| download | tcl-38f4a53699309fdec415cf81e5c2ba6137ff8cf4.zip tcl-38f4a53699309fdec415cf81e5c2ba6137ff8cf4.tar.gz tcl-38f4a53699309fdec415cf81e5c2ba6137ff8cf4.tar.bz2 | |
Expose the AVOID_RESOLVERS flag to [namespace upvar] implementations, which seem to need it.bug_1493a43044
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index fba4c7b..6d2db5d 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -170,6 +170,21 @@ typedef struct Tcl_ResolverInfo { } Tcl_ResolverInfo; /* + * This flag bit should not interfere with TCL_GLOBAL_ONLY, + * TCL_NAMESPACE_ONLY, or TCL_LEAVE_ERR_MSG; it signals that the variable + * lookup is performed for upvar (or similar) purposes, with slightly + * different rules: + * - Bug #696893 - variable is either proc-local or in the current + * namespace; never follow the second (global) resolution path + * - Bug #631741 - do not use special namespace or interp resolvers + * + * It should also not collide with the (deprecated) TCL_PARSE_PART1 flag + * (Bug #835020) + */ + +#define TCL_AVOID_RESOLVERS 0x40000 + +/* *---------------------------------------------------------------- * Data structures related to namespaces. *---------------------------------------------------------------- |