2 * Copyright (C) 1994, Index Data I/S
4 * Sebastian Hammer, Adam Dickmeiss
7 * Revision 1.4 1994-10-04 17:46:44 adam
8 * Function options now returns arg with error option.
10 * Revision 1.3 1994/10/03 17:22:19 adam
11 * Optimization of grepper.
13 * Revision 1.2 1994/09/27 16:31:20 adam
14 * First version of grepper: grep with error correction.
16 * Revision 1.1 1994/09/26 10:16:55 adam
17 * First version of dfa module in alex. This version uses yacc to parse
18 * regular expressions. This should be hand-made instead.
21 * Adam Dickmeiss. 1992-1993
22 * This module is actually very old...
39 void error (const char *format, ...)
42 va_start (argptr, format);
43 fprintf (stderr, "%s error: ", prog);
44 (void) vfprintf (stderr, format, argptr);
56 static int lexer_options (int argc, char **argv)
65 fprintf (stderr, "%s: %s %s\n", prog, __DATE__, __TIME__);
90 debug_dfa_followpos = 1;
95 debug_dfa_followpos = 1;
100 fprintf (stderr, "%s: unknown option `-%s'\n",
109 int main (int argc, char **argv)
121 i = lexer_options (argc, argv);
127 fprintf (stderr, "usage\n %s [-c] [-V] [-s] [-t] [-d[stf]] file\n",
131 else while (--argc > 0)
132 if (**++argv != '-' && **argv)
135 i = read_file (*argv, &dfa);
138 dfas = mk_dfas (dfa, 2000);
147 fprintf (stderr, "%s: no files specified\n", prog);