[deliverable/binutils-gdb.git] / gas / itbl-lex.l

%{
#include <stdio.h>
#include <string.h>
#include <stdlib.h>
#include <ctype.h>
#include "itbl-parse.h"

#ifdef DEBUG
#define DBG(x) printf x
#define MDBG(x) printf x
#else
#define DBG(x)
#define MDBG(x)
#endif

int insntbl_line = 1;
%}

ALNUM	[A-Za-z0-9_]
DIGIT	[0-9]
ALPHA	[A-Za-z_]
HEX	[0-9A-Fa-f]

%%

"creg"|"CREG"	{
		return CREG;
		}
"dreg"|"DREG"	{
		return DREG;
		}
"greg"|"GREG"	{
		return GREG;
		}
"immed"|"IMMED"	{
		return IMMED;
		}
"addr"|"ADDR"	{
		return ADDR;
		}
"insn"|"INSN"	{
		return INSN;
		}
"p"{DIGIT} {
		yytext[yyleng]=0;
		yylval.processor = strtoul(yytext+1,0,0);
		return PNUM;
		}
{DIGIT}+	{
		yytext[yyleng]=0;
		yylval.num = strtoul(yytext,0,0);
		return NUM;
		}
"0x"{HEX}+	{
		yytext[yyleng]=0;
		yylval.num = strtoul(yytext,0,0);
		return NUM;
		}
{ALPHA}{ALNUM}*	{
		yytext[yyleng]=0;
		yylval.str = strdup(yytext);
		return ID;
		}
";"|"#"	{
		int c;
		while ((c = input()) != EOF) {
		    if (c == '\n') 
			{
				unput(c);
				break;
			}
		}
		}
"\n"	{ 
		insntbl_line++; 
		MDBG(("in lex, NL=%d (x%x)\n",NL,NL));
		return NL; 
		}
" "|"\t"	{ }
.		{
		MDBG(("char=%x,%d\n",yytext[0],yytext[0]));
		return yytext[0];
		}
%%

int yywrap() { return 1; }
Commit	Line	Data
8e5c905e DP	1	%{
	2	#include <stdio.h>
	3	#include <string.h>
	4	#include <stdlib.h>
	5	#include <ctype.h>
	6	#include "itbl-parse.h"
	7
	8	#ifdef DEBUG
	9	#define DBG(x) printf x
	10	#define MDBG(x) printf x
	11	#else
	12	#define DBG(x)
	13	#define MDBG(x)
	14	#endif
	15
	16	int insntbl_line = 1;
	17	%}
	18
	19	ALNUM [A-Za-z0-9_]
	20	DIGIT [0-9]
	21	ALPHA [A-Za-z_]
	22	HEX [0-9A-Fa-f]
	23
	24	%%
	25
	26	"creg"\|"CREG" {
	27	return CREG;
	28	}
	29	"dreg"\|"DREG" {
	30	return DREG;
	31	}
	32	"greg"\|"GREG" {
	33	return GREG;
	34	}
	35	"immed"\|"IMMED" {
	36	return IMMED;
	37	}
	38	"addr"\|"ADDR" {
	39	return ADDR;
	40	}
	41	"insn"\|"INSN" {
	42	return INSN;
	43	}
	44	"p"{DIGIT} {
	45	yytext[yyleng]=0;
	46	yylval.processor = strtoul(yytext+1,0,0);
	47	return PNUM;
	48	}
	49	{DIGIT}+ {
	50	yytext[yyleng]=0;
	51	yylval.num = strtoul(yytext,0,0);
	52	return NUM;
	53	}
	54	"0x"{HEX}+ {
	55	yytext[yyleng]=0;
	56	yylval.num = strtoul(yytext,0,0);
	57	return NUM;
	58	}
	59	{ALPHA}{ALNUM}* {
	60	yytext[yyleng]=0;
	61	yylval.str = strdup(yytext);
	62	return ID;
	63	}
	64	";"\|"#" {
65	int c;
66	while ((c = input()) != EOF) {
67	if (c == '\n')
68	{
69	unput(c);
70	break;
71	}
72	}
73	}
74	"\n" {
75	insntbl_line++;
76	MDBG(("in lex, NL=%d (x%x)\n",NL,NL));
77	return NL;
78	}
79	" "\|"\t" { }
80	. {
81	MDBG(("char=%x,%d\n",yytext[0],yytext[0]));
82	return yytext[0];
83	}
84	%%
85
86	int yywrap() { return 1; }