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

* hashtab.h: Bugfix: use SCM_API (WAS: extern).

Browse source 
* socket.c: Remove obsolete comment about socklen_t.
(s_scm_setsockopt)[!HAVE_IP_MREQ]: Do not use ip_mreq code.

* numbers.h (isnan)[__MINGW32__]: Remove.

* Makefile.am (gen_scmconfig_SOURCES): Bugfix: Add
DEFAULT_INCLUDES when cross compiling.

* threads.c (ETIMEDOUT, pipe)[__MINGW32__]: Add defines.

* stime.c (s_scm_strftime)[!HAVE_TM_ZONE]: Use
SCM_SIMPLE_VECTOR_REF instead of SCM_VELTS.  (Changed slightly
from Jan's patch.)
This commit is contained in:
Marius Vollmer 2005-06-05 18:27:53 +00:00
parent 875a58aa81
commit ecc9f40fe5
6 changed files with 21 additions and 13 deletions
Download patch file Download diff file Expand all files Collapse all files

9
libguile/threads.c
View file

@ -43,6 +43,15 @@
#include "libguile/continuations.h"
#include "libguile/init.h"
#ifdef __MINGW32__
#ifndef ETIMEDOUT
# define ETIMEDOUT WSAETIMEDOUT
#endif
# include <fcntl.h>
# include <process.h>
# define pipe(fd) _pipe (fd, 256, O_BINARY)
#endif /* __MINGW32__ */
/*** Queues */
/* Make an empty queue data structure.