summaryrefslogtreecommitdiff
path: root/libguile/socket.c
diff options
context:
space:
mode:
authorStefan Jahn <stefan@lkcc.org>2001-11-07 15:08:45 +0000
committerStefan Jahn <stefan@lkcc.org>2001-11-07 15:08:45 +0000
commitb4e15479e93409413bb1dab28c53d9e80302b1ee (patch)
tree83649098cc7caa865dccfac0ff6309b9cc8c1a43 /libguile/socket.c
parent2ca222c2e93e3cd58ad95b984feb2c74d0310284 (diff)
downloadguile-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.c8
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