mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-17 01:00:20 +02:00
Code Activity

let fdsocket.c compile if struct linger is missing

Browse source
This commit is contained in:
Gary Houston 1996-08-03 03:12:33 +00:00
parent 02b754d3a6
commit 2e18892a89
5 changed files with 104 additions and 43 deletions
Download patch file Download diff file Expand all files Collapse all files

2
libguile/socket.c
View file

@ -34,7 +34,7 @@ scm_sys_inet_aton (address)
#endif
{
struct in_addr soka;
int rv;
SCM_ASSERT (SCM_NIMP (address) && SCM_ROSTRINGP (address), address, SCM_ARG1, s_sys_inet_aton);
if (SCM_SUBSTRP (address))
address = scm_makfromstr (SCM_ROCHARS (address), SCM_ROLENGTH (address), 0);