myform.l

sco unix 前台界面开发程序,采用UNIX中的词法分析器和语法分析器

%{
#include <stdlib.h>
%}


DIGIT [0-9]{1,9}
STR [a-zA-Z][a-zA-Z0-9]*
TEXT \"[^"]*\"
FLOAT [0-9]+\.[0-9]{0,2}
SKIP [\{\}\(\)=,;\"&|~^]
FILTER [\t\n" "]

%%
Begin return(_begin);
End return(_end);
Form return(_form);
Label return(_label);
Field return(_field);
Position return(_position);
Name return(_name);
Size return(_size);
Type return(_type);
Default return(_default);
Init return(_init);
Term return(_term);
Disp return(_disp);
Index return(_index);
Prompt return(_prompt);
Fore return(_fore);
Back return(_back);
Optson return(_optson);
Optsoff return(_optsoff);
Just return(_just);
Page return(_pagination);
TYPE_TEXT return(_type_text);
TYPE_CTEXT return(_type_ctext);
TYPE_ETEXT return(_type_etext);
TYPE_DIGIT return(_type_digit);
TYPE_AMOUNT return(_type_amount);
TYPE_DATE return(_type_date);
TYPE_ALPHA return(_type_alpha);
TYPE_INTEGER return(_type_integer);
TYPE_NUMERIC return(_type_numeric);
TYPE_LIST return(_type_list);
A_BLINK return(_a_blink);
A_BOLD return(_a_bold);
A_DIM return(_a_dim);
A_REVERSE return(_a_reverse);
A_STANDOUT return(_a_standout);
A_UNDERLINE return(_a_underline);
A_ALTCHARSET return(_a_altcharset);
A_NORMAL return(_a_normal);
O_VISIBLE return(_o_visible);
O_ACTIVE return(_o_active);
O_PUBLIC return(_o_public);
O_EDIT return(_o_edit);
O_WRAP return(_o_wrap);
O_BLANK return(_o_blank);
O_AUTOSKIP return(_o_autoskip);
O_NULLOK return(_o_nullok);
O_PASSOK return(_o_passok);
O_STATIC return(_o_static);
NO_JUSTIFICATION return(_no_justification);
JUSTIFY_LEFT return(_justify_left);
JUSTIFY_RIGHT return(_justify_right);
JUSTIFY_CENTER return(_justify_center);
{FLOAT} {
			yylval.dval = atof(yytext);
			return(_float);
        }
{DIGIT} {
			yylval.ival = atoi(yytext);
			return(_digit);
			
        }
{STR} {
			strcpy(yylval.sval, yytext);
			return(_str);
      }        
{TEXT} {
			strcpy(yylval.sval, &yytext[1]);
			yylval.sval[strlen(yytext) - 2] = 0;
			return(_text);
       }
{SKIP} {
           return(yytext[0]);
       }           
{FILTER}  ;