slice-expr - подготовка к слайсам в многомерных массивах

This commit is contained in:
Mikhalkovich Stanislav 2021-02-22 21:26:52 +03:00
parent 66c52798da
commit b1323a6e0e
10 changed files with 14 additions and 6 deletions

View file

@ -15,7 +15,7 @@ internal static class RevisionClass
public const string Major = "3";
public const string Minor = "7";
public const string Build = "2";
public const string Revision = "2821";
public const string Revision = "2823";
public const string MainVersion = Major + "." + Minor;
public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision;

View file

@ -1,4 +1,4 @@
%MINOR%=7
%REVISION%=2821
%REVISION%=2823
%COREVERSION%=2
%MAJOR%=3

View file

@ -2,7 +2,7 @@
// This CSharp output file generated by Gardens Point LEX
// Version: 1.1.3.301
// Machine: DESKTOP-G8V08V4
// DateTime: 18.01.2021 18:43:04
// DateTime: 22.02.2021 17:50:28
// UserName: ?????????
// GPLEX input file <ABCPascal.lex>
// GPLEX frame file <embedded resource>

View file

@ -2,7 +2,7 @@
// GPPG version 1.3.6
// Machine: DESKTOP-G8V08V4
// DateTime: 18.01.2021 18:43:05
// DateTime: 22.02.2021 17:50:29
// UserName: ?????????
// Input file <D:\PABC_Git\Parsers\PascalABCParserNewSaushkin\ABCPascal.y>

View file

@ -308,5 +308,6 @@ script=

View file

@ -1 +1 @@
3.7.2.2821
3.7.2.2823

View file

@ -1 +1 @@
!define VERSION '3.7.2.2821'
!define VERSION '3.7.2.2823'

View file

@ -1769,6 +1769,7 @@ namespace PascalABCCompiler.SyntaxTree
public partial class slice_expr
{
public List<System.Tuple<expression, expression, expression>> slices = new List<Tuple<expression, expression, expression>>();
public override string ToString() => this.v + "[" + this.from + ":" + this.to + ":" + this.step + "]";
}

View file

@ -2773,6 +2773,9 @@ function InternalRange(l,r: real): RealRange;
///--
function IsInputPipedOrRedirectedFromFile: boolean;
///--
function CheckAndCorrectFromToAndCalcCountForSystemSlice(situation: integer; Len: integer; var from, &to: integer; step: integer): integer;
// -----------------------------------------------------
// Internal procedures for PABCRTL.dll

View file

@ -2773,6 +2773,9 @@ function InternalRange(l,r: real): RealRange;
///--
function IsInputPipedOrRedirectedFromFile: boolean;
///--
function CheckAndCorrectFromToAndCalcCountForSystemSlice(situation: integer; Len: integer; var from, &to: integer; step: integer): integer;
// -----------------------------------------------------
// Internal procedures for PABCRTL.dll