testjs.lpr 426 B

12345678910111213141516171819202122
  1. program testjs;
  2. {$mode objfpc}{$H+}
  3. uses
  4. {$IFDEF Unix}
  5. cwstring,
  6. {$ENDIF}
  7. Classes, consoletestrunner, tcscanner, jsparser, jsscanner, jstree, jsbase,
  8. tcparser, jswriter, tcwriter, jstoken, JSSrcMap, TCSrcMap;
  9. var
  10. Application: TTestRunner;
  11. begin
  12. DefaultFormat:=fplain;
  13. DefaultRunAllTests:=True;
  14. Application := TTestRunner.Create(nil);
  15. Application.Initialize;
  16. Application.Run;
  17. Application.Free;
  18. end.