114 lines
4.8 KiB
C#
114 lines
4.8 KiB
C#
// Copyright (c) Ivan Bondarev, Stanislav Mikhalkovich (for details please see \doc\copyright.txt)
|
||
// This code is distributed under the GNU LGPL (for details please see \doc\license.txt)
|
||
using System;
|
||
using System.Collections.Generic;
|
||
using System.Linq;
|
||
using System.Text;
|
||
using PascalABCCompiler.SyntaxTree;
|
||
using SyntaxVisitors;
|
||
using SyntaxVisitors.SugarVisitors;
|
||
using SyntaxVisitors.CheckingVisitors;
|
||
using SyntaxVisitors.PatternsVisitors;
|
||
|
||
namespace PascalABCCompiler.SyntaxTreeConverters
|
||
{
|
||
public class StandardSyntaxTreeConverter: ISyntaxTreeConverter
|
||
{
|
||
public string Name { get; } = "Standard";
|
||
public syntax_tree_node Convert(syntax_tree_node root)
|
||
{
|
||
// Прошивание ссылками на Parent nodes. Должно идти первым
|
||
// FillParentNodeVisitor расположен в SyntaxTree/tree как базовый визитор, отвечающий за построение дерева
|
||
//FillParentNodeVisitor.New.ProcessNode(root); // почему-то перепрошивает не всё. А следующий вызов - всё
|
||
root.FillParentsInAllChilds();
|
||
|
||
#if DEBUG
|
||
// var stat = new ABCStatisticsVisitor();
|
||
// stat.ProcessNode(root);
|
||
#endif
|
||
|
||
// new range - до всего! До выноса выражения с лямбдой из foreach. 11.07 добавил поиск yields и присваивание pd.HasYield
|
||
NewRangeDesugarAndFindHasYieldVisitor.New.ProcessNode(root);
|
||
|
||
// Распаковка параметров в лямбдах
|
||
UnpackLambdaParametersVisitor.New.ProcessNode(root);
|
||
|
||
// Unnamed Records перенёс сюда
|
||
UnnamedRecordsCheckVisitor.New.ProcessNode(root);
|
||
|
||
// Выносим выражения с лямбдами из заголовка foreach + считаем максимум 10 вложенных лямбд
|
||
StandOutExprWithLambdaInForeachSequenceAndNestedLambdasVisitor.New.ProcessNode(root);
|
||
VarNamesInMethodsWithSameNameAsClassGenericParamsReplacer.New.ProcessNode(root); // SSM bug fix #1147
|
||
FindOnExceptVarsAndApplyRenameVisitor.New.ProcessNode(root);
|
||
#if DEBUG
|
||
//new SimplePrettyPrinterVisitor("E:/projs/out.txt").ProcessNode(root);
|
||
#endif
|
||
|
||
// loop
|
||
LoopDesugarVisitor.New.ProcessNode(root);
|
||
|
||
// tuple_node
|
||
TupleVisitor.New.ProcessNode(root);
|
||
|
||
// index
|
||
IndexVisitor.New.ProcessNode(root);
|
||
|
||
// slice_expr и slice_expr_question
|
||
SliceDesugarVisitor.New.ProcessNode(root);
|
||
// поставил раньше AssignTuplesDesugarVisitor из за var (a,b) := a[1:3];
|
||
|
||
// теперь коллизия с (a[1:6], a[6:11]):= (a[6:11], a[1:6]);
|
||
// assign_tuple и assign_var_tuple
|
||
AssignTuplesDesugarVisitor.New.ProcessNode(root); // теперь это - на семантике
|
||
|
||
|
||
// question_point_desugar_visitor
|
||
QuestionPointDesugarVisitor.New.ProcessNode(root);
|
||
|
||
// double_question_desugar_visitor
|
||
DoubleQuestionDesugarVisitor.New.ProcessNode(root);
|
||
|
||
// Patterns
|
||
// SingleDeconstructChecker.New.ProcessNode(root); // SSM 21.10.18 - пока разрешил множественные деконструкторы. Если будут проблемы - запретить
|
||
ExtendedIsDesugaringVisitor.New.ProcessNode(root); // Десахаризация расширенного is, который используется в сложных логических выражениях
|
||
PatternsDesugaringVisitor.New.ProcessNode(root); // Обязательно в этом порядке.
|
||
#if DEBUG
|
||
//new SimplePrettyPrinterVisitor("D:/out.txt").ProcessNode(root);
|
||
#endif
|
||
|
||
// simple_property
|
||
PropertyDesugarVisitor.New.ProcessNode(root);
|
||
|
||
// Всё, связанное с yield
|
||
CapturedNamesHelper.Reset();
|
||
MarkMethodHasYieldAndCheckSomeErrorsVisitor.New.ProcessNode(root);
|
||
ProcessYieldCapturedVarsVisitor.New.ProcessNode(root);
|
||
|
||
CacheFunctionVisitor.New.ProcessNode(root);
|
||
|
||
#if DEBUG
|
||
//new SimplePrettyPrinterVisitor("D:\\Tree.txt").ProcessNode(root);
|
||
//FillParentNodeVisitor.New.ProcessNode(root);
|
||
|
||
|
||
/*var cv = CollectLightSymInfoVisitor.New;
|
||
cv.ProcessNode(root);
|
||
cv.Output(@"Light1.txt");*/
|
||
|
||
/*try
|
||
{
|
||
root.visit(new SimplePrettyPrinterVisitor(@"d:\\zzz1.txt"));
|
||
}
|
||
catch(Exception e)
|
||
{
|
||
|
||
System.IO.File.AppendAllText(@"d:\\zzz1.txt",e.Message);
|
||
}*/
|
||
|
||
|
||
#endif
|
||
return root;
|
||
}
|
||
}
|
||
}
|