diff options
author | Stefan Jahn <stefan@lkcc.org> | 2001-11-07 15:08:45 +0000 |
---|---|---|
committer | Stefan Jahn <stefan@lkcc.org> | 2001-11-07 15:08:45 +0000 |
commit | b4e15479e93409413bb1dab28c53d9e80302b1ee (patch) | |
tree | 83649098cc7caa865dccfac0ff6309b9cc8c1a43 /libguile/socket.c | |
parent | 2ca222c2e93e3cd58ad95b984feb2c74d0310284 (diff) | |
download | guile-b4e15479e93409413bb1dab28c53d9e80302b1ee.tar.gz |
2001-11-07 Stefan Jahn <stefan@lkcc.org>
* configure.in: Include `win32-socket.o' in the list of object
files if networking is enabled on Win32.
2001-11-07 Stefan Jahn <stefan@lkcc.org>
* win32-socket.[ch]: New files. Defines Winsock-API error codes
and makes them available through Guile. That is because the
Winsock-API does not store its errors in `errno' and thus cannot
return error messages via `strerror (errno)'.
* socket.c (scm_init_socket): Initialize `win32-socket' part
here under M$-Windows.
* numbers.h: Added missing declaration of
`scm_sys_check_number_conversions()'.
* error.c: Local definition of SCM_I_STRERROR and SCM_I_ERRNO
and use in `(strerror)' and `(system-error)'.
* Makefile.am (EXTRA_libguile_la_SOURCES): Added
`win32-socket.[ch]' to extra source and header files.
Diffstat (limited to 'libguile/socket.c')
-rw-r--r-- | libguile/socket.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/libguile/socket.c b/libguile/socket.c index 44539bce9..7dc729ca1 100644 --- a/libguile/socket.c +++ b/libguile/socket.c @@ -54,6 +54,10 @@ #include "libguile/validate.h" #include "libguile/socket.h" +#ifdef __MINGW32__ +#include "win32-socket.h" +#endif + #ifdef HAVE_STRING_H #include <string.h> #endif @@ -1383,6 +1387,10 @@ scm_init_socket () scm_c_define ("MSG_DONTROUTE", SCM_MAKINUM (MSG_DONTROUTE)); #endif +#ifdef __MINGW32__ + scm_i_init_socket_Win32 (); +#endif + scm_add_feature ("socket"); #ifndef SCM_MAGIC_SNARFER |