mirror of
https://gitlab.com/freepascal.org/fpc/pas2js.git
synced 2026-02-24 16:41:16 +01:00
18 lines
377 B
ObjectPascal
18 lines
377 B
ObjectPascal
program testrtl;
|
|
|
|
{$mode objfpc}
|
|
|
|
uses
|
|
browserconsole, {browsertestrunner} consoletestrunner, JS, Classes, SysUtils, Web, frmrtlrun, tcstream, tccompstreaming, simplelinkedlist;
|
|
|
|
var
|
|
Application : TTestRunner;
|
|
|
|
begin
|
|
Application:=TTestRunner.Create(nil);
|
|
Application.RunFormClass:=TConsoleRunner;
|
|
Application.Initialize;
|
|
Application.Run;
|
|
// Application.Free;
|
|
end.
|