18 lines
224 B
ObjectPascal
18 lines
224 B
ObjectPascal
program SynTest;
|
|
|
|
{$APPTYPE CONSOLE}
|
|
|
|
uses
|
|
{$I SynDprUses.inc} // use FastMM4 on older Delphi, or set FPC threads
|
|
SynTestTest;
|
|
|
|
begin
|
|
with TTestSuit.Create do
|
|
try
|
|
Run;
|
|
readln;
|
|
finally
|
|
Free;
|
|
end;
|
|
end.
|