Skip to content
Merged
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view

This file was deleted.

24 changes: 18 additions & 6 deletions SimpleBaseLib.Tests/Delphi.Tests/SimpleBaseLib.Tests.dpr
Original file line number Diff line number Diff line change
Expand Up @@ -11,15 +11,22 @@ program SimpleBaseLib.Tests;
}

{$WARN DUPLICATE_CTOR_DTOR OFF}
{$IFDEF CONSOLE_TESTRUNNER}
{$APPTYPE CONSOLE}

{$IFNDEF TESTINSIGHT}
{$IFDEF CONSOLE_TESTRUNNER}
{$APPTYPE CONSOLE}
{$ENDIF}
{$ENDIF}

uses
Forms,
TestFramework,
GUITestRunner,
TextTestRunner,
{$IFDEF TESTINSIGHT}
TestInsight.DUnit,
{$ELSE}
Forms,
TestFramework,
GUITestRunner,
TextTestRunner,
{$ENDIF}
SbpBase58Alphabet in '..\..\SimpleBaseLib\src\Bases\SbpBase58Alphabet.pas',
SbpIBase58Alphabet in '..\..\SimpleBaseLib\src\Interfaces\SbpIBase58Alphabet.pas',
SbpBase58 in '..\..\SimpleBaseLib\src\Bases\SbpBase58.pas',
Expand Down Expand Up @@ -54,10 +61,15 @@ uses
SimpleBaseLibTestBase in '..\src\SimpleBaseLibTestBase.pas';

begin

{$IFDEF TESTINSIGHT}
TestInsight.DUnit.RunRegisteredTests;
{$ELSE}
Application.Initialize;
if IsConsole then
TextTestRunner.RunRegisteredTests
else
GUITestRunner.RunRegisteredTests;
{$ENDIF}

end.
5 changes: 0 additions & 5 deletions SimpleBaseLib/src/Include/SimpleBaseLib.inc
Original file line number Diff line number Diff line change
Expand Up @@ -27,11 +27,6 @@
{$STRINGCHECKS OFF}
{$WARN DUPLICATE_CTOR_DTOR OFF}

// XE and Above
{$IF CompilerVersion >= 22.0}
{$DEFINE DELPHIXE_UP}
{$IFEND}

{$ENDIF}

{========================== Common Compiler Settings ==========================}
Expand Down
19 changes: 0 additions & 19 deletions SimpleBaseLib/src/Utils/SbpSimpleBaseLibTypes.pas
Original file line number Diff line number Diff line change
Expand Up @@ -19,23 +19,6 @@ EInvalidOperationSimpleBaseLibException = class(ESimpleBaseLibException);
/// </summary>
TSimpleBaseLibByteArray = TBytes;

{$IFDEF DELPHIXE_UP}
/// <summary>
/// Represents a dynamic array of Char.
/// </summary>
TSimpleBaseLibCharArray = TArray<Char>;

/// <summary>
/// Represents a dynamic array of String.
/// </summary>
TSimpleBaseLibStringArray = TArray<String>;

/// <summary>
/// Represents a dynamic array of array of byte.
/// </summary>
TSimpleBaseLibMatrixByteArray = TArray<TSimpleBaseLibByteArray>;

{$ELSE}
/// <summary>
/// Represents a dynamic array of Char.
/// </summary>
Expand All @@ -51,8 +34,6 @@ EInvalidOperationSimpleBaseLibException = class(ESimpleBaseLibException);
/// </summary>
TSimpleBaseLibMatrixByteArray = array of TSimpleBaseLibByteArray;

{$ENDIF DELPHIXE_UP}

implementation

{$IFDEF FPC}
Expand Down