X-Git-Url: http://git.hcoop.net/bpt/guile.git/blobdiff_plain/26d148066f9cb20e395a7dc4fefdf2e2ef0b2fb0..d77f65b4ca1e27c7b92650aaabeb1f7261a6839b:/module/ice-9/poll.scm

diff --git a/module/ice-9/poll.scm b/module/ice-9/poll.scm
index 1633dcbc5..57b5047ab 100644
--- a/module/ice-9/poll.scm
+++ b/module/ice-9/poll.scm
@@ -34,7 +34,7 @@
             poll-set-remove!
             poll))
 
-(eval-when (eval load compile)
+(eval-when (expand load eval)
   (load-extension (string-append "libguile-" (effective-version))
                   "scm_init_poll"))