merge from 1.8 branch

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

diff --git a/test-suite/standalone/test-num2integral.c b/test-suite/standalone/test-num2integral.c
index 947890a..86c3e5d 100644 (file)
--- a/test-suite/standalone/test-num2integral.c
+++ b/test-suite/standalone/test-num2integral.c
@@ -141,12 +141,17 @@ test_ulong_long ()
 #endif /* SCM_SIZEOF_LONG_LONG != 0 */
 }
 
-int
-main (int argc, char *argv[])
+static void
+tests (void *data, int argc, char **argv)
 {
-  scm_init_guile();
   test_long_long ();
   test_ulong_long ();
+}
+
+int
+main (int argc, char *argv[])
+{
+  scm_boot_guile (argc, argv, tests, NULL);
   return 0;
 }