From b59c654b243f880832cccff94e145abd6464c00e Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=D0=91=D0=BE=D0=BD=D0=B4=D0=B0=D1=80=D0=B5=D0=B2=20=D0=98?= =?UTF-8?q?=D0=B2=D0=B0=D0=BD?= Date: Fri, 12 Jun 2015 20:59:28 +0200 Subject: [PATCH] bug fix --- ParserTools/SyntaxTreeVisitors/SyntaxTreeComparer.cs | 2 ++ Utils/DefaultLanguageResMaker/LanguageResMaker.pas | 2 ++ Utils/IncrementVresion/IncrementVresion.pas | 2 ++ Utils/LinesCount/LinesCount.pas | 2 ++ Utils/Pause/Pause.pas | 2 ++ Utils/ProgrammRunner/ProgrammRunner.pas | 2 ++ Utils/ReplaceInFiles/ReplaceInFiles.pas | 2 ++ Utils/ResXMaker/ResXMaker.pas | 2 ++ .../FormsDesigner/Src/DesignerGenerator/PABCCodeProvider.cs | 2 ++ VisualPascalABCNET/Projects/GacInterop.cs | 4 +++- bin/MPGORunner.pas | 2 ++ bin/TestRunner.pas | 2 ++ 12 files changed, 25 insertions(+), 1 deletion(-) diff --git a/ParserTools/SyntaxTreeVisitors/SyntaxTreeComparer.cs b/ParserTools/SyntaxTreeVisitors/SyntaxTreeComparer.cs index ce4848f33..95683c1f4 100644 --- a/ParserTools/SyntaxTreeVisitors/SyntaxTreeComparer.cs +++ b/ParserTools/SyntaxTreeVisitors/SyntaxTreeComparer.cs @@ -1637,6 +1637,8 @@ namespace PascalABCCompiler.SyntaxTree CompareInternal(left as statement_list, right as statement_list); else if (left is inherited_method_call) CompareInternal(left as inherited_method_call, right as inherited_method_call); + else if (left is assign) + CompareInternal(left as assign, right as assign); //else if (left is expression) // SSM 12/06/15 // CompareInternal(left as expression, right as expression); diff --git a/Utils/DefaultLanguageResMaker/LanguageResMaker.pas b/Utils/DefaultLanguageResMaker/LanguageResMaker.pas index cddbd7aa2..d50d5261d 100644 --- a/Utils/DefaultLanguageResMaker/LanguageResMaker.pas +++ b/Utils/DefaultLanguageResMaker/LanguageResMaker.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) uses FilesOperations, System.IO, System.Resources; diff --git a/Utils/IncrementVresion/IncrementVresion.pas b/Utils/IncrementVresion/IncrementVresion.pas index a11f3c5ab..7654911cb 100644 --- a/Utils/IncrementVresion/IncrementVresion.pas +++ b/Utils/IncrementVresion/IncrementVresion.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) uses FilesOperations; var DefsFile, IncrementDef, name: string; IncrementValue: integer; diff --git a/Utils/LinesCount/LinesCount.pas b/Utils/LinesCount/LinesCount.pas index 6ff74bf26..e95133490 100644 --- a/Utils/LinesCount/LinesCount.pas +++ b/Utils/LinesCount/LinesCount.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) uses CRT, System.IO; diff --git a/Utils/Pause/Pause.pas b/Utils/Pause/Pause.pas index cb92e6ee2..da317eef5 100644 --- a/Utils/Pause/Pause.pas +++ b/Utils/Pause/Pause.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) begin with System.Console do begin if CursorLeft >= 0 then diff --git a/Utils/ProgrammRunner/ProgrammRunner.pas b/Utils/ProgrammRunner/ProgrammRunner.pas index 2e201fb2f..6df3ce582 100644 --- a/Utils/ProgrammRunner/ProgrammRunner.pas +++ b/Utils/ProgrammRunner/ProgrammRunner.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) begin var args := System.Environment.GetCommandLineArgs(); var args2 := new string[args.Length > 2?args.Length-2:0]; diff --git a/Utils/ReplaceInFiles/ReplaceInFiles.pas b/Utils/ReplaceInFiles/ReplaceInFiles.pas index 3a0fc4842..33bc05062 100644 --- a/Utils/ReplaceInFiles/ReplaceInFiles.pas +++ b/Utils/ReplaceInFiles/ReplaceInFiles.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) uses FilesOperations; var DefsFile, TemplateFile, ResultFile: string; defs: System.Collections.Hashtable; diff --git a/Utils/ResXMaker/ResXMaker.pas b/Utils/ResXMaker/ResXMaker.pas index dd14207d9..ca0ca0534 100644 --- a/Utils/ResXMaker/ResXMaker.pas +++ b/Utils/ResXMaker/ResXMaker.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) uses System, System.Resources, System.Reflection, diff --git a/VisualPascalABCNET/FormsDesignerBinding/FormsDesigner/Src/DesignerGenerator/PABCCodeProvider.cs b/VisualPascalABCNET/FormsDesignerBinding/FormsDesigner/Src/DesignerGenerator/PABCCodeProvider.cs index f80b41e1e..4630d46e1 100644 --- a/VisualPascalABCNET/FormsDesignerBinding/FormsDesigner/Src/DesignerGenerator/PABCCodeProvider.cs +++ b/VisualPascalABCNET/FormsDesignerBinding/FormsDesigner/Src/DesignerGenerator/PABCCodeProvider.cs @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (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.Text; diff --git a/VisualPascalABCNET/Projects/GacInterop.cs b/VisualPascalABCNET/Projects/GacInterop.cs index d3369d9b9..452c33966 100644 --- a/VisualPascalABCNET/Projects/GacInterop.cs +++ b/VisualPascalABCNET/Projects/GacInterop.cs @@ -1,4 +1,6 @@ -using System; +// Copyright (c) AlphaSierraPapa for the SharpDevelop Team (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; using System.Collections.Generic; using System.Reflection; diff --git a/bin/MPGORunner.pas b/bin/MPGORunner.pas index dfa536130..d8decfd22 100644 --- a/bin/MPGORunner.pas +++ b/bin/MPGORunner.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) uses System, System.IO; begin var psi := new System.Diagnostics.ProcessStartInfo(); diff --git a/bin/TestRunner.pas b/bin/TestRunner.pas index fa96b84d9..60a56bb50 100644 --- a/bin/TestRunner.pas +++ b/bin/TestRunner.pas @@ -1,3 +1,5 @@ +// Copyright (c) Ivan Bondarev, Stanislav Mihalkovich (for details please see \doc\copyright.txt) +// This code is distributed under the GNU LGPL (for details please see \doc\license.txt) {$reference Compiler.dll} {$reference CodeCompletion.dll} {$reference Errors.dll}