| version 1.6, Sat Sep 13 12:04:58 1997 UTC | version 1.7, Sun Dec 14 01:15:19 1997 UTC | ||
|---|---|---|---|
|
|
||
| open-lib c_addr1 u1 -- u2 gforth open_lib | open-lib c_addr1 u1 -- u2 gforth open_lib | ||
| #if defined(HAVE_LIBDL) || defined(HAVE_DLOPEN) | #if defined(HAVE_LIBDL) || defined(HAVE_DLOPEN) | ||
| u2=(UCell) dlopen(cstr(c_addr1, u1, 1), RTLD_LAZY); | u2=(UCell) dlopen(cstr(c_addr1, u1, 1), RTLD_GLOBAL | RTLD_LAZY); | ||
| #else | #else | ||
| # ifdef HAVE_LIBKERNEL32 | # ifdef HAVE_LIBKERNEL32 | ||
| u2 = (Cell) GetModuleHandle(cstr(c_addr1, u1, 1)); | u2 = (Cell) GetModuleHandle(cstr(c_addr1, u1, 1)); |
|
||||||||
|
CVS Admin Powered by ViewCVS 1.0-dev |
ViewCVS and CVS Help |