casl.l

这是一个软件水平资格考试中使用的CASL汇编语言的编译器,实现文件中包括一个编译器,一个虚拟机,一个类似于Debug的调试器.

%{
%}
%%
"GR0"  {return (GR0);}
"GR1"  {return (GR1);}
"GR2"  {return (GR2);}
"GR3"  {return (GR3);}
"GR4"  {return (GR4);}
"DC"  {return (DC);}
"DS"  {return (DS);}
"LD"  {return (LD);}
"ST"  {return (ST);}
"LEA"  {return (LEA);}
"START"  {return (START);}
"END"  {return (END);}
"ADD"  {return (ADD);}
"SUB"  {return (SUB);}
"AND"  {return (AND);}
"OR"   {return (OR);}
"EOR"  {return (EOR);}
"CPA"  {return (CPA);}
"CPL"  {return (CPL);}
"SLA"  {return (SLA);}
"SRA"  {return (SRA);}
"SLL"  {return (SLL);}
"SRL"  {return (SRL);}
"JMP"  {return (JMP);}
"JPZ"  {return (JPZ);}
"JMI"  {return (JMI);}
"JNZ"  {return (JNZ);}
"JZE"  {return (JZE);}
"PUSH"  {return (PUSH);}
"POP"  {return (POP);}
"CALL" {return (CALL);}
"RET"  {return (RET);}
"EXIT" {return (EXIT);}
"IN"   {return (IN); }
"OUT"  {return (OUT);}
[0-9]* {return (DECIMAL);}

[A-Z][A-Z|0-9]*   {printf("label= %s\n", yytext); return (LABEL);}

("#")[A-F0-9]*   {
		printf("hex is %s\n", yytext);
		return (HEX);
		}


","  {return (*yytext);}
" "	{;}
\n	{;}
.		{return (*yytext);}
%%
int  yywrap(void) 
{
	return 1;
}