Assorted `syntax-check' fixes.

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

diff --git a/test-suite/standalone/test-unwind.c b/test-suite/standalone/test-unwind.c
index 2d6894d..cf56a96 100644 (file)
--- a/test-suite/standalone/test-unwind.c
+++ b/test-suite/standalone/test-unwind.c
@@ -129,7 +129,7 @@ check_flag1 (const char *tag, void (*func)(void), int val)
   if (flag1 != val)
     {
       printf ("%s failed\n", tag);
-      exit (1);
+      exit (EXIT_FAILURE);
     }
 }
 
@@ -170,7 +170,7 @@ check_cont (int rewindable)
       if (rewindable)
        return;
       printf ("continuation not blocked\n");
-      exit (1);
+      exit (EXIT_FAILURE);
     }
   else
     {
@@ -178,7 +178,7 @@ check_cont (int rewindable)
       if (!rewindable)
        return;
       printf ("continuation didn't work\n");
-      exit (1);
+      exit (EXIT_FAILURE);
     }
 }
 
@@ -211,7 +211,7 @@ check_ports ()
   /* Sanity check: Make sure that `filename' is actually writeable.
      We used to use mktemp(3), but that is now considered a security risk.  */
   if (0 > mkstemp (filename))
-    exit (1);
+    exit (EXIT_FAILURE);
 
   scm_dynwind_begin (0);
   {
@@ -239,7 +239,7 @@ check_ports ()
     if (scm_is_false (scm_equal_p (res, scm_version ())))
       {
        printf ("ports didn't work\n");
-       exit (1);
+       exit (EXIT_FAILURE);
       }
   }
   scm_dynwind_end ();
@@ -262,13 +262,13 @@ check_fluid ()
   if (!scm_is_eq (x, scm_from_int (13)))
     {
       printf ("setting fluid didn't work\n");
-      exit (1);
+      exit (EXIT_FAILURE);
     }
 
   if (!scm_is_eq (scm_fluid_ref (f), scm_from_int (12)))
     {
       printf ("resetting fluid didn't work\n");
-      exit (1);
+      exit (EXIT_FAILURE);
     }
 }
 
@@ -287,7 +287,7 @@ inner_main (void *data, int argc, char **argv)
 
   check_fluid ();
 
-  exit (0);
+  exit (EXIT_SUCCESS);
 }
 
 int