Unused static function rm_SetElement was removed.

[idzebra-moved-to-github.git] / dfa / lexer.c

diff --git a/dfa/lexer.c b/dfa/lexer.c
index 998b69f..85fa2e5 100644 (file)
--- a/dfa/lexer.c
+++ b/dfa/lexer.c
@@ -4,7 +4,18 @@
  * Sebastian Hammer, Adam Dickmeiss
  *
  * $Log: lexer.c,v $
- * Revision 1.3  1994-10-03 17:22:19  adam
+ * Revision 1.6  1995-01-25 11:30:51  adam
+ * Simple error reporting when parsing regular expressions.
+ * Memory usage reduced.
+ *
+ * Revision 1.5  1995/01/24  16:00:22  adam
+ * Added -ansi to CFLAGS.
+ * Some changes to the dfa module.
+ *
+ * Revision 1.4  1994/10/04  17:46:44  adam
+ * Function options now returns arg with error option.
+ *
+ * Revision 1.3  1994/10/03  17:22:19  adam
  * Optimization of grepper.
  *
  * Revision 1.2  1994/09/27  16:31:20  adam
@@ -106,8 +117,7 @@ static int lexer_options (int argc, char **argv)
 int main (int argc, char **argv)
 {
     int i, no = 0;
-    DFA *dfa;
-    DFA_states *dfas;
+    struct DFA *dfa;
 
     prog = *argv;
 #ifdef YACC
@@ -115,6 +125,7 @@ int main (int argc, char **argv)
 #else
     alexdebug = 0;
 #endif
+    dfa = dfa_init ();
     i = lexer_options (argc, argv);
     if (i)
         return i;
@@ -126,16 +137,20 @@ int main (int argc, char **argv)
         return 1;
     }
     else while (--argc > 0)
-            if (**++argv != '-' && **argv)
-            {
-                ++no;
-                i = read_file (*argv, &dfa);
-                if (i)
-                    return i;
-                dfas = mk_dfas (dfa, 2000);
-                rm_dfa (&dfa);
-                rm_dfas (&dfas);
-            }
+        if (**++argv != '-' && **argv)
+        {
+            ++no;
+            
+            i = read_file (*argv, dfa);
+            if (i)
+                return i;
+            dfa_mkstate (dfa);
+
+#ifdef MEMDEBUG
+    imemstat();
+#endif
+        }
+    dfa_delete (&dfa);
 #ifdef MEMDEBUG
     imemstat();
 #endif