administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

Попробовал сделать ковариантность

Browse source 
Обновил год до 2023
This commit is contained in:
Mikhalkovich Stanislav 2023-01-06 23:09:01 +03:00
parent 1fcd8cad89
commit fb8384428a
33 changed files with 96 additions and 54 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
CodeCompletion/Properties/AssemblyInfo.cs
View file

@ -12,7 +12,7 @@ using System.Runtime.InteropServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("CodeCompletion")] [assembly: AssemblyProduct("CodeCompletion")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

2
Configuration/GlobalAssemblyInfo.cs
View file

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

4
Configuration/Version.defs
View file

@ -1,4 +1,4 @@
%MINOR%=8
%REVISION%=3219
%COREVERSION%=3 %COREVERSION%=3
%REVISION%=3222
%MINOR%=8
%MAJOR%=3 %MAJOR%=3

BIN
Localization/DefaultLang.resources
View file

Binary file not shown.

2
Localization/Properties/AssemblyInfo.cs
View file

@ -12,7 +12,7 @@ using System.Runtime.InteropServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("Localization")] [assembly: AssemblyProduct("Localization")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

2
Optimizer/Properties/AssemblyInfo.cs
View file

@ -12,7 +12,7 @@ using System.Runtime.InteropServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("Optimizer")] [assembly: AssemblyProduct("Optimizer")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

2
Optimizer/SemanticTreeConverter.cs
View file

@ -29,7 +29,7 @@ namespace PascalABCCompiler
public string Copyright public string Copyright
{ {
get { return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; } get { return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich"; }
} }
public PascalABCCompiler.SemanticTreeConverters.ConverterType ConverterType public PascalABCCompiler.SemanticTreeConverters.ConverterType ConverterType

2
Parsers/PascalABCParserNewSaushkin/DocTagsParser/Parser.cs
View file

@ -193,7 +193,7 @@ namespace PascalABCCompiler.DocTagsParser
{ {
get get
{ {
return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich";
} }
} }

2
Parsers/PascalABCParserNewSaushkin/Parser.cs
View file

@ -114,7 +114,7 @@ namespace PascalABCCompiler.PascalABCNewParser
//public Preprocessor2.Preprocessor2 preprocessor2 = new PascalABCCompiler.Preprocessor2.Preprocessor2(null); //public Preprocessor2.Preprocessor2 preprocessor2 = new PascalABCCompiler.Preprocessor2.Preprocessor2(null);
public PascalABCNewLanguageParser() public PascalABCNewLanguageParser()
: base("PascalABC.NET", "1.2", "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich", false, new string[] { ".pas" }) : base("PascalABC.NET", "1.2", "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich", false, new string[] { ".pas" })
{ {
} }

2
Parsers/VBNETParser/AssemblyInfo.cs
View file

@ -14,7 +14,7 @@ using System.Runtime.InteropServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("VBNETParser")] [assembly: AssemblyProduct("VBNETParser")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

2
Release/pabcversion.txt
View file

@ -1 +1 @@
3.8.3.3219 3.8.3.3222

2
ReleaseGenerators/PascalABCNET_version.nsh
View file

@ -1 +1 @@
!define VERSION '3.8.3.3219' !define VERSION '3.8.3.3222'

2
SyntaxTreeConverters/Properties/AssemblyInfo.cs
View file

@ -12,7 +12,7 @@ using System.Runtime.InteropServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("SyntaxTreeChanger")] [assembly: AssemblyProduct("SyntaxTreeChanger")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

2
SyntaxVisitors/Properties/AssemblyInfo.cs
View file

@ -12,7 +12,7 @@ using System.Runtime.InteropServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("SyntaxVisitors")] [assembly: AssemblyProduct("SyntaxVisitors")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

42
TreeConverter/TreeRealization/type_table.cs
View file

@ -575,6 +575,48 @@ namespace PascalABCCompiler.TreeRealization
implements = true; implements = true;
break; break;
} }
// Тут можно проверить на ковариантность
else if (interf is compiled_generic_instance_type_node cgitn && base_class is compiled_generic_instance_type_node bcgitn)
{
if (cgitn.original_generic != null && cgitn.original_generic == bcgitn.original_generic)
{
var ctcgi = cgitn.original_generic as compiled_type_node;
if (ctcgi != null)
{
// теперь надо проверить параметры на ковариантность - все
var n = bcgitn.instance_params.Count;
var n1 = cgitn.instance_params.Count;
var impl = true;
if (n != n1)
impl = false;
else
for (int i=0; i<n; i++)
{
if ((ctcgi.compiled_type.GetGenericArguments()[i].GenericParameterAttributes & System.Reflection.GenericParameterAttributes.Covariant) != 0)
{
if (is_derived(bcgitn.instance_params[i], cgitn.instance_params[i], false))
{
// OK
}
}
// Почему то когда это закомментировано, то работает. А так не вызывается ??!
/*else if (bcgitn.instance_params[i] == cgitn.instance_params[i])
{
n = n;
// Тоже OK
}*/
else
{
impl = false;
break;
}
}
// то есть если все контравариантные или неважно какие, но равные то implements = true иначе false
implements = impl;
}
}
}
else if (interf is compiled_type_node ictn && base_class is compiled_type_node bctn) else if (interf is compiled_type_node ictn && base_class is compiled_type_node bctn)
{ {
if (ictn.compiled_type.AssemblyQualifiedName != null && ictn.compiled_type.AssemblyQualifiedName == bctn.compiled_type.AssemblyQualifiedName) if (ictn.compiled_type.AssemblyQualifiedName != null && ictn.compiled_type.AssemblyQualifiedName == bctn.compiled_type.AssemblyQualifiedName)

24
VisualPascalABCNET/AboutBox.Designer.cs generated
View file

@ -51,8 +51,8 @@
this.label2 = new System.Windows.Forms.Label(); this.label2 = new System.Windows.Forms.Label();
this.label3 = new System.Windows.Forms.Label(); this.label3 = new System.Windows.Forms.Label();
this.groupBox2 = new System.Windows.Forms.GroupBox(); this.groupBox2 = new System.Windows.Forms.GroupBox();
this.label6 = new System.Windows.Forms.Label();
this.linkLabel3 = new System.Windows.Forms.LinkLabel(); this.linkLabel3 = new System.Windows.Forms.LinkLabel();
this.label6 = new System.Windows.Forms.Label();
this.label13 = new System.Windows.Forms.Label(); this.label13 = new System.Windows.Forms.Label();
this.linkLabel4 = new System.Windows.Forms.LinkLabel(); this.linkLabel4 = new System.Windows.Forms.LinkLabel();
this.groupBox1.SuspendLayout(); this.groupBox1.SuspendLayout();
@ -169,7 +169,7 @@
this.label12.Name = "label12"; this.label12.Name = "label12";
this.label12.Size = new System.Drawing.Size(317, 13); this.label12.Size = new System.Drawing.Size(317, 13);
this.label12.TabIndex = 17; this.label12.TabIndex = 17;
this.label12.Text = "Copyright (c) 2005, 2022 Ivan Bondarev, Stanislav Mikhalkovich"; this.label12.Text = "Copyright (c) 2005, 2023 Ivan Bondarev, Stanislav Mikhalkovich";
// //
// label9 // label9
// //
@ -317,16 +317,6 @@
this.groupBox2.TabStop = false; this.groupBox2.TabStop = false;
this.groupBox2.Text = "DEVELOPERS"; this.groupBox2.Text = "DEVELOPERS";
// //
// label6
//
this.label6.AutoSize = true;
this.label6.Font = new System.Drawing.Font("Microsoft Sans Serif", 8.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(204)));
this.label6.Location = new System.Drawing.Point(20, 79);
this.label6.Name = "label6";
this.label6.Size = new System.Drawing.Size(85, 13);
this.label6.TabIndex = 29;
this.label6.Text = "DEVELOPERS2";
//
// linkLabel3 // linkLabel3
// //
this.linkLabel3.AutoSize = true; this.linkLabel3.AutoSize = true;
@ -339,6 +329,16 @@
this.linkLabel3.Text = "!PASCALABCNET_DEVELOPERS"; this.linkLabel3.Text = "!PASCALABCNET_DEVELOPERS";
this.linkLabel3.LinkClicked += new System.Windows.Forms.LinkLabelLinkClickedEventHandler(this.linkLabel3_LinkClicked); this.linkLabel3.LinkClicked += new System.Windows.Forms.LinkLabelLinkClickedEventHandler(this.linkLabel3_LinkClicked);
// //
// label6
//
this.label6.AutoSize = true;
this.label6.Font = new System.Drawing.Font("Microsoft Sans Serif", 8.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(204)));
this.label6.Location = new System.Drawing.Point(20, 79);
this.label6.Name = "label6";
this.label6.Size = new System.Drawing.Size(85, 13);
this.label6.TabIndex = 29;
this.label6.Text = "DEVELOPERS2";
//
// label13 // label13
// //
this.label13.AutoSize = true; this.label13.AutoSize = true;

2
VisualPascalABCNET/AboutBox.cs
View file

@ -130,7 +130,7 @@ namespace VisualPascalABC
if (comp != null) if (comp != null)
{ {
Assembly a = Assembly.GetAssembly(comp.GetType()); Assembly a = Assembly.GetAssembly(comp.GetType());
dgvModules.Items.Add(MakeItem("Core", "PascalABCCompiler.Core", a.GetName().Version.ToString(), "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")); dgvModules.Items.Add(MakeItem("Core", "PascalABCCompiler.Core", a.GetName().Version.ToString(), "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich"));
foreach (PascalABCCompiler.Parsers.IParser parser in comp.ParsersController.Parsers) foreach (PascalABCCompiler.Parsers.IParser parser in comp.ParsersController.Parsers)
dgvModules.Items.Add(MakeItem("Parser",parser.Name, parser.Version, parser.Copyright)); dgvModules.Items.Add(MakeItem("Parser",parser.Name, parser.Version, parser.Copyright));
foreach (PascalABCCompiler.SemanticTreeConverters.ISemanticTreeConverter conv in comp.SemanticTreeConvertersController.SemanticTreeConverters) foreach (PascalABCCompiler.SemanticTreeConverters.ISemanticTreeConverter conv in comp.SemanticTreeConvertersController.SemanticTreeConverters)

24
VisualPascalABCNETLinux/AboutBox.Designer.cs generated
View file

@ -51,8 +51,8 @@
this.label2 = new System.Windows.Forms.Label(); this.label2 = new System.Windows.Forms.Label();
this.label3 = new System.Windows.Forms.Label(); this.label3 = new System.Windows.Forms.Label();
this.groupBox2 = new System.Windows.Forms.GroupBox(); this.groupBox2 = new System.Windows.Forms.GroupBox();
this.label6 = new System.Windows.Forms.Label();
this.linkLabel3 = new System.Windows.Forms.LinkLabel(); this.linkLabel3 = new System.Windows.Forms.LinkLabel();
this.label6 = new System.Windows.Forms.Label();
this.label13 = new System.Windows.Forms.Label(); this.label13 = new System.Windows.Forms.Label();
this.linkLabel4 = new System.Windows.Forms.LinkLabel(); this.linkLabel4 = new System.Windows.Forms.LinkLabel();
this.groupBox1.SuspendLayout(); this.groupBox1.SuspendLayout();
@ -169,7 +169,7 @@
this.label12.Name = "label12"; this.label12.Name = "label12";
this.label12.Size = new System.Drawing.Size(317, 13); this.label12.Size = new System.Drawing.Size(317, 13);
this.label12.TabIndex = 17; this.label12.TabIndex = 17;
this.label12.Text = "Copyright (c) 2005, 2022 Ivan Bondarev, Stanislav Mikhalkovich"; this.label12.Text = "Copyright (c) 2005, 2023 Ivan Bondarev, Stanislav Mikhalkovich";
this.label12.Click += new System.EventHandler(this.label12_Click); this.label12.Click += new System.EventHandler(this.label12_Click);
// //
// label9 // label9
@ -318,16 +318,6 @@
this.groupBox2.TabStop = false; this.groupBox2.TabStop = false;
this.groupBox2.Text = "DEVELOPERS"; this.groupBox2.Text = "DEVELOPERS";
// //
// label6
//
this.label6.AutoSize = true;
this.label6.Font = new System.Drawing.Font("Microsoft Sans Serif", 8.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(204)));
this.label6.Location = new System.Drawing.Point(20, 79);
this.label6.Name = "label6";
this.label6.Size = new System.Drawing.Size(85, 13);
this.label6.TabIndex = 29;
this.label6.Text = "DEVELOPERS2";
//
// linkLabel3 // linkLabel3
// //
this.linkLabel3.AutoSize = true; this.linkLabel3.AutoSize = true;
@ -340,6 +330,16 @@
this.linkLabel3.Text = "!PASCALABCNET_DEVELOPERS"; this.linkLabel3.Text = "!PASCALABCNET_DEVELOPERS";
this.linkLabel3.LinkClicked += new System.Windows.Forms.LinkLabelLinkClickedEventHandler(this.linkLabel3_LinkClicked); this.linkLabel3.LinkClicked += new System.Windows.Forms.LinkLabelLinkClickedEventHandler(this.linkLabel3_LinkClicked);
// //
// label6
//
this.label6.AutoSize = true;
this.label6.Font = new System.Drawing.Font("Microsoft Sans Serif", 8.25F, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, ((byte)(204)));
this.label6.Location = new System.Drawing.Point(20, 79);
this.label6.Name = "label6";
this.label6.Size = new System.Drawing.Size(85, 13);
this.label6.TabIndex = 29;
this.label6.Text = "DEVELOPERS2";
//
// label13 // label13
// //
this.label13.AutoSize = true; this.label13.AutoSize = true;

2
VisualPascalABCNETLinux/AboutBox.cs
View file

@ -131,7 +131,7 @@ namespace VisualPascalABC
if (comp != null) if (comp != null)
{ {
Assembly a = Assembly.GetAssembly(comp.GetType()); Assembly a = Assembly.GetAssembly(comp.GetType());
dgvModules.Items.Add(MakeItem("Core", "PascalABCCompiler.Core", a.GetName().Version.ToString(), "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")); dgvModules.Items.Add(MakeItem("Core", "PascalABCCompiler.Core", a.GetName().Version.ToString(), "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich"));
foreach (PascalABCCompiler.Parsers.IParser parser in comp.ParsersController.Parsers) foreach (PascalABCCompiler.Parsers.IParser parser in comp.ParsersController.Parsers)
dgvModules.Items.Add(MakeItem("Parser", parser.Name, parser.Version, parser.Copyright)); dgvModules.Items.Add(MakeItem("Parser", parser.Name, parser.Version, parser.Copyright));
foreach (PascalABCCompiler.SemanticTreeConverters.ISemanticTreeConverter conv in comp.SemanticTreeConvertersController.SemanticTreeConverters) foreach (PascalABCCompiler.SemanticTreeConverters.ISemanticTreeConverter conv in comp.SemanticTreeConvertersController.SemanticTreeConverters)

2
VisualPlugins/CompilerController/CompilerControllerPlugin.cs
View file

@ -32,7 +32,7 @@ namespace VisualPascalABCPlugins
{ {
get get
{ {
return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich";
} }
} }

2
VisualPlugins/HelpBuilder/AssemblyInfo.cs
View file

@ -14,7 +14,7 @@ using System.Runtime.InteropServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("HelpBuilder")] [assembly: AssemblyProduct("HelpBuilder")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

2
VisualPlugins/HelpBuilder/HelpBuilderPlugin.cs
View file

@ -31,7 +31,7 @@ namespace VisualPascalABCPlugins
{ {
get get
{ {
return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich";
} }
} }

2
VisualPlugins/InternalErrorReport/InternalErrorReportPlugin.cs
View file

@ -93,7 +93,7 @@ namespace VisualPascalABCPlugins
{ {
get get
{ {
return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich";
} }
} }

2
VisualPlugins/InternalErrorReport/Properties/AssemblyInfo.cs
View file

@ -10,7 +10,7 @@ using System.Runtime.InteropServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("ExtendedCompilerInformation")] [assembly: AssemblyProduct("ExtendedCompilerInformation")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

2
VisualPlugins/LanguageConverter/Source/LanguageConverterPlugin.cs
View file

@ -33,7 +33,7 @@ namespace VisualPascalABCPlugins
{ {
get get
{ {
return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich";
} }
} }

2
VisualPlugins/PT4Provider/PT4ProviderPlugin.cs
View file

@ -35,7 +35,7 @@ namespace VisualPascalABCPlugins
{ {
get get
{ {
return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich";
} }
} }

2
VisualPlugins/SyntaxTreeVisualisator/SyntaxTreeVisualisatorPlugin.cs
View file

@ -27,7 +27,7 @@ namespace VisualPascalABCPlugins
{ {
get get
{ {
return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich";
} }
} }

2
VisualPlugins/TestPlugin/TestPlugin.cs
View file

@ -29,7 +29,7 @@ namespace VisualPascalABCPlugins
{ {
get get
{ {
return "Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich"; return "Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich";
} }
} }

2
VisualPlugins/TraningControlPlugin/TeacherControlPlugin.cs
View file

@ -27,7 +27,7 @@ namespace VisualPascalABCPlugins
private PluginGUIItem Item; private PluginGUIItem Item;
public string Name { get => "Teacher Control Plugin"; } public string Name { get => "Teacher Control Plugin"; }
public string Version { get => "0.1"; } public string Version { get => "0.1"; }
public string Copyright { get => "Copyright © 2021-2022 by Stanislav Mikhalkovich"; } public string Copyright { get => "Copyright © 2021-2023 by Stanislav Mikhalkovich"; }
public string Login = null; public string Login = null;
public string Password = null; public string Password = null;

2
bin/Lng/Rus/VisualPascalABCNET.dat
View file

@ -13,7 +13,7 @@ M_SAVE=Сохранить
M_SAVEAS=Сохранить как... M_SAVEAS=Сохранить как...
M_SAVEALL=Сохранить все M_SAVEALL=Сохранить все
M_CLOSE=Закрыть M_CLOSE=Закрыть
M_CLOSEALLBUTTHIS=Закрыть все, кроме текущего M_CLOSEALLBUTTHIS=Закрыть все, кроме текущего
M_PRINT=Печать... M_PRINT=Печать...
M_RECENTFILES=Последние файлы M_RECENTFILES=Последние файлы
M_RECENTPROJECTS=Последние проекты M_RECENTPROJECTS=Последние проекты

2
pabcnetc/AssemblyInfo.cs
View file

@ -13,7 +13,7 @@ using System.Runtime.CompilerServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("")] [assembly: AssemblyProduct("")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]

2
pabcnetc/ConsoleCompiler.cs
View file

@ -374,7 +374,7 @@ namespace PascalABCCompiler
DateTime ldt = DateTime.Now; DateTime ldt = DateTime.Now;
Compiler = new PascalABCCompiler.Compiler(null,ChangeCompilerState); Compiler = new PascalABCCompiler.Compiler(null,ChangeCompilerState);
//GC.Collect(); //GC.Collect();
WriteColorText(Compiler.Banner + "\nCopyright (c) 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich\n", ConsoleColor.Green); WriteColorText(Compiler.Banner + "\nCopyright (c) 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich\n", ConsoleColor.Green);
Console.WriteLine("OK {0}ms", (DateTime.Now - ldt).TotalMilliseconds); Console.WriteLine("OK {0}ms", (DateTime.Now - ldt).TotalMilliseconds);
if (Compiler.SupportedSourceFiles.Length == 0) if (Compiler.SupportedSourceFiles.Length == 0)
WriteColorText(StringResourcesGet("ERROR_PARSERS_NOT_FOUND")+Environment.NewLine, ConsoleColor.Red); WriteColorText(StringResourcesGet("ERROR_PARSERS_NOT_FOUND")+Environment.NewLine, ConsoleColor.Red);

2
pabcnetc_clear/AssemblyInfo.cs
View file

@ -13,7 +13,7 @@ using System.Runtime.CompilerServices;
[assembly: AssemblyConfiguration("")] [assembly: AssemblyConfiguration("")]
[assembly: AssemblyCompany("")] [assembly: AssemblyCompany("")]
[assembly: AssemblyProduct("")] [assembly: AssemblyProduct("")]
[assembly: AssemblyCopyright("Copyright © 2005-2022 by Ivan Bondarev, Stanislav Mikhalkovich")] [assembly: AssemblyCopyright("Copyright © 2005-2023 by Ivan Bondarev, Stanislav Mikhalkovich")]
[assembly: AssemblyTrademark("")] [assembly: AssemblyTrademark("")]
[assembly: AssemblyCulture("")] [assembly: AssemblyCulture("")]