mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-16 16:50:21 +02:00
(scm_c_make_socket_address): Pass address_size pointer
on to scm_fill_sockaddr call.
This commit is contained in:
parent
349b48f9a9
commit
d7c6575f3f
2 changed files with 6 additions and 2 deletions
|
@ -1,3 +1,8 @@
|
||||||
|
2006-02-09 Neil Jerram <neil@ossau.uklinux.net>
|
||||||
|
|
||||||
|
* socket.c (scm_c_make_socket_address): Pass address_size pointer
|
||||||
|
on to scm_fill_sockaddr call.
|
||||||
|
|
||||||
2006-02-04 Neil Jerram <neil@ossau.uklinux.net>
|
2006-02-04 Neil Jerram <neil@ossau.uklinux.net>
|
||||||
|
|
||||||
* throw.h (scm_c_catch, scm_c_with_throw_handler,
|
* throw.h (scm_c_catch, scm_c_with_throw_handler,
|
||||||
|
|
|
@ -1238,11 +1238,10 @@ struct sockaddr *
|
||||||
scm_c_make_socket_address (SCM family, SCM address, SCM args,
|
scm_c_make_socket_address (SCM family, SCM address, SCM args,
|
||||||
size_t *address_size)
|
size_t *address_size)
|
||||||
{
|
{
|
||||||
size_t size;
|
|
||||||
struct sockaddr *soka;
|
struct sockaddr *soka;
|
||||||
|
|
||||||
soka = scm_fill_sockaddr (scm_to_ushort (family), address, &args, 1,
|
soka = scm_fill_sockaddr (scm_to_ushort (family), address, &args, 1,
|
||||||
"scm_c_make_socket_address", &size);
|
"scm_c_make_socket_address", address_size);
|
||||||
|
|
||||||
return soka;
|
return soka;
|
||||||
}
|
}
|
||||||
|
|
Loading…
Add table
Add a link
Reference in a new issue