diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-07 08:03:10 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2012-11-07 08:03:10 (GMT) |
| commit | c7943be5f2af9c61fd59c86c6d96840896fdc1da (patch) | |
| tree | ce8aaef67aa0fe96f08821954b71216a91a10eea /generic/tclLoad.c | |
| parent | 3bbffed01d2dbaa523b752cf39da3868869ab30a (diff) | |
| download | tcl-c7943be5f2af9c61fd59c86c6d96840896fdc1da.zip tcl-c7943be5f2af9c61fd59c86c6d96840896fdc1da.tar.gz tcl-c7943be5f2af9c61fd59c86c6d96840896fdc1da.tar.bz2 | |
Finish the TIP #416 implementation as specified (#define's were still missing). Added warning to "load" documentation. Added test case for using -global without specifying filename.
Diffstat (limited to 'generic/tclLoad.c')
| -rw-r--r-- | generic/tclLoad.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclLoad.c b/generic/tclLoad.c index 22cfc65..5cacab1 100644 --- a/generic/tclLoad.c +++ b/generic/tclLoad.c @@ -151,9 +151,9 @@ Tcl_LoadObjCmd( } ++objv; --objc; if (LOAD_GLOBAL == (enum options) index) { - flags |= 1; + flags |= TCL_LOAD_GLOBAL; } else if (LOAD_LAZY == (enum options) index) { - flags |= 2; + flags |= TCL_LOAD_LAZY; } else { break; } |