### - убран uses School
This commit is contained in:
Mikhalkovich Stanislav
parent
232838ca6d
commit
af071b1cef
|
|
@ -15,7 +15,7 @@ internal static class RevisionClass
|
|||
public const string Major = "3";
|
||||
public const string Minor = "7";
|
||||
public const string Build = "1";
|
||||
public const string Revision = "2772";
|
||||
public const string Revision = "2774";
|
||||
|
||||
public const string MainVersion = Major + "." + Minor;
|
||||
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;
|
||||
|
|
|
|||
|
|
@ -1,4 +1,4 @@
|
|||
%COREVERSION%=1
|
||||
%REVISION%=2772
|
||||
%REVISION%=2774
|
||||
%MINOR%=7
|
||||
%MAJOR%=3
|
||||
|
|
|
|||
|
|
@ -2,7 +2,7 @@
|
|||
// This CSharp output file generated by Gardens Point LEX
|
||||
// Version: 1.1.3.301
|
||||
// Machine: DESKTOP-G8V08V4
|
||||
// DateTime: 14.12.2020 21:18:08
|
||||
// DateTime: 25.12.2020 21:59:53
|
||||
// UserName: ?????????
|
||||
// GPLEX input file <ABCPascal.lex>
|
||||
// GPLEX frame file <embedded resource>
|
||||
|
|
|
|||
|
|
@ -200,9 +200,9 @@ parse_goal
|
|||
var stl = $2 as statement_list;
|
||||
stl.left_logical_bracket = $1;
|
||||
var un = new unit_or_namespace(new ident_list("SF"),null);
|
||||
var un1 = new unit_or_namespace(new ident_list("School"),null);
|
||||
//var un1 = new unit_or_namespace(new ident_list("School"),null);
|
||||
var ul = new uses_list(un,null);
|
||||
ul.Add(un1);
|
||||
//ul.Add(un1);
|
||||
root = $$ = NewProgramModule(null, null, ul, new block(null, stl, @$), new token_info(""), @$);
|
||||
}
|
||||
;
|
||||
|
|
|
|||
|
|
@ -2,9 +2,9 @@
|
|||
|
||||
// GPPG version 1.3.6
|
||||
// Machine: DESKTOP-G8V08V4
|
||||
// DateTime: 14.12.2020 21:18:09
|
||||
// DateTime: 25.12.2020 21:59:54
|
||||
// UserName: ?????????
|
||||
// Input file <D:\PABC_Git\Parsers\PascalABCParserNewSaushkin\ABCPascal.y>
|
||||
// Input file <ABCPascal.y>
|
||||
|
||||
// options: no-lines gplex
|
||||
|
||||
|
|
@ -59,7 +59,7 @@ public abstract class ScanBase : AbstractScanner<PascalABCSavParser.Union,LexLoc
|
|||
|
||||
public partial class GPPGParser: ShiftReduceParser<PascalABCSavParser.Union, LexLocation>
|
||||
{
|
||||
// Verbatim content from D:\PABC_Git\Parsers\PascalABCParserNewSaushkin\ABCPascal.y
|
||||
// Verbatim content from ABCPascal.y
|
||||
// <20><><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20> <20><><EFBFBD><EFBFBD><EFBFBD> GPPGParser, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>, <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> gppg
|
||||
public syntax_tree_node root; // <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD><EFBFBD> <20><><EFBFBD><EFBFBD><EFBFBD><EFBFBD>
|
||||
|
||||
|
|
@ -71,7 +71,7 @@ public partial class GPPGParser: ShiftReduceParser<PascalABCSavParser.Union, Lex
|
|||
public ParserLambdaHelper lambdaHelper = new ParserLambdaHelper();
|
||||
|
||||
public GPPGParser(AbstractScanner<PascalABCSavParser.Union, LexLocation> scanner) : base(scanner) { }
|
||||
// End verbatim content from D:\PABC_Git\Parsers\PascalABCParserNewSaushkin\ABCPascal.y
|
||||
// End verbatim content from ABCPascal.y
|
||||
|
||||
#pragma warning disable 649
|
||||
private static Dictionary<int, string> aliasses;
|
||||
|
|
@ -2824,9 +2824,9 @@ public partial class GPPGParser: ShiftReduceParser<PascalABCSavParser.Union, Lex
|
|||
var stl = ValueStack[ValueStack.Depth-1].stn as statement_list;
|
||||
stl.left_logical_bracket = ValueStack[ValueStack.Depth-2].ti;
|
||||
var un = new unit_or_namespace(new ident_list("SF"),null);
|
||||
var un1 = new unit_or_namespace(new ident_list("School"),null);
|
||||
//var un1 = new unit_or_namespace(new ident_list("School"),null);
|
||||
var ul = new uses_list(un,null);
|
||||
ul.Add(un1);
|
||||
//ul.Add(un1);
|
||||
root = CurrentSemanticValue.stn = NewProgramModule(null, null, ul, new block(null, stl, CurrentLocationSpan), new token_info(""), CurrentLocationSpan);
|
||||
}
|
||||
break;
|
||||
|
|
|
|||
|
|
@ -299,5 +299,6 @@ script=
|
|||
|
||||
|
||||
|
||||
|
||||
|
||||
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
3.7.1.2772
|
||||
3.7.1.2774
|
||||
|
|
|
|||
|
|
@ -1 +1 @@
|
|||
!define VERSION '3.7.1.2772'
|
||||
!define VERSION '3.7.1.2774'
|
||||
|
|
|
|||
|
|
@ -67,6 +67,9 @@ const
|
|||
/// Константа перехода на новую строку
|
||||
/// !! The newline string defined for this environment.
|
||||
NewLine = System.Environment.NewLine;
|
||||
/// Константа - символы-разделители слов
|
||||
/// !! symbols - word delimiters
|
||||
AllDelimiters = ' <>=^`|~$№§!"#%&''()*,+-./:;?@[\]_{}«·»'#9#10#13;
|
||||
//{{{--doc: Конец секции стандартных констант для документации }}}
|
||||
|
||||
|
||||
|
|
@ -4064,20 +4067,25 @@ function CharRange.Reverse: sequence of char := Range(l,h).Reverse;
|
|||
//------------------------------------------------------------------------------
|
||||
// Операции для string и char
|
||||
//------------------------------------------------------------------------------
|
||||
///--
|
||||
procedure string.operator+=(var left: string; right: string);
|
||||
begin
|
||||
left := left + right;
|
||||
end;
|
||||
|
||||
///--
|
||||
function string.operator<(left, right: string) := string.CompareOrdinal(left, right) < 0;
|
||||
|
||||
///--
|
||||
function string.operator<=(left, right: string) := string.CompareOrdinal(left, right) <= 0;
|
||||
|
||||
///--
|
||||
function string.operator>(left, right: string) := string.CompareOrdinal(left, right) > 0;
|
||||
|
||||
///--
|
||||
function string.operator>=(left, right: string) := string.CompareOrdinal(left, right) >= 0;
|
||||
|
||||
/// Повторяет строку str n раз
|
||||
///--
|
||||
function string.operator*(str: string; n: integer): string;
|
||||
begin
|
||||
var sb := new StringBuilder;
|
||||
|
|
@ -4086,7 +4094,7 @@ begin
|
|||
Result := sb.ToString;
|
||||
end;
|
||||
|
||||
/// Повторяет строку str n раз
|
||||
///--
|
||||
function string.operator*(n: integer; str: string): string;
|
||||
begin
|
||||
var sb := new StringBuilder;
|
||||
|
|
@ -4095,7 +4103,7 @@ begin
|
|||
Result := sb.ToString;
|
||||
end;
|
||||
|
||||
/// Повторяет символ c n раз
|
||||
///--
|
||||
function char.operator*(c: char; n: integer): string;
|
||||
begin
|
||||
if n <= 0 then
|
||||
|
|
@ -4109,7 +4117,7 @@ begin
|
|||
Result := sb.ToString;
|
||||
end;
|
||||
|
||||
/// Повторяет символ c n раз
|
||||
///--
|
||||
function char.operator*(n: integer; c: char): string;
|
||||
begin
|
||||
if n <= 0 then
|
||||
|
|
@ -4123,18 +4131,23 @@ begin
|
|||
Result := sb.ToString;
|
||||
end;
|
||||
|
||||
/// Добавляет к строке str строковое представление числа n
|
||||
// Добавляет к строке str строковое представление числа n
|
||||
///--
|
||||
function string.operator+(str: string; n: integer) := str + n.ToString;
|
||||
|
||||
/// Добавляет к строке str строковое представление числа n
|
||||
// Добавляет к строке str строковое представление числа n
|
||||
///--
|
||||
function string.operator+(n: integer; str: string) := n.ToString + str;
|
||||
|
||||
/// Добавляет к строке str строковое представление числа r
|
||||
// Добавляет к строке str строковое представление числа r
|
||||
///--
|
||||
function string.operator+(str: string; r: real) := str + r.ToString(nfi);
|
||||
|
||||
/// Добавляет к строке str строковое представление числа r
|
||||
// Добавляет к строке str строковое представление числа r
|
||||
///--
|
||||
function string.operator+(r: real; str: string) := r.ToString(nfi) + str;
|
||||
|
||||
///--
|
||||
procedure string.operator+=(var left: string; right: integer);
|
||||
begin
|
||||
left := left + right.ToString;
|
||||
|
|
@ -12349,10 +12362,10 @@ begin
|
|||
Result := Self.Split(delim, System.StringSplitOptions.RemoveEmptyEntries);
|
||||
end;
|
||||
|
||||
const AllWordDelimiters = ' <>=^`|~$№§!"#%&''()*,+-./:;?@[\]_{}«·»'#9#10#13;
|
||||
const SpaceDelimiters = ' '+#9#10#13;
|
||||
|
||||
/// Преобразует строку в массив слов, используя в качестве разделителей символы из строки delim
|
||||
function ToWords(Self: string; delim: string := AllWordDelimiters): array of string; extensionmethod;
|
||||
function ToWords(Self: string; delim: string := SpaceDelimiters): array of string; extensionmethod;
|
||||
begin
|
||||
Result := Self.Split(delim.ToCharArray, System.StringSplitOptions.RemoveEmptyEntries);
|
||||
end;
|
||||
|
|
@ -12859,59 +12872,59 @@ function operator>=<T1,T2,T3,T4,T5,T6,T7>(Self: (T1, T2, T3, T4,T5,T6,T7); v: (T
|
|||
// -------------------------------------------
|
||||
// Дополнения февраль 2016
|
||||
|
||||
// Добавляет поле к кортежу
|
||||
/// Добавляет поле к кортежу
|
||||
function Add<T1, T2, T3>(Self: (T1, T2); v: T3): (T1, T2, T3); extensionmethod;
|
||||
begin
|
||||
Result := (Self[0], Self[1], v);
|
||||
end;
|
||||
|
||||
// Добавляет поле к кортежу
|
||||
/// Добавляет поле к кортежу
|
||||
function Add<T1, T2, T3, T4>(Self: (T1, T2, T3); v: T4): (T1, T2, T3, T4); extensionmethod;
|
||||
begin
|
||||
Result := (Self[0], Self[1], Self[2], v);
|
||||
end;
|
||||
|
||||
// Добавляет поле к кортежу
|
||||
/// Добавляет поле к кортежу
|
||||
function Add<T1, T2, T3, T4, T5>(Self: (T1, T2, T3, T4); v: T5): (T1, T2, T3, T4, T5); extensionmethod;
|
||||
begin
|
||||
Result := (Self[0], Self[1], Self[2], Self[3], v);
|
||||
end;
|
||||
|
||||
// Добавляет поле к кортежу
|
||||
/// Добавляет поле к кортежу
|
||||
function Add<T1, T2, T3, T4, T5, T6>(Self: (T1, T2, T3, T4, T5); v: T6): (T1, T2, T3, T4, T5, T6); extensionmethod;
|
||||
begin
|
||||
Result := (Self[0], Self[1], Self[2], Self[3], Self[4], v);
|
||||
end;
|
||||
|
||||
// Добавляет поле к кортежу
|
||||
/// Добавляет поле к кортежу
|
||||
function Add<T1, T2, T3, T4, T5, T6, T7>(Self: (T1, T2, T3, T4, T5, T6); v: T7): (T1, T2, T3, T4, T5, T6, T7); extensionmethod;
|
||||
begin
|
||||
Result := (Self[0], Self[1], Self[2], Self[3], Self[4], Self[5], v);
|
||||
end;
|
||||
|
||||
// Выводит кортеж
|
||||
/// Выводит кортеж
|
||||
procedure Print<T1, T2>(Self: (T1, T2)); extensionmethod := Print(Self);
|
||||
// Выводит кортеж
|
||||
/// Выводит кортеж
|
||||
procedure Print<T1, T2, T3>(Self: (T1, T2, T3)); extensionmethod := Print(Self);
|
||||
// Выводит кортеж
|
||||
/// Выводит кортеж
|
||||
procedure Print<T1, T2, T3, T4>(Self: (T1, T2, T3, T4)); extensionmethod := Print(Self);
|
||||
// Выводит кортеж
|
||||
/// Выводит кортеж
|
||||
procedure Print<T1, T2, T3, T4, T5>(Self: (T1, T2, T3, T4, T5)); extensionmethod := Print(Self);
|
||||
// Выводит кортеж
|
||||
/// Выводит кортеж
|
||||
procedure Print<T1, T2, T3, T4, T5, T6>(Self: (T1, T2, T3, T4, T5, T6)); extensionmethod := Print(Self);
|
||||
// Выводит кортеж
|
||||
/// Выводит кортеж
|
||||
procedure Print<T1, T2, T3, T4, T5, T6, T7>(Self: (T1, T2, T3, T4, T5, T6, T7)); extensionmethod := Print(Self);
|
||||
// Выводит кортеж и переходит на новую строку
|
||||
/// Выводит кортеж и переходит на новую строку
|
||||
procedure Println<T1, T2>(Self: (T1, T2)); extensionmethod := Println(Self);
|
||||
// Выводит кортеж и переходит на новую строку
|
||||
/// Выводит кортеж и переходит на новую строку
|
||||
procedure Println<T1, T2, T3>(Self: (T1, T2, T3)); extensionmethod := Println(Self);
|
||||
// Выводит кортеж и переходит на новую строку
|
||||
/// Выводит кортеж и переходит на новую строку
|
||||
procedure Println<T1, T2, T3, T4>(Self: (T1, T2, T3, T4)); extensionmethod := Println(Self);
|
||||
// Выводит кортеж и переходит на новую строку
|
||||
/// Выводит кортеж и переходит на новую строку
|
||||
procedure Println<T1, T2, T3, T4, T5>(Self: (T1, T2, T3, T4, T5)); extensionmethod := Println(Self);
|
||||
// Выводит кортеж и переходит на новую строку
|
||||
/// Выводит кортеж и переходит на новую строку
|
||||
procedure Println<T1, T2, T3, T4, T5, T6>(Self: (T1, T2, T3, T4, T5, T6)); extensionmethod := Println(Self);
|
||||
// Выводит кортеж и переходит на новую строку
|
||||
/// Выводит кортеж и переходит на новую строку
|
||||
procedure Println<T1, T2, T3, T4, T5, T6, T7>(Self: (T1, T2, T3, T4, T5, T6, T7)); extensionmethod := Println(Self);
|
||||
|
||||
|
||||
|
|
|
|||
Loading…
Reference in a new issue