common-lisp/sbcl.sbcl
1
0
Fork 0
mirror of git://git.code.sf.net/p/sbcl/sbcl synced 2026-09-10 07:26:40 -04:00
Code Issues Actions 8 Packages Projects Releases Wiki Activity

Fix bug in os-getprotoby test

Browse source 
* getprotobynumber_r should receive an integer, not a string.

* skip the whole test for NetBSD as explained
This commit is contained in:
Douglas Katzman 2020-02-17 21:42:45 -05:00
parent a76bc9fe87
commit 294c5feae4
1 changed files with 22 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

23
tools-for-build/os-provides-getprotoby-r-test.c
View file

@ -7,10 +7,31 @@
int main ()
{
#if __NetBSD__
/*
* For me the code below compiles, but it segfaults when actually run:
* (gdb) where
* #0 0x00007f7fc20050a9 in _rtld_symlook_obj () from /usr/libexec/ld.elf_so
* #1 0x00007f7fc20059e0 in _rtld_symlook_default () from /usr/libexec/ld.elf_so
* #2 0x00007f7fc20060d3 in _rtld_find_plt_symdef () from /usr/libexec/ld.elf_so
* #3 0x00007f7fc2000bc5 in _rtld_bind () from /usr/libexec/ld.elf_so
* #4 0x00007f7fc20007fd in _rtld_bind_start () from /usr/libexec/ld.elf_so
* #5 0x0000000000000000 in ?? ()
*
* I guess that somebody decided it would be clever to pretend that the calls exist,
* but then /usr/libexec/ld.elf_so can't figure out what to do.
*
* This is EXTREMELY disconcerting, as it occurs during 'make-config.sh'
* and so you're not sure (without a nontrivial amount of debugging)
* whether configuration completed without error.
*/
return 1; // just say "no"
#else
struct protoent result_buf;
struct protoent *result;
char buf[BUFSIZE];
getprotobyname_r("", &result_buf, buf, BUFSIZE, &result);
getprotobynumber_r("", &result_buf, buf, BUFSIZE, &result);
getprotobynumber_r(0, &result_buf, buf, BUFSIZE, &result);
return 104;
#endif
}