104 lines
2.3 KiB
Plaintext
104 lines
2.3 KiB
Plaintext
%{
|
|
/****************************************************************************
|
|
lexer.l
|
|
ParserWizard generated Lex file.
|
|
|
|
Date: 07 December 2000
|
|
****************************************************************************/
|
|
|
|
#include "parser.h"
|
|
#include "var.h"
|
|
#include "prepro.h"
|
|
#include <stdlib.h>
|
|
|
|
|
|
%}
|
|
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// declarations section
|
|
|
|
// lexical analyser name
|
|
%name mylexer
|
|
|
|
// class definition
|
|
{
|
|
int openInputFile(char *_filename);
|
|
int closeInputFile();
|
|
|
|
void setCurrentParser(class myparser *_parser) {m_currentParser=_parser;}
|
|
class myparser *getCurrentParser() {return m_currentParser;}
|
|
|
|
int getCurrentLine() {return m_lineCount+1;}
|
|
int getCurrentCharOnLine() {return m_currentCharOnLine;}
|
|
int getErrorCount() {return m_errorCount;}
|
|
|
|
void error();
|
|
|
|
// Overridden lexer functions
|
|
int yygetchar();
|
|
|
|
private:
|
|
// FILE *m_fhInput;
|
|
int m_charCount;
|
|
int m_lineCount;
|
|
int m_currentCharOnLine;
|
|
int m_errorCount;
|
|
|
|
class myparser *m_currentParser;
|
|
}
|
|
|
|
// constructor
|
|
{
|
|
// place any extra initialisation code here
|
|
}
|
|
|
|
// place any declarations here
|
|
|
|
%%
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// rules section
|
|
|
|
%{
|
|
// extract yylval for use later on in actions
|
|
YYSTYPE& yylval = *(YYSTYPE*)yyparserptr->yylvalptr;
|
|
%}
|
|
|
|
// place your Lex rules here
|
|
|
|
^#.* {if(preprocessorCmd(yytext+1)!=true)error();}
|
|
# {printf("# commands must be at start of line! ( line %d )\n",getCurrentLine());error();}
|
|
|
|
stop {return STOP;}
|
|
if {return IF;}
|
|
else {return ELSE;}
|
|
pause {return PAUSE;}
|
|
print {return PRINT;}
|
|
= {return ASSIGN;}
|
|
== {return EQUAL;}
|
|
!= {return NOTEQUAL;}
|
|
\+ {return PLUS;}
|
|
; {return END_STMT;}
|
|
\( {return OPEN_PAR;}
|
|
\) {return CLOSE_PAR;}
|
|
\{ {return BEGIN_CS;}
|
|
\} {return END_CS;}
|
|
|
|
\$[a-zA-Z_][a-zA-Z_0-9]* {yylval.variableIdx=lookupVarName(yytext+1);return VARIABLE;}
|
|
[0-9]+ {yylval.value=atoi(yytext);return VALUE;}
|
|
// \"[^\"]*\" {printf("s:%s\n",yytext);return STRING;}
|
|
|
|
\/\/.* {}
|
|
[ \t]+ {}
|
|
\n {}
|
|
|
|
. {printf("UNEXPECTED CHAR: '%s' in line %d ( char %d )\n",yytext,getCurrentLine(),getCurrentCharOnLine());error();}
|
|
|
|
%%
|
|
|
|
|
|
/////////////////////////////////////////////////////////////////////////////
|
|
// programs section
|
|
|