]> code.delx.au - gnu-emacs/commitdiff
(main): For failing cases, exit with `EXIT_FAILURE'.
authorThien-Thi Nguyen <ttn@gnuvola.org>
Mon, 10 May 2004 17:32:13 +0000 (17:32 +0000)
committerThien-Thi Nguyen <ttn@gnuvola.org>
Mon, 10 May 2004 17:32:13 +0000 (17:32 +0000)
lib-src/ChangeLog
lib-src/test-distrib.c

index c841df230974c9567a9bceb814c699149b69affc..ac789eb3181b1ae7104047def06475e51ee1a55e 100644 (file)
@@ -1,3 +1,7 @@
+2004-05-10  Thien-Thi Nguyen  <ttn@gnu.org>
+
+       * test-distrib.c (main): For failing cases, exit with `EXIT_FAILURE'.
+
 2004-05-08  Jason Rumney  <jasonr@gnu.org>
 
        * makefile.w32-in (lisp1, lisp2): Split lisp to avoid long
index 97e87695c7c11189e7cb83ade462714dd522f1fa..0333bd7d71057a0aaac2bf449ef1b001cfdcee9c 100644 (file)
@@ -80,13 +80,13 @@ main (argc, argv)
   if (argc != 2)
     {
       fprintf (stderr, "Usage: %s testfile\n", argv[0]);
-      exit (2);
+      exit (EXIT_FAILURE);
     }
   fd = open (argv[1], O_RDONLY);
   if (fd < 0)
     {
       perror (argv[1]);
-      exit (2);
+      exit (EXIT_FAILURE);
     }
   if (cool_read (fd, buf, sizeof string1) != sizeof string1 ||
       strcmp (buf, string1) ||
@@ -97,7 +97,7 @@ main (argc, argv)
 Most likely this means that many nonprinting characters\n\
 have been corrupted in the files of Emacs, and it will not work.\n",
               argv[1]);
-      exit (2);
+      exit (EXIT_FAILURE);
     }
   close (fd);
   return EXIT_SUCCESS;