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 /unix | |
| 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 'unix')
| -rw-r--r-- | unix/tclLoadDl.c | 4 | ||||
| -rw-r--r-- | unix/tclLoadDyld.c | 4 |
2 files changed, 4 insertions, 4 deletions
diff --git a/unix/tclLoadDl.c b/unix/tclLoadDl.c index 267067f..dc711f8 100644 --- a/unix/tclLoadDl.c +++ b/unix/tclLoadDl.c @@ -87,12 +87,12 @@ TclpDlopen( /* * Use (RTLD_NOW|RTLD_LOCAL) as default, see [Bug #3216070] */ - if (flags & 1) { + if (flags & TCL_LOAD_GLOBAL) { dlopenflags |= RTLD_GLOBAL; } else { dlopenflags |= RTLD_LOCAL; } - if (flags & 2) { + if (flags & TCL_LOAD_LAZY) { dlopenflags |= RTLD_LAZY; } else { dlopenflags |= RTLD_NOW; diff --git a/unix/tclLoadDyld.c b/unix/tclLoadDyld.c index 578ce10..5df022e 100644 --- a/unix/tclLoadDyld.c +++ b/unix/tclLoadDyld.c @@ -189,12 +189,12 @@ TclpDlopen( * Use (RTLD_NOW|RTLD_LOCAL) as default, see [Bug #3216070] */ - if (flags & 1) { + if (flags & TCL_LOAD_GLOBAL) { dlopenflags |= RTLD_GLOBAL; } else { dlopenflags |= RTLD_LOCAL; } - if (flags & 2) { + if (flags & TCL_LOAD_LAZY) { dlopenflags |= RTLD_LAZY; } else { dlopenflags |= RTLD_NOW; |