diff options
| author | Julian T <julian@jtle.dk> | 2020-02-11 12:24:56 +0100 |
|---|---|---|
| committer | Julian T <julian@jtle.dk> | 2020-02-11 12:24:56 +0100 |
| commit | 6db1a2cdd3b96731f2e092d55d8c2136eabc52d0 (patch) | |
| tree | 2be8fae8ce82d708ed9f00f376dda14420850e80 /sem1/osc/mm11/regn/regn.l | |
| parent | 57305119e05559c1c37e903aef89cd43f44c42c9 (diff) | |
Rename and cleanup
Diffstat (limited to 'sem1/osc/mm11/regn/regn.l')
| -rw-r--r-- | sem1/osc/mm11/regn/regn.l | 40 |
1 files changed, 0 insertions, 40 deletions
diff --git a/sem1/osc/mm11/regn/regn.l b/sem1/osc/mm11/regn/regn.l deleted file mode 100644 index bbaadb8..0000000 --- a/sem1/osc/mm11/regn/regn.l +++ /dev/null @@ -1,40 +0,0 @@ -%{ -#include <math.h> -#include <string.h> -#include "symtab.h" -#include "regn.tab.h" -%} - -realtal ([0-9]+|([0-9]*\.[0-9]+))([eE][-+]?[0-9]+)? -var_begin let -op_log log -op_exp exp -op_sqrt sqrt -var [A-Za-z][A-Za-z0-9]* - -%% -{realtal} {yylval.dval = atof(yytext); - return TAL;} -{var_begin} {return VAR_BEGIN;} -{op_log} {return LOG;} -{op_exp} {return EXP;} -{op_sqrt} {return SQRT;} - -{var} {yylval.string = strdup(yytext); return VAR;} - -[ \t] ; - - -'$' {return 0;} - -\n|. {return yytext[0];} - -%% - -void init_sym() -{ - int i; - for (i = 0; i < HASHSIZE; i++) - symbolarray[i] = NULL; -} - |