test/erract2.rl

   1 /*
   2  * @LANG: indep
   3  *
   4  * Test error actions.
   5  */
   6 %%
   7 %%{
   8         machine ErrAct;
   9
  10         action err_start { prints "err_start\n"; }
  11         action err_all { prints "err_all\n"; }
  12         action err_middle { prints "err_middle\n"; }
  13         action err_out { prints "err_out\n"; }
  14
  15         action eof_start { prints "eof_start\n"; }
  16         action eof_all { prints "eof_all\n"; }
  17         action eof_middle { prints "eof_middle\n"; }
  18         action eof_out { prints "eof_out\n"; }
  19
  20         main := ( 'hello'
  21                         >err err_start $err err_all <>err err_middle %err err_out
  22                         >eof eof_start $eof eof_all <>eof eof_middle %eof eof_out
  23                 ) '\n';
  24 }%%
  25
  26 /* _____INPUT_____
  27 ""
  28 "h"
  29 "x"
  30 "he"
  31 "hx"
  32 "hel"
  33 "hex"
  34 "hell"
  35 "helx"
  36 "hello"
  37 "hellx"
  38 "hello\n"
  39 "hellox"
  40 _____INPUT_____ */
  41
  42 /* _____OUTPUT_____
  43 err_start
  44 eof_start
  45 err_all
  46 eof_all
  47 FAIL
  48 err_all
  49 err_middle
  50 eof_all
  51 eof_middle
  52 FAIL
  53 err_start
  54 err_all
  55 FAIL
  56 err_all
  57 err_middle
  58 eof_all
  59 eof_middle
  60 FAIL
  61 err_all
  62 err_middle
  63 FAIL
  64 err_all
  65 err_middle
  66 eof_all
  67 eof_middle
  68 FAIL
  69 err_all
  70 err_middle
  71 FAIL
  72 err_all
  73 err_middle
  74 eof_all
  75 eof_middle
  76 FAIL
  77 err_all
  78 err_middle
  79 FAIL
  80 err_all
  81 err_out
  82 eof_all
  83 eof_out
  84 FAIL
  85 err_all
  86 err_middle
  87 FAIL
  88 ACCEPT
  89 err_all
  90 err_out
  91 FAIL
  92 _____OUTPUT_____ */