input.l

来自「用于TM1300/PNX1300系列DSP（主要用于视频处理）的各种滤波器源码」· L 代码 · 共 75 行

D	[0-9]
%{
#include "tc.h"
#include "stdio.h"
#include "ytab.h"
double atof(const char *s);
%}
%%

8pt		return _8POINT;
4pt		return _4POINT;
data		return DATA; 
dump		return DUMP;
begin		return _BEGIN;
end		return END;
[-]?{D}+		{ yylval.i = atoi(yytext); return ICON ; } 
[-]?{D}+[.]{D}*		{ yylval.d = atof(yytext); return FCON ; }
inf		return INF;
rnd		return RND;
dc		return DC;
let		return LET;
set		return SET;
ac		return AC;
dct		return DCT;
scale		return SCALE;
width		return WIDTH;
inv		return INV;
shuffle		return SHUFFLE;
"*"		return '*';
">"		return '>';
"/"		return '/';
"="		return '=';
"-"		return '-';
"+"		return '+';
min		return MIN;
max		return MAX;
transpose	return TRANSPOSE;
verbose		return VERBOSE;
blocks		return BLOCKS;
reset		return RESET;
range		return RANGE;
print		return PRINT;
integers	return INTEGERS;
state		return STATE;
random		return RANDOM;
ieee1180	return IEEE1180;
h263test	return H263;
rows		return ROWS;
cols		return COLS;
sep		return SEP;
">>"		return RS;
"<<"		return LS;
"-"[a-z]+	{ strcpy(yylval.s, yytext+1); return OPTION; }
\"[^"]*\"	        { strcpy(yylval.s, yytext+1);
                  yylval.s[strlen(yylval.s)-1] = 0; return STRING; }
^"!".*		{ strcpy(yylval.s, yytext); return SHELL; }
">"[^\n]*	{ extern FILE *fileout; if ((fileout = fopen(yytext+1, "w")) == 0) { 
		     fprintf(stderr, "Cannot open %s\n", yytext+1);
		     fileout = stdout;
	          }
                  return REDIR;
	       }
	;


[ ]+		;
e{D}+		{ yylval.i = atoi(&yytext[1]); return VAR; }
e		{ yylval.i = varno; return VAR; } 
"\n"		return '\n' ;
"("		return '(' ;
")"		return ')' ;
"{"		return '{' ;
"}"		return '}' ;
%%