Вики проекта PascalABC.NET - Вклад [ru]

МПОК 2011

2012-01-17T20:39:49Z

Ksanderer:

[[Роли в проекте и задания разработчикам 2011]]<br\>
[[Грамматика языка Pascal]] 
[[Грамматика языка С]] 
[[Диаграмма классов синтаксического дерева]] 
[[Грамматика Pascal + Код]] 
[[Грамматика C + Код]] 
[[Собранный проект с последними изменениями - всем скачать]] 
[http://files.mail.ru/KA9Z5M Изменения с пары 27.10.2011] 
[http://webfile.ru/5697190 Компилятор, который строит синтаксическое дерево программы (язык Pascal) 10.11.2011] 
[http://dl.dropbox.com/u/18182279/MSS/dvel.zip Удаление мертвых переменных внутри базового блока (новая) 08.12.2011] 
[[Разбиение списка квадрик на базовые блоки]] 
[[Интерфейс анализа потока данных]] 

[[Итерационный алгоритм 22.12.2011]] 
[http://files.mail.ru/ECHTEG Передаточная функция 15.12.2011 (исправленна)] 
[https://docs.google.com/open?id=0B8UsDAZfZqedODNlYWVlN2YtMjVjNi00NjNmLTkzOGItODYxOTVhYzhkZDIz Отчет]

МПОК 2011

2012-01-17T20:33:34Z

Ksanderer:

[[Роли в проекте и задания разработчикам 2011]]<br\>
[[Грамматика языка Pascal]] 
[[Грамматика языка С]] 
[[Диаграмма классов синтаксического дерева]] 
[[Грамматика Pascal + Код]] 
[[Грамматика C + Код]] 
[[Собранный проект с последними изменениями - всем скачать]] 
[http://files.mail.ru/KA9Z5M Изменения с пары 27.10.2011] 
[http://webfile.ru/5697190 Компилятор, который строит синтаксическое дерево программы (язык Pascal) 10.11.2011] 
[http://dl.dropbox.com/u/18182279/MSS/dvel.zip Удаление мертвых переменных внутри базового блока (новая) 08.12.2011] 
[[Разбиение списка квадрик на базовые блоки]] 
[[Интерфейс анализа потока данных]] 

[[Итерационный алгоритм 22.12.2011]] 
[http://files.mail.ru/ECHTEG Передаточная функция 15.12.2011 (исправленна)] 
[https://docs.google.com/open?id=0B8UsDAZfZqedMDA1MGZlNTAtZjI2Ny00NmZhLTgzYzgtODMxYjg5YzgzMTNl Отчет]

МПОК 2011

2011-12-29T08:43:12Z

Ksanderer:

[[Роли в проекте и задания разработчикам 2011]]<br\>
[[Грамматика языка Pascal]] 
[[Грамматика языка С]] 
[[Диаграмма классов синтаксического дерева]] 
[[Грамматика Pascal + Код]] 
[[Грамматика C + Код]] 
[[Собранный проект с последними изменениями - всем скачать]] 
[http://files.mail.ru/KA9Z5M Изменения с пары 27.10.2011] 
[http://webfile.ru/5697190 Компилятор, который строит синтаксическое дерево программы (язык Pascal) 10.11.2011] 
[http://dl.dropbox.com/u/18182279/MSS/dvel.zip Удаление мертвых переменных внутри базового блока (новая) 08.12.2011] 
[[Разбиение списка квадрик на базовые блоки]] 
[[Интерфейс анализа потока данных]] 

[[Итерационный алгоритм 22.12.2011]] 
[http://files.mail.ru/ECHTEG Передаточная функция 15.12.2011 (исправленна)] 
[https://docs.google.com/open?id=0B8UsDAZfZqedNzM1YjBhODItY2Q2OC00MGE4LWI1OGEtMDA0M2IxYWM5YzI1 Отчет]

Роли в проекте и задания разработчикам 2011

2011-11-17T11:15:53Z

Ksanderer:

Темченко А. А. Соловьев Л. В.

1) парсер С

2) Передаточная функция в общем виде (композиция передаточных функций/оператор умножения для передаточных функций/).

3) Функция создания множеств Gen, Kill по квадрике или базовому блоку.

Венцко А.З.

1) парсер языка Pascal

2) множества IN[B], OUT[B], gen B, kill B, конструктор классов для достижимых определений (совместно)

Владыкин К.В.

1) алгоритм удаления мертвых переменных

Баштанова Д.С., Найденов С.Г.

1) первичное описание классов синтаксического дерева

2) Инфраструктура visitor'ов

3) абстрактный класс, передаточная функция, класс для достигающих определений

4) алгоритм вычисления композиции передаточной функции

Науменко А.Е., Пак К.Р.

1) Обработчики грамматики

2) Разбиение на блоки

3) реализация итерационного алгоритма

Пронин А., Бувайло О.

1) Visitor для генерации трехадресного кода. Структура для трехадрессного кода.

2) Квадрики - http://file.qip.ru/file/lbbaZEsQ/GenerateQuadruple.html

Роли в проекте и задания разработчикам 2011

2011-11-17T11:15:43Z

Ksanderer:

Темченко А. А. Соловьев Л. В.

1) парсер С

2) Передаточная функция в общем виде (композиция передаточных функций/оператор умножения для передаточных функций/).

3) Функция создания множеств Gen, Kill по квадрике или базовому блоку.

Венцко А.З.
[[Изображение:Example.jpg]]
1) парсер языка Pascal

2) множества IN[B], OUT[B], gen B, kill B, конструктор классов для достижимых определений (совместно)

Владыкин К.В.

1) алгоритм удаления мертвых переменных

Баштанова Д.С., Найденов С.Г.

1) первичное описание классов синтаксического дерева

2) Инфраструктура visitor'ов

3) абстрактный класс, передаточная функция, класс для достигающих определений

4) алгоритм вычисления композиции передаточной функции

Науменко А.Е., Пак К.Р.

1) Обработчики грамматики

2) Разбиение на блоки

3) реализация итерационного алгоритма

Пронин А., Бувайло О.

1) Visitor для генерации трехадресного кода. Структура для трехадрессного кода.
2) Квадрики - http://file.qip.ru/file/lbbaZEsQ/GenerateQuadruple.html

Роли в проекте и задания разработчикам 2011

2011-11-17T10:24:03Z

Ksanderer:

Роли в проекте и задания разработчикам 2011

2011-11-17T10:23:45Z

Ksanderer:

Темченко А. А. Соловьев Л. В.

1) парсер С
2) Передаточная функция в общем виде (композиция передаточных функций/оператор умножения для передаточных функций/).
3) Функция создания множеств Gen, Kill по квадрике или базовому блоку.

Венцко А.З.

1) парсер языка Pascal

2) множества IN[B], OUT[B], gen B, kill B, конструктор классов для достижимых определений (совместно)

Владыкин К.В.

1) алгоритм удаления мертвых переменных

Баштанова Д.С., Найденов С.Г.

1) первичное описание классов синтаксического дерева

2) Инфраструктура visitor'ов

3) абстрактный класс, передаточная функция, класс для достигающих определений

4) алгоритм вычисления композиции передаточной функции

Науменко А.Е., Пак К.Р.

1) Обработчики грамматики

2) Разбиение на блоки

3) реализация итерационного алгоритма

Пронин А., Бувайло О.

1) Visitor для генерации трехадресного кода. Структура для трехадрессного кода.

Грамматика C + Код

2011-10-06T11:12:12Z

Ksanderer:

C.Y
<source lang="">
%{
Dictionary<string,double> vars = new Dictionary<string,double>();
%}

%output=Yacc.cs

%union {
public int iVal;
public double dVal;
public string sVal;
public ExprNode eVal;
public TreeNode tVal;
public BlockNode lVal;
public List<string> lsVal;
public GreatType dtVal;
}

%using System.IO
%using Syntax_node_tree
%namespace LexScanner

%start progr

%token kBEGIN kEND kIF kTHEN kELSE kWHILE kWRITE
%token ASSIGN SEMICOLUMN LPAREN RPAREN COLUMN
%token PLUS MINUS MULT DIVIDE
%token AND OR NOT LT GT EQ NE LE GE DIV MOD
%token <iVal> INTNUM
%token <dVal> REALNUM
%token <sVal> STRINGLITERAL
%token <sVal> ID
%token <dtVal> kREAL kINTEGER kBOOLEAN

%type <eVal> expr
%type <tVal> operator elsepart
%type <lVal> listoperator progr
%type <lsVal> ident
%type <dtVal> ktype kSimpleType

%left LT GT LE GE EQ NE
%left MINUS PLUS OR
%left MULT DIVIDE AND DIV MOD
%left UMINUS NOT

%%

progr :
{
$$ = new Program(@$);
}
| defss kBEGIN listoperator kEND
{
$$ = $1;
foreach (Operator oper in $3.list)
$$.list.Add(oper);
}
| error
{
System.Console.WriteLine("BAD TEXT!!!");
break;
}
;

defss : defs
{
$$ = new BlockOperator(@$);
$$.list.Add($1);
}
|defss defs {
$1.list.Add($2);
$$ = $1;
}
|
;

defs : ktype ident SEMICOLUMN
{
TipType type;
if ($1 == "int")
type = TipType.IntType;
else if ($1 == "double")
type = TipType.DoubleType;
else if ($1 == "bool")
type = TipType.BoolType;
else
{
// Error: unknown type
}
$$ = new VarDef(@$, $2, type);
}
;

ident: ID
{
if (GlobalStructures.isNameExists($1))
{
// Error: this name is already used
}
Ident Id = new Ident($1, @1);
listVars.Add(Id);
$$ = new List<Ident>();
$$.Add(Id);
}
|ident COLUMN ID
{
if (GlobalStructures.isNameExists($3))
{
// Error: this name is already used
}
Ident Id = new Ident($3, @3);
listVars.Add(Id);
$1.Add(Id);
$$ = $1;
}
;

listoperator : operator
{
$$ = new BlockOperator(@$);
$$.list.Add($1);
}
| listoperator SEMICOLUMN operator {
$1.list.Add($2);
$$ = $1;
}
;

ktype : kSimpleType
| error
{
System.Console.WriteLine("BAD GREATE TYPE");
break;
}
;

kSimpleType : kREAL
{
$$ = "double";
}
| kINTEGER
{
$$ = "int";
}
| kBOOLEAN
{
$$ = "bool"
}
;

operator: {}
| ID ASSIGN expr
{
if (!GlobalStructures.isNameExists($1))
{
// Error: Undeclarated identifier
}
Ident Id = GlobalStructures.getIdentByName($1);
$$ = new Assign(Id, $3, @3);
}
| kWHILE LPAREN expr RPAREN operator
{
if ($2.getType()!=TypType.Boolean)
{
// Error: Oneiaea aie?ii eiaou eiae?aneee oei
}
$$ = new While($2, $4, @$);
}
| kIF LPAREN expr RPAREN operator elsepart
{
if ($2.getType()!=TypType.Boolean)
{
// Error: Oneiaea aie?ii eiaou eiae?aneee oei
}
$$=new If($2,$4,$5,@$);
}
| kBEGIN listoperator kEND
{
$$ = $2;
}
| kWRITE LPAREN expr RPAREN
{
System.Console.Write($3);
}
;

elsepart:
{
$$ = null;
}
| kELSE operator {
$$ = $2;
}
;

expr: INTNUM
{
int i = int.Parse($1);
$$ = new IntConst(i, @1);
}
| REALNUM
{
double d = double.Parse($1);
$$ = new DoubleConst(d, @1);
}
| STRINGLITERAL
{
// Iao o ian oaeeo!!!
}
| ID
{
if (!GlobalStructures.isNameExists($1))
{
// Error: Undeclarated identifier
}
$$ = new Ident($1, @1);
}
| expr PLUS expr
{
$$ = new BinExpression($1, $3, Op.Plus, @$);
}
| expr MINUS expr
{
$$ = new BinExpression($1, $3, Op.Minus, @$);
}
| expr MULT expr
{
$$ = new BinExpression($1, $3, Op.Mult, @$);
}
| expr DIVIDE expr
{
$$ = new BinExpression($1, $3, Op.Divide, @$);
}
| expr DIV expr
{
// Ia iiaaa??eaaaony!
}
| expr MOD expr
{
// Ia iiaaa??eaaaony!
}
| expr AND expr
{
if ($1.getType() != TipType.BoolType || $2.getType() != TipType.BoolType)
{
// Error: only for bool types
}
$$ = new BinExpression($1, $3, Op.And, @$);
}
| expr OR expr
{
if ($1.getType() != TipType.BoolType || $2.getType() != TipType.BoolType)
{
// Error: only for bool types
}
$$ = new BinExpression($1, $3, Op.Or, @$);
}
| expr LT expr
{
$$ = new BinExpression($1, $3, Op.Less, @$);
}
| expr GT expr
{
$$ = new BinExpression($1, $3, Op.More, @$);
}
| expr LE expr
{
$$ = new BinExpression($1, $3, Op.LessEqual, @$);
}
| expr GE expr
{
$$ = new BinExpression($1, $3, Op.MoreEqual, @$);
}
| expr EQ expr
{
$$ = new BinExpression($1, $3, Op.Equal, @$);
}
| expr NE expr
{
$$ = new BinExpression($1, $3, Op.NotEqual, @$);
}
| NOT expr
{
if ($2.getType() != TipType.BoolType)
{
// Error: type is wrong.
}
$$ = new UnarExpression($2, Op.Not, @2);
}
| MINUS expr %prec UMINUS
{
if ($2.getType() != TipType.IntType && $2.getType() != TipType.DoubleType)
{
// Error: type is wrong.
}
$$ = new UnarExpression($2, Op.Minus, @2);
}
| LPAREN expr RPAREN
{
$$ = $2;
}
;

%%
</source>

C.LEX
<source lang="">
%namespace LexScanner
%using Syntax_node_tree;

Alpha [a-zA-Z_]
INTNUM [0-9]+
REALNUM {INTNUM}\.{INTNUM}
ID [a-zA-Z][a-zA-Z0-9_]*

%x COMMENT
%x COMMENT1

%%

"/*" { BEGIN(COMMENT);}
<COMMENT> "*/" { BEGIN(INITIAL);}
<COMMENT> <<EOF>> { Console.WriteLine("Комментарий не закрыт");}

"=" { return (int)Tokens.ASSIGN; }
";" { return (int)Tokens.SEMICOLUMN; }
"-" { return (int)Tokens.MINUS; }
"+" { return (int)Tokens.PLUS; }
"*" { return (int)Tokens.MULT; }
"/" { return (int)Tokens.DIVIDE; }
"<" { return (int)Tokens.LT; }
">" { return (int)Tokens.GT; }
"<=" { return (int)Tokens.LE; }
">=" { return (int)Tokens.GE; }
"==" { return (int)Tokens.EQ; }
"<>" { return (int)Tokens.NE; }
"(" { return (int)Tokens.LPAREN; }
")" { return (int)Tokens.RPAREN; }
"," { return (int)Tokens.COLUMN; }

"." { return (int)Tokens.POINT; }

\'[^']*\' {
yylval.sVal = yytext.Substring(1,yytext.Length-2);
return (int)Tokens.STRINGLITERAL;
}

{ID} {
int res = ScannerHelper.GetIDToken(yytext);
if (s=="int")
yylval.dtVal.DType=DataType.INTTYPE;
if (s == "double")
yylval.dtVal.DType =DataType.DOUBLETYPE;
if (res == (int)Tokens.ID)
yylval.sVal = yytext;
return res;
}

{INTNUM} {
yylval.iVal = int.Parse(yytext);
return (int)Tokens.INTNUM;
}

{REALNUM} {
yylval.dVal = double.Parse(yytext,new System.Globalization.CultureInfo("en-US"));
return (int)Tokens.REALNUM;
}

%{
yylloc = new LexLocation(tokLin, tokCol, tokELin, tokECol);
%}

%%

class ScannerHelper
{
private static Dictionary<string,int> keywords;

static ScannerHelper()
{
keywords = new Dictionary<string,int>();
keywords.Add("var",(int)Tokens.kVAR);
keywords.Add("double",(int)Tokens.kREAL);
keywords.Add("int",(int)Tokens.kINTEGER);
keywords.Add("bool",(int)Tokens.kBOOLEAN);
keywords.Add("{",(int)Tokens.kBEGIN);
keywords.Add("}",(int)Tokens.kEND);
keywords.Add("if",(int)Tokens.kIF);

keywords.Add("else",(int)Tokens.kELSE);

keywords.Add("while",(int)Tokens.kWHILE);
keywords.Add("cout",(int)Tokens.kWRITE);

keywords.Add("div",(int)Tokens.DIV);
keywords.Add("mod",(int)Tokens.MOD);
keywords.Add("and",(int)Tokens.AND);
keywords.Add("or",(int)Tokens.OR);
keywords.Add("not",(int)Tokens.NOT);
}
public static int GetIDToken(string s)
{
if (keywords.ContainsKey(s))
{
return keywords[s];
}
else
return (int)Tokens.ID;
}

}
</source>

Грамматика C + Код

2011-10-06T11:11:50Z

Ksanderer:

C.Y
<source lang="">
%{
Dictionary<string,double> vars = new Dictionary<string,double>();
%}

%output=Yacc.cs

%union {
public int iVal;
public double dVal;
public string sVal;
public ExprNode eVal;
public TreeNode tVal;
public BlockNode lVal;
public List<string> lsVal;
public GreatType dtVal;
}

%using System.IO
%using Syntax_node_tree
%namespace LexScanner

%start progr

%token kBEGIN kEND kIF kTHEN kELSE kWHILE kWRITE
%token ASSIGN SEMICOLUMN LPAREN RPAREN COLUMN
%token PLUS MINUS MULT DIVIDE
%token AND OR NOT LT GT EQ NE LE GE DIV MOD
%token <iVal> INTNUM
%token <dVal> REALNUM
%token <sVal> STRINGLITERAL
%token <sVal> ID
%token <dtVal> kREAL kINTEGER kBOOLEAN

%type <eVal> expr
%type <tVal> operator elsepart
%type <lVal> listoperator progr
%type <lsVal> ident
%type <dtVal> ktype kSimpleType

%left LT GT LE GE EQ NE
%left MINUS PLUS OR
%left MULT DIVIDE AND DIV MOD
%left UMINUS NOT

%%

progr :
{
$$ = new Program(@$);
}
| defss kBEGIN listoperator kEND
{
$$ = $1;
foreach (Operator oper in $3.list)
$$.list.Add(oper);
}
| error
{
System.Console.WriteLine("BAD TEXT!!!");
break;
}
;

defss : defs
{
$$ = new BlockOperator(@$);
$$.list.Add($1);
}
|defss defs {
$1.list.Add($2);
$$ = $1;
}
|
;

defs : ktype ident SEMICOLUMN
{
TipType type;
if ($1 == "int")
type = TipType.IntType;
else if ($1 == "double")
type = TipType.DoubleType;
else if ($1 == "bool")
type = TipType.BoolType;
else
{
// Error: unknown type
}
$$ = new VarDef(@$, $2, type);
}
;

ident: ID
{
if (GlobalStructures.isNameExists($1))
{
// Error: this name is already used
}
Ident Id = new Ident($1, @1);
listVars.Add(Id);
$$ = new List<Ident>();
$$.Add(Id);
}
|ident COLUMN ID
{
if (GlobalStructures.isNameExists($3))
{
// Error: this name is already used
}
Ident Id = new Ident($3, @3);
listVars.Add(Id);
$1.Add(Id);
$$ = $1;
}
;

listoperator : operator
{
$$ = new BlockOperator(@$);
$$.list.Add($1);
}
| listoperator SEMICOLUMN operator {
$1.list.Add($2);
$$ = $1;
}
;

ktype : kSimpleType
| error
{
System.Console.WriteLine("BAD GREATE TYPE");
break;
}
;

kSimpleType : kREAL
{
$$ = "double";
}
| kINTEGER
{
$$ = "int";
}
| kBOOLEAN
{
$$ = "bool"
}
;

operator: {}
| ID ASSIGN expr
{
if (!GlobalStructures.isNameExists($1))
{
// Error: Undeclarated identifier
}
Ident Id = GlobalStructures.getIdentByName($1);
$$ = new Assign(Id, $3, @3);
}
| kWHILE LPAREN expr RPAREN operator
{
if ($2.getType()!=TypType.Boolean)
{
// Error: Oneiaea aie?ii eiaou eiae?aneee oei
}
$$ = new While($2, $4, @$);
}
| kIF LPAREN expr RPAREN operator elsepart
{
if ($2.getType()!=TypType.Boolean)
{
// Error: Oneiaea aie?ii eiaou eiae?aneee oei
}
$$=new If($2,$4,$5,@$);
}
| kBEGIN listoperator kEND
{
$$ = $2;
}
| kWRITE LPAREN expr RPAREN
{
System.Console.Write($3);
}
;

elsepart:
{
$$ = null;
}
| kELSE operator {
$$ = $2;
}
;

expr: INTNUM
{
int i = int.Parse($1);
$$ = new IntConst(i, @1);
}
| REALNUM
{
double d = double.Parse($1);
$$ = new DoubleConst(d, @1);
}
| STRINGLITERAL
{
// Iao o ian oaeeo!!!
}
| ID
{
if (!GlobalStructures.isNameExists($1))
{
// Error: Undeclarated identifier
}
$$ = new Ident($1, @1);
}
| expr PLUS expr
{
$$ = new BinExpression($1, $3, Op.Plus, @$);
}
| expr MINUS expr
{
$$ = new BinExpression($1, $3, Op.Minus, @$);
}
| expr MULT expr
{
$$ = new BinExpression($1, $3, Op.Mult, @$);
}
| expr DIVIDE expr
{
$$ = new BinExpression($1, $3, Op.Divide, @$);
}
| expr DIV expr
{
// Ia iiaaa??eaaaony!
}
| expr MOD expr
{
// Ia iiaaa??eaaaony!
}
| expr AND expr
{
if ($1.getType() != TipType.BoolType || $2.getType() != TipType.BoolType)
{
// Error: only for bool types
}
$$ = new BinExpression($1, $3, Op.And, @$);
}
| expr OR expr
{
if ($1.getType() != TipType.BoolType || $2.getType() != TipType.BoolType)
{
// Error: only for bool types
}
$$ = new BinExpression($1, $3, Op.Or, @$);
}
| expr LT expr
{
$$ = new BinExpression($1, $3, Op.Less, @$);
}
| expr GT expr
{
$$ = new BinExpression($1, $3, Op.More, @$);
}
| expr LE expr
{
$$ = new BinExpression($1, $3, Op.LessEqual, @$);
}
| expr GE expr
{
$$ = new BinExpression($1, $3, Op.MoreEqual, @$);
}
| expr EQ expr
{
$$ = new BinExpression($1, $3, Op.Equal, @$);
}
| expr NE expr
{
$$ = new BinExpression($1, $3, Op.NotEqual, @$);
}
| NOT expr
{
if ($2.getType() != TipType.BoolType)
{
// Error: type is wrong.
}
$$ = new UnarExpression($2, Op.Not, @2);
}
| MINUS expr %prec UMINUS
{
if ($2.getType() != TipType.IntType && $2.getType() != TipType.DoubleType)
{
// Error: type is wrong.
}
$$ = new UnarExpression($2, Op.Minus, @2);
}
| LPAREN expr RPAREN
{
$$ = $2;
}
;

%%
</source>

C.LEX
<source>
%namespace LexScanner
%using Syntax_node_tree;

Alpha [a-zA-Z_]
INTNUM [0-9]+
REALNUM {INTNUM}\.{INTNUM}
ID [a-zA-Z][a-zA-Z0-9_]*

%x COMMENT
%x COMMENT1

%%

"/*" { BEGIN(COMMENT);}
<COMMENT> "*/" { BEGIN(INITIAL);}
<COMMENT> <<EOF>> { Console.WriteLine("Комментарий не закрыт");}

"=" { return (int)Tokens.ASSIGN; }
";" { return (int)Tokens.SEMICOLUMN; }
"-" { return (int)Tokens.MINUS; }
"+" { return (int)Tokens.PLUS; }
"*" { return (int)Tokens.MULT; }
"/" { return (int)Tokens.DIVIDE; }
"<" { return (int)Tokens.LT; }
">" { return (int)Tokens.GT; }
"<=" { return (int)Tokens.LE; }
">=" { return (int)Tokens.GE; }
"==" { return (int)Tokens.EQ; }
"<>" { return (int)Tokens.NE; }
"(" { return (int)Tokens.LPAREN; }
")" { return (int)Tokens.RPAREN; }
"," { return (int)Tokens.COLUMN; }

"." { return (int)Tokens.POINT; }

\'[^']*\' {
yylval.sVal = yytext.Substring(1,yytext.Length-2);
return (int)Tokens.STRINGLITERAL;
}

{ID} {
int res = ScannerHelper.GetIDToken(yytext);
if (s=="int")
yylval.dtVal.DType=DataType.INTTYPE;
if (s == "double")
yylval.dtVal.DType =DataType.DOUBLETYPE;
if (res == (int)Tokens.ID)
yylval.sVal = yytext;
return res;
}

{INTNUM} {
yylval.iVal = int.Parse(yytext);
return (int)Tokens.INTNUM;
}

{REALNUM} {
yylval.dVal = double.Parse(yytext,new System.Globalization.CultureInfo("en-US"));
return (int)Tokens.REALNUM;
}

%{
yylloc = new LexLocation(tokLin, tokCol, tokELin, tokECol);
%}

%%

class ScannerHelper
{
private static Dictionary<string,int> keywords;

static ScannerHelper()
{
keywords = new Dictionary<string,int>();
keywords.Add("var",(int)Tokens.kVAR);
keywords.Add("double",(int)Tokens.kREAL);
keywords.Add("int",(int)Tokens.kINTEGER);
keywords.Add("bool",(int)Tokens.kBOOLEAN);
keywords.Add("{",(int)Tokens.kBEGIN);
keywords.Add("}",(int)Tokens.kEND);
keywords.Add("if",(int)Tokens.kIF);

keywords.Add("else",(int)Tokens.kELSE);

keywords.Add("while",(int)Tokens.kWHILE);
keywords.Add("cout",(int)Tokens.kWRITE);

keywords.Add("div",(int)Tokens.DIV);
keywords.Add("mod",(int)Tokens.MOD);
keywords.Add("and",(int)Tokens.AND);
keywords.Add("or",(int)Tokens.OR);
keywords.Add("not",(int)Tokens.NOT);
}
public static int GetIDToken(string s)
{
if (keywords.ContainsKey(s))
{
return keywords[s];
}
else
return (int)Tokens.ID;
}

}
</source>

Роли в проекте и задания разработчикам 2011

2011-09-22T11:00:56Z

Ksanderer:

Темченко А. А. Соловьев Л. В.

1) парсер С

Венцко А.З. Владыкин К.В.

1) парсер языка Pascal

Баштанова Д.С., Найденов С.Г.

1) первичное описание классов синтаксического дерева

2) Инфраструктура visitor'ов

Науменко А., Ксения П.

1) Обработчики грамматики

2) Разбиение на блоки

Пронин А.

1) Visitor для генерации трехадресного кода. Структура для трехадрессного кода.

Бувайло О.

1) Создание структуры для CFG

Роли в проекте и задания разработчикам 2011

2011-09-22T11:00:29Z

Ksanderer:

Темченко А. А. Соловьев Л. В.

1) парсер С

Венцко А.З. Владыкин К.В.
1) парсер языка Pascal

Баштанова Д.С., Найденов С.Г.
1) первичное описание классов синтаксического дерева
2) Инфраструктура visitor'ов

Науменко А., Ксения П.
1) Обработчики грамматики
2) Разбиение на блоки

Пронин А.
1) Visitor для генерации трехадресного кода. Структура для трехадрессного кода.

Бувайло О.
1) Создание структуры для CFG

Роли в проекте и задания разработчикам 2011

2011-09-22T11:00:17Z

Ksanderer:

Темченко А. А. Соловьев Л. В.
1) парсер С

Венцко А.З. Владыкин К.В.
1) парсер языка Pascal

Баштанова Д.С., Найденов С.Г.
1) первичное описание классов синтаксического дерева
2) Инфраструктура visitor'ов

Науменко А., Ксения П.
1) Обработчики грамматики
2) Разбиение на блоки

Пронин А.
1) Visitor для генерации трехадресного кода. Структура для трехадрессного кода.

Бувайло О.
1) Создание структуры для CFG

Грамматика языка С

2011-09-15T11:23:39Z

Ksanderer:

Грамматика языка С

2011-09-15T11:22:45Z

Ksanderer:

Грамматика языка С

2011-09-15T11:21:29Z

МПОК 2011

2011-09-15T11:21:16Z

Ksanderer:

[[Роли в проекте и задания разработчикам 2011]] 
[[Грамматика языка Pascal]] 
[[Грамматика языка С]]