%{
#include "y.tab.h"
extern char *yylval;
char * strsave(char *s)
{
        char * p = calloc(strlen(s)+1, 1);
        if (p)
                return strcpy(p, s);
        fputs("no room\n", stderr), exit(1);
}

%}



%%
[ \n\t]+    ;
([a-z0-9A-Z])[^()]*  {yylval = strsave(yytext);
             return(STR);}
.      {  return(yytext[0]);}
%%