version 1.243, 2009/06/29 20:21:28
|
version 1.244, 2009/10/05 15:54:28
|
Line 2465 lib-error ( -- c_addr u ) gforth
|
Line 2465 lib-error ( -- c_addr u ) gforth
|
#ifdef HAVE_LIBLTDL |
#ifdef HAVE_LIBLTDL |
c_addr = (Char *)lt_dlerror(); |
c_addr = (Char *)lt_dlerror(); |
u = (c_addr == NULL) ? 0 : strlen((char *)c_addr); |
u = (c_addr == NULL) ? 0 : strlen((char *)c_addr); |
|
#elif defined(HAVE_LIBDL) || defined(HAVE_DLOPEN) |
|
c_addr = dlerror(); |
|
u = strlen(c_addr); |
#else |
#else |
c_addr = "libltdl is not configured"; |
c_addr = "libltdl is not configured"; |
u = strlen(c_addr); |
u = strlen(c_addr); |