From 7e91e01dd85ae4a54f7f4c41bbb174fb73cddeeb Mon Sep 17 00:00:00 2001
From: Andy Wingo <wingo@pobox.com>
Date: Tue, 30 Sep 2008 23:57:13 +0200
Subject: [PATCH] load the i18n extension when compiling i18n.scm

* ice-9/i18n.scm: Load the i18n extension when compiling too, so that the
  macros that depend on (provided? 'nl-langinfo) actually have
  nl-langinfo. Fixes the i18n test.
---
 ice-9/i18n.scm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/ice-9/i18n.scm b/ice-9/i18n.scm
index e7c116e53..2a8e7414c 100644
--- a/ice-9/i18n.scm
+++ b/ice-9/i18n.scm
@@ -83,7 +83,9 @@
            locale-yes-regexp locale-no-regexp))
 
 
-(load-extension "libguile-i18n-v-0" "scm_init_i18n")
+(eval-case
+ ((load-toplevel compile-toplevel)
+  (load-extension "libguile-i18n-v-0" "scm_init_i18n")))
 
 
 ;;;