/xbmc/visualizations/Milkdrop/vis_milkdrop/evallib/Scan.l

http://github.com/xbmc/xbmc · LEX · 54 lines · 45 code · 7 blank · 2 comment · 0 complexity · 75ffd13c29e7a513795ce397e69d8ccf MD5 · raw file 

    

  1. %{
    2. 

  2. #define YYSTYPE double
    3. 

  3. #include "cal_tab.h"
    4. 

  4. int c;
    5. 

  5. 

  6. extern YYSTYPE yylval;
    7. 

  7. double translate(int type);
    8. 

  8. void count(void);
    9. 

  9. void setLastVar(void);
    10. 

  10. int lookup(int *typeOfObject);
    11. 

  11. struct lextab *lexswitch(struct lextab *lp);
    12. 

  12. 

  13. 

  14. #define INTCONST 1
    15. 

  15. #define DBLCONST 2
    16. 

  16. #define HEXCONST 3
    17. 

  17. #define VARIABLE 4
    18. 

  18. #define OTHER    5
    19. 

  19. 

  20. %}
    21. 

  21. 

  22. digit =     [0-9];
    23. 

  23. letter =    [a-zA-Z_];
    24. 

  24. hex =       [a-fA-F0-9];
    25. 

  25. /* -- */
    26. 

  26. space           = [\40];
    27. 

  27. /*number          =  (digit* | "-" digit*);*/
    28. 

  28. number          = digit*;
    29. 

  29. exp             = [Ee] number;
    30. 

  30. doubl           = number "." (digit* | digit* exp);
    31. 

  31. 

  32. %%
    33. 

  33. hex hex* [hH]             { count(); yylval = translate(HEXCONST); return VALUE; }
    34. 

  34. digit*                    { count(); yylval = translate(INTCONST); return VALUE; }
    35. 

  35. digit digit* [Dd]         { count(); yylval = translate(INTCONST); return VALUE; }
    36. 

  36. doubl               	  { count(); yylval = translate(DBLCONST); return VALUE; }
    37. 

  37. letter*                   { count(); { int typeOfObject; setLastVar(); yylval = lookup(&typeOfObject); return typeOfObject; }}
    38. 

  38. letter (letter|digit)*    { count(); { int typeOfObject; setLastVar(); yylval = lookup(&typeOfObject); return typeOfObject; }}
    39. 

  39. '+'			  { count(); return '+'; }
    40. 

  40. '-'			  { count(); return '-'; }
    41. 

  41. '*'			  { count(); return '*'; }
    42. 

  42. '/'			  { count(); return '/'; }
    43. 

  43. '%'			  { count(); return '%'; }
    44. 

  44. '&'			  { count(); return '&'; }
    45. 

  45. '|'			  { count(); return '|'; }
    46. 

  46. '('			  { count(); return '('; }
    47. 

  47. ')'			  { count(); return ')'; }
    48. 

  48. '='			  { count(); return '='; }
    49. 

  49. ','                       { count(); return ','; }
    50. 

  50. ';'                       { count(); return ';'; }
    51. 

  51. [ \t\v\f]		  { count(); }
    52. 

  52. .               	  { count(); }
    53. 

  53. 

  54. %%
    55.