%{
#include "commonlisp2transpilerstr.tab.h"
%}

DIGIT [0-9]
LEFTBRACKET \(
RIGHTBRACKET \)

/* STR   \"([^\"]|\\\")*([^\\]|\\\\)\" */
INTEGER (\+|-)?{DIGIT}
FLOAT   {INTEGER}(\.{DIGIT}+(e{DIGIT}+|d{DIGIT}+|e-{DIGIT}+)?|\/{DIGIT}+)?

COMMENT ;.*$

FUNCTION "+ "|"- "|"* "|\/|defun|defvar|if|=|>|>=|<|<=

%%

{LEFTBRACKET}    { return LBRACKET; }
{RIGHTBRACKET}   { return RBRACKET; }
	/* {STR}            { yylval = strdup(yytext); return STR; } */
{INTEGER}        { yylval = strdup(yytext); return INTEGER; }
{FLOAT}          { yylval = strdup(yytext); return FLOAT;}

{FUNCTION}       { yylval = strdup(yytext); return FUNCTION; }

[A-z!-'*-@]+ { yylval = strdup(yytext); return NAME; }

%%