remove empty dir
[ghc-hetmet.git] / glafp-utils / sgmlverb / sgmlverb.lex
index d6ce058..812cb84 100644 (file)
@@ -20,6 +20,7 @@ miranda                       ([0-9]+(\-([0-9]+)?)?)?>
 #define PUSH           states[top++] =
 #define POP            BEGIN states[--top]
 #define yywrap()       1
+#define YY_SKIP_YYWRAP
 %}
 %%
                        int states[256];
@@ -28,6 +29,7 @@ miranda                       ([0-9]+(\-([0-9]+)?)?)?>
                        top = 0;
 <NORM>@@               { printf ("@"); }
 <NORM>@                        { printf ("<tt>"); PUSH NORM;  BEGIN VERB; }
+<NORM>\\%               { printf ("&percnt;"); }
 <NORM>{comment}         { }
 <VERB>@                        { printf ("</tt>");  POP; }
 <VERB>@@               { printf ("@"); }