summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2012-01-26 18:21:01 +0100
committerAndy Wingo <wingo@pobox.com>2012-01-26 18:21:01 +0100
commit0133e13f3424db582f3f58c13d6f3dc0627bd53b (patch)
treee0de4ee3f9f9a2498907a29a834b00520e7d1097
parent68c31a42ab137a5a54a577f19a69dfcbcfd33271 (diff)
downloadguile-0133e13f3424db582f3f58c13d6f3dc0627bd53b.tar.gz
fix test-loose-ends
* test-suite/standalone/test-loose-ends.c (test_scm_local_eval): Use ice-9 local-eval to get (the-environment).
-rw-r--r--test-suite/standalone/test-loose-ends.c5
1 files changed, 4 insertions, 1 deletions
diff --git a/test-suite/standalone/test-loose-ends.c b/test-suite/standalone/test-loose-ends.c
index f815ae253..d1d683175 100644
--- a/test-suite/standalone/test-loose-ends.c
+++ b/test-suite/standalone/test-loose-ends.c
@@ -45,7 +45,10 @@ test_scm_from_locale_keywordn ()
static void
test_scm_local_eval ()
{
- SCM result = scm_local_eval
+ SCM result;
+
+ scm_c_use_module ("ice-9 local-eval");
+ result = scm_local_eval
(scm_list_3 (scm_from_latin1_symbol ("+"),
scm_from_latin1_symbol ("x"),
scm_from_latin1_symbol ("y")),