summaryrefslogtreecommitdiffstats
path: root/unix/tclLoadDl.c
diff options
context:
space:
mode:
authornijtmans@users.sourceforge.net <jan.nijtmans>2012-11-07 08:03:10 (GMT)
committernijtmans@users.sourceforge.net <jan.nijtmans>2012-11-07 08:03:10 (GMT)
commit11dd3a9a3a4d631ff39620fe4161b5565d32b0c4 (patch)
treece8aaef67aa0fe96f08821954b71216a91a10eea /unix/tclLoadDl.c
parentbc83fa807cd1559700f50f057e33567a931c137e (diff)
downloadtcl-11dd3a9a3a4d631ff39620fe4161b5565d32b0c4.zip
tcl-11dd3a9a3a4d631ff39620fe4161b5565d32b0c4.tar.gz
tcl-11dd3a9a3a4d631ff39620fe4161b5565d32b0c4.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/tclLoadDl.c')
-rw-r--r--unix/tclLoadDl.c4
1 files changed, 2 insertions, 2 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;