1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-14 23:50:19 +02:00

add (ice-9 poll), a poll wrapper

* libguile/poll.c:
* libguile/poll.h:
* module/ice-9/poll.scm: New module, (ice-9 poll).

* module/Makefile.am:
* libguile/init.c:
* libguile/Makefile.am: Adapt.

* configure.ac: Check for poll.h and poll.
This commit is contained in:
Andy Wingo 2010-12-03 13:09:43 +01:00
parent 0d4e6ca38f
commit 6f81b18abe
7 changed files with 367 additions and 2 deletions

View file

@ -88,6 +88,7 @@
#include "libguile/objprop.h"
#include "libguile/options.h"
#include "libguile/pairs.h"
#include "libguile/poll.h"
#include "libguile/ports.h"
#include "libguile/posix.h"
#ifdef HAVE_REGCOMP
@ -459,6 +460,7 @@ scm_i_init_guile (SCM_STACKITEM *base)
scm_register_foreign ();
scm_register_srfi_1 ();
scm_register_srfi_60 ();
scm_register_poll ();
scm_init_strings (); /* Requires array-handle */
scm_init_struct (); /* Requires strings */