mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-04-30 11:50:28 +02:00
Code Activity

2005-10-27 Ludovic Courtès <ludovic.courtes@laas.fr>

Browse source 
* socket.c (scm_fill_sockaddr): No need to check NULL from scm_malloc.
	(scm_connect, scm_bind, scm_sendto): Accept sockaddr object.
	(scm_addr_vector): Renamed to _scm_from_sockaddr, update usages.
	(scm_from_sockaddr, scm_to_sockaddr, scm_make_socket_address,
	scm_c_make_socket_address): New functions.
	* socket.h: Add prototypes.
This commit is contained in:
Kevin Ryde 2005-10-27 00:28:40 +00:00
parent 9c0129aca2
commit 6fc0a1b599
1 changed files with 11 additions and 1 deletions
Download patch file Download diff file Expand all files Collapse all files

12
libguile/socket.h
View file

@ -3,7 +3,7 @@
#ifndef SCM_SOCKET_H #ifndef SCM_SOCKET_H
#define SCM_SOCKET_H #define SCM_SOCKET_H
/* Copyright (C) 1995,1996,1997,2000,2001, 2004 Free Software Foundation, Inc. /* Copyright (C) 1995,1996,1997,2000,2001, 2004, 2005 Free Software Foundation, Inc.
* *
* This library is free software; you can redistribute it and/or * This library is free software; you can redistribute it and/or
* modify it under the terms of the GNU Lesser General Public * modify it under the terms of the GNU Lesser General Public
@ -54,6 +54,16 @@ SCM_API SCM scm_recvfrom (SCM sockfd, SCM buff_or_size, SCM flags, SCM offset, S
SCM_API SCM scm_sendto (SCM sockfd, SCM message, SCM fam, SCM address, SCM args_and_flags); SCM_API SCM scm_sendto (SCM sockfd, SCM message, SCM fam, SCM address, SCM args_and_flags);
SCM_API void scm_init_socket (void); SCM_API void scm_init_socket (void);
/* Wrapping/unwrapping address objects. */
struct sockaddr;
SCM_API SCM scm_from_sockaddr (const struct sockaddr *address,
unsigned addr_size);
SCM_API struct sockaddr *scm_to_sockaddr (SCM address, size_t *adress_size);
SCM_API struct sockaddr *scm_c_make_socket_address (SCM family, SCM address,
SCM args,
size_t *address_size);
SCM_API SCM scm_make_socket_address (SCM family, SCM address, SCM args);
#endif /* SCM_SOCKET_H */ #endif /* SCM_SOCKET_H */
/* /*