--- gforth/prim	1997/12/14 01:15:19	1.7
+++ gforth/prim	1998/06/04 16:17:41	1.8
@@ -2016,6 +2016,9 @@ rret = ((Float(*)(argdlist($1)))u)(argcl
 
 open-lib	c_addr1 u1 -- u2	gforth	open_lib
 #if defined(HAVE_LIBDL) || defined(HAVE_DLOPEN)
+#ifndef RTLD_GLOBAL
+#define RTLD_GLOBAL 0
+#endif
 u2=(UCell) dlopen(cstr(c_addr1, u1, 1), RTLD_GLOBAL | RTLD_LAZY);
 #else
 #  ifdef HAVE_LIBKERNEL32