Working.

[idzebra-moved-to-github.git] / util / res-test.c

diff --git a/util/res-test.c b/util/res-test.c
index 7e76454..d947dde 100644 (file)
--- a/util/res-test.c
+++ b/util/res-test.c
@@ -4,7 +4,13 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: res-test.c,v $
- * Revision 1.2  1994-08-18 10:02:01  adam
+ * Revision 1.4  1994-10-04 17:47:11  adam
+ * Function options now returns arg with error option.
+ *
+ * Revision 1.3  1994/08/18  11:02:27  adam
+ * Implementation of res_write.
+ *
+ * Revision 1.2  1994/08/18  10:02:01  adam
  * Module alexpath moved from res.c to alexpath.c. Minor changes in res-test.c
  *
  * Revision 1.1  1994/08/18  09:43:51  adam
@@ -28,27 +34,32 @@ int main(int argc, char **argv)
     int ret;
     char *prog = *argv;
     Res res;
+    int write_flag = 0;
 
     log_init (LOG_DEFAULT_LEVEL, prog, NULL);
-    while ((ret = options ("p:v", argv, argc, &arg)) != -2)
+    while ((ret = options ("wp:v", argv, argc, &arg)) != -2)
         if (ret == 0)
             resfile = arg;
         else if (ret == 'v')
             log_init (LOG_ALL, prog, NULL);
         else if (ret == 'p')
             prefix = arg;
+        else if (ret == 'w')
+            write_flag = 1;
         else
         {
-            log (LOG_FATAL, "unknown option");
+            log (LOG_FATAL, "Unknown option '-%s'", arg);
             exit (1);
         }
     if (!resfile)
     {
-        log (LOG_FATAL, "Now resource file given.");
+        log (LOG_FATAL, "No resource file given.");
         exit (1);
     }
     res = res_open (resfile);
     res_trav (res, prefix, res_print);
+    if (write_flag)
+        res_write (res);
     res_close (res);
     return 0;
 }