%%
^[0-9a-zA-Z_]+		{
				return getfunc(yytext);
			}
\n			{
				return NEWLINE;
			}
[0-9]+			{
				yylval=atoi(yytext);
				return NUMBER;
			}
[0-9a-zA-Z_]+		{
				int id;

				word = yytext;
				if ((id =getparam(word)) == -1) {
					return ALPHANUM;
				} else {
					return id;
				}
			}
[\41-\176]+.gif		{
				word = yytext;
				return GIFFILE;
			}
[\41-\176]+.xbm		{
				word = yytext;
				return XBMFILE;
			}
\"[^"^\n]*\"		{
				if (yytext[yyleng-1] == '\\') {
					yymore();
				} else {
					word = yytext;
					return STRING;
				}
			}
[, ]+			{ ; }
%%
