1 b2ad2ef1 2005-01-04 devnull /* Make this with:  lex delatex.lex;  cc lex.yy.c -ll -o delatex */
 2 b2ad2ef1 2005-01-04 devnull L [A-Za-z]
 3 b2ad2ef1 2005-01-04 devnull %Start Display Math Normal Tag
 4 b2ad2ef1 2005-01-04 devnull %%
 5 b2ad2ef1 2005-01-04 devnull <Normal>\'	{yyleng--; yymore(); /* ignore apostrophes */}
 6 b2ad2ef1 2005-01-04 devnull <Normal>{L}+\\- {yyleng-=2; yymore(); /* ignore hyphens */}
 7 b2ad2ef1 2005-01-04 devnull <Normal>[a-z]/[^A-Za-z] ; /* ignore single letter "words" */
 8 b2ad2ef1 2005-01-04 devnull <Normal>[A-Z]+	; /* ignore words all in uppercase */
 9 b2ad2ef1 2005-01-04 devnull <Normal>{L}+('{L}*)*{L}	{printf("%s\n",yytext); /* any other letter seq is a word */} 
10 b2ad2ef1 2005-01-04 devnull <Normal>"%".*	; /* ignore comments */
11 b2ad2ef1 2005-01-04 devnull <Normal>\\{L}+	; /* ignore other control sequences */
12 b2ad2ef1 2005-01-04 devnull <Normal>"\\begin{"	BEGIN Tag; /* ignore this and up to next "}" */
13 b2ad2ef1 2005-01-04 devnull <Normal>"\\bibitem{"	BEGIN Tag;
14 b2ad2ef1 2005-01-04 devnull <Normal>"\\bibliography{"	BEGIN Tag;
15 b2ad2ef1 2005-01-04 devnull <Normal>"\\bibstyle{"	BEGIN Tag;
16 b2ad2ef1 2005-01-04 devnull <Normal>"\\cite{"	BEGIN Tag;
17 b2ad2ef1 2005-01-04 devnull <Normal>"\\end{"		BEGIN Tag;
18 b2ad2ef1 2005-01-04 devnull <Normal>"\\include{"	BEGIN Tag;
19 b2ad2ef1 2005-01-04 devnull <Normal>"\\includeonly{"	BEGIN Tag;
20 b2ad2ef1 2005-01-04 devnull <Normal>"\\input{"	BEGIN Tag;
21 b2ad2ef1 2005-01-04 devnull <Normal>"\\label{"	BEGIN Tag;
22 b2ad2ef1 2005-01-04 devnull <Normal>"\\pageref{"	BEGIN Tag;
23 b2ad2ef1 2005-01-04 devnull <Normal>"\\ref{"		BEGIN Tag;
24 b2ad2ef1 2005-01-04 devnull <Tag>[^}]		; /* ignore things up to next "}" */
25 b2ad2ef1 2005-01-04 devnull <Tag>"}"		BEGIN Normal;
26 b2ad2ef1 2005-01-04 devnull <Normal>[0-9]+	; /* ignore numbers */
27 b2ad2ef1 2005-01-04 devnull <Normal>"\\("		BEGIN Math; /* begin latex math mode */
28 b2ad2ef1 2005-01-04 devnull <Math>"\\)"		BEGIN Normal; /* end latex math mode */
29 b2ad2ef1 2005-01-04 devnull <Math>.|\\[^)]|\n	; /* ignore anything else in latex math mode */
30 b2ad2ef1 2005-01-04 devnull <Normal>"\\["		BEGIN Display; /* now in Latex display mode */
31 b2ad2ef1 2005-01-04 devnull <Display>[^$]|\\[^\]]	; /* ignore most things in display math mode */
32 b2ad2ef1 2005-01-04 devnull <Display>"\\]"	BEGIN Normal; /* get out of Display math mode */
33 b2ad2ef1 2005-01-04 devnull <Normal>\\.	; /* ignore other single character control sequences */
34 b2ad2ef1 2005-01-04 devnull <Normal>\\\n	; /* more of the same */
35 b2ad2ef1 2005-01-04 devnull <Normal>\n|.	; /* ignore anything else, a character at a time */
36 b2ad2ef1 2005-01-04 devnull %%
37 b2ad2ef1 2005-01-04 devnull #include <stdio.h>
38 b2ad2ef1 2005-01-04 devnull #include <stdlib.h>
39 b2ad2ef1 2005-01-04 devnull 
40 b2ad2ef1 2005-01-04 devnull int
41 b2ad2ef1 2005-01-04 devnull main(int argc, char **argv)
42 b2ad2ef1 2005-01-04 devnull {
43 b2ad2ef1 2005-01-04 devnull 	int i;
44 b2ad2ef1 2005-01-04 devnull 	
45 b2ad2ef1 2005-01-04 devnull 	BEGIN Normal; /* Starts yylex off in the right state */
46 b2ad2ef1 2005-01-04 devnull 	if (argc==1) {
47 b2ad2ef1 2005-01-04 devnull 	    yyin = stdin;
48 b2ad2ef1 2005-01-04 devnull 	    yylex();
49 b2ad2ef1 2005-01-04 devnull 	    }
50 b2ad2ef1 2005-01-04 devnull 	else for (i=1; i<argc; i++) {
51 b2ad2ef1 2005-01-04 devnull 	    yyin = fopen(argv[i],"r");
52 b2ad2ef1 2005-01-04 devnull 	    if (yyin==NULL) {
53 b2ad2ef1 2005-01-04 devnull 		fprintf(stderr,"can't open %s\n",argv[i]);
54 b2ad2ef1 2005-01-04 devnull 		exit(1);
55 b2ad2ef1 2005-01-04 devnull 		}
56 b2ad2ef1 2005-01-04 devnull 	    yylex();
57 b2ad2ef1 2005-01-04 devnull 	    }
58 b2ad2ef1 2005-01-04 devnull 	exit(0);
59 b2ad2ef1 2005-01-04 devnull }
60 b2ad2ef1 2005-01-04 devnull int
61 b2ad2ef1 2005-01-04 devnull yywrap(void)
62 b2ad2ef1 2005-01-04 devnull {
63 b2ad2ef1 2005-01-04 devnull 	return 1;
64 b2ad2ef1 2005-01-04 devnull }