test/erract7.rl

   1 /*
   2  * @LANG: c
   3  */
   4
   5 #include <stdio.h>
   6 #include <string.h>
   7
   8 %%{
   9         machine foo;
  10
  11         action on_char  { printf("char: %c\n", *p); }
  12         action on_err   { printf("err: %c\n", *p); }
  13         action to_state { printf("to state: %c\n", *p); }
  14
  15         main := 'heXXX' $on_char $err(on_err) $to(to_state);
  16 }%%
  17
  18 %% write data;
  19
  20 int main()
  21 {
  22         int cs;
  23         char *p = "hello", *pe = p + strlen(p);
  24         char *eof = pe;
  25         %%{
  26                 write init;
  27                 write exec;
  28         }%%
  29
  30         printf( "rest: %s\n", p );
  31
  32         return 0;
  33 }
  34
  35 #ifdef _____OUTPUT_____
  36 char: h
  37 to state: h
  38 char: e
  39 to state: e
  40 err: l
  41 rest: llo
  42 #endif