diff --git a/Configuration/GlobalAssemblyInfo.cs b/Configuration/GlobalAssemblyInfo.cs index dce3b259b..9dd9cdb1f 100644 --- a/Configuration/GlobalAssemblyInfo.cs +++ b/Configuration/GlobalAssemblyInfo.cs @@ -15,7 +15,7 @@ internal static class RevisionClass public const string Major = "3"; public const string Minor = "9"; public const string Build = "0"; - public const string Revision = "3441"; + public const string Revision = "3442"; public const string MainVersion = Major + "." + Minor; public const string FullVersion = Major + "." + Minor + "." + Build + "." + Revision; diff --git a/Configuration/Version.defs b/Configuration/Version.defs index e267ce6cd..2cfb82a2f 100644 --- a/Configuration/Version.defs +++ b/Configuration/Version.defs @@ -1,4 +1,4 @@ -%MINOR%=9 -%REVISION%=3441 %COREVERSION%=0 +%REVISION%=3442 +%MINOR%=9 %MAJOR%=3 diff --git a/LanguageIntegrator/LanguageIntegrator.cs b/LanguageIntegrator/LanguageIntegrator.cs index decec1cbc..bd77009b3 100644 --- a/LanguageIntegrator/LanguageIntegrator.cs +++ b/LanguageIntegrator/LanguageIntegrator.cs @@ -55,7 +55,7 @@ namespace LanguageIntegration { ParsersController.LoadStandardParsers(); - // LoadAllLanguageKits(); + LoadAllLanguageKits(); } /// @@ -65,7 +65,7 @@ namespace LanguageIntegration { ParsersController.Parsers.Clear(); ParsersController.LoadStandardParsers(); - // LoadParsersFromLanguageKits(); + LoadParsersFromLanguageKits(); } /// diff --git a/Release/pabcversion.txt b/Release/pabcversion.txt index 7af2d4152..2c7c7b3fb 100644 --- a/Release/pabcversion.txt +++ b/Release/pabcversion.txt @@ -1 +1 @@ -3.9.0.3441 +3.9.0.3442 diff --git a/ReleaseGenerators/PascalABCNET_version.nsh b/ReleaseGenerators/PascalABCNET_version.nsh index 32478328c..397c78f51 100644 --- a/ReleaseGenerators/PascalABCNET_version.nsh +++ b/ReleaseGenerators/PascalABCNET_version.nsh @@ -1 +1 @@ -!define VERSION '3.9.0.3441' +!define VERSION '3.9.0.3442' diff --git a/TestSuite/CompilationSamples/PABCSystem.pas b/TestSuite/CompilationSamples/PABCSystem.pas index 32eec5a18..b344e046c 100644 --- a/TestSuite/CompilationSamples/PABCSystem.pas +++ b/TestSuite/CompilationSamples/PABCSystem.pas @@ -7248,7 +7248,10 @@ end; procedure Println(params args: array of object); begin if args.Length = 0 then + begin + Writeln; exit; + end; for var i := 0 to args.length - 2 do if PrintDelimDefault<>'' then Write(args[i], PrintDelimDefault) @@ -7259,7 +7262,10 @@ end; procedure Print(f: Text; params args: array of object); begin if args.Length = 0 then + begin + Writeln(f); exit; + end; for var i := 0 to args.length - 1 do if PrintDelimDefault<>'' then Write(f, args[i], PrintDelimDefault)