merge from 1.8 branch

[bpt/guile.git] / test-suite / standalone / test-list.c

diff --git a/test-suite/standalone/test-list.c b/test-suite/standalone/test-list.c
index de2645f..7a9514a 100644 (file)
--- a/test-suite/standalone/test-list.c
+++ b/test-suite/standalone/test-list.c
@@ -46,10 +46,15 @@ test_scm_list (void)
   }
 }
 
-int
-main (int argc, char **argv)
+static void
+tests (void *data, int argc, char **argv)
 {
-  scm_init_guile();
   test_scm_list ();
+}
+
+int
+main (int argc, char *argv[])
+{
+  scm_boot_guile (argc, argv, tests, NULL);
   return 0;
 }