X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=tools-for-build%2Fos-provides-dladdr-test.c;h=1c2ac4577d2a1adadfd4dccfb49c225f45c30243;hb=e0aff99a73d836da0dad4602e5559595fbe5ba5c;hp=ba899a23174c1920651e5e709cb2dcd28dff4393;hpb=e8607908388c96db633bb7046a4b97844642768b;p=sbcl.git diff --git a/tools-for-build/os-provides-dladdr-test.c b/tools-for-build/os-provides-dladdr-test.c index ba899a2..1c2ac45 100644 --- a/tools-for-build/os-provides-dladdr-test.c +++ b/tools-for-build/os-provides-dladdr-test.c @@ -4,6 +4,7 @@ /* bloody FSF dlcfn.h won't give us dladdr without this */ #define _GNU_SOURCE +#include #include int main () @@ -11,8 +12,7 @@ int main () void * handle = dlopen((void*)0, RTLD_GLOBAL | RTLD_NOW); void * addr = dlsym(handle, "printf"); Dl_info * info = (Dl_info*) malloc(sizeof(Dl_info)); - dladdr(addr, info); - if (strcmp(info->dli_sname, "printf")) { + if (dladdr(addr, info) == 0) { return 1; } else { return 104;