[moira.git] / util / et / et_lex.lex.l

%{
#undef yywrap
int num_lines = 0;
%}

PC	[^\"]
AN	[A-Z_a-z0-9]
%%
\n		++num_lines;

error_table	return ERROR_TABLE;
et		return ERROR_TABLE;
error_code	return ERROR_CODE_ENTRY;
ec		return ERROR_CODE_ENTRY;
end		return END;

[\t\n ]		;

\"{PC}*\"	{ register char *p; yylval.dynstr = ds(yytext+1);
		  p=strrchr(yylval.dynstr, '"');
		  if (p) *p='\0';
		  return QUOTED_STRING;
		}

{AN}*	{ yylval.dynstr = ds(yytext); return STRING; }

#.*\n		;

.		{ return (*yytext); }
%%
static const char l_rcsid[] = "$Id$";

int yywrap()
{
	return 1;
}
Commit	Line	Data
a91a6d50	1	%{
	2	#undef yywrap
	3	int num_lines = 0;
	4	%}
	5
d1b2a10e	6	PC [^\"]
	7	AN [A-Z_a-z0-9]
	8	%%
a91a6d50	9	\n ++num_lines;
d1b2a10e	10
	11	error_table return ERROR_TABLE;
	12	et return ERROR_TABLE;
	13	error_code return ERROR_CODE_ENTRY;
	14	ec return ERROR_CODE_ENTRY;
	15	end return END;
	16
	17	[\t\n ] ;
	18
	19	\"{PC}\" { register char p; yylval.dynstr = ds(yytext+1);
a91a6d50	20	p=strrchr(yylval.dynstr, '"');
a91a6d50	21	if (p) *p='\0';
d1b2a10e	22	return QUOTED_STRING;
	23	}
	24
	25	{AN}* { yylval.dynstr = ds(yytext); return STRING; }
	26
	27	#.*\n ;
	28
	29	. { return (*yytext); }
	30	%%
a91a6d50	31	static const char l_rcsid[] = "$Id$";
	32
	33	int yywrap()
	34	{
	35	return 1;
	36	}