testmd.lpr 898 B

12345678910111213141516171819202122232425262728293031
  1. program testmd;
  2. {$mode objfpc}{$H+}
  3. uses
  4. cwstring,Classes, consoletestrunner, utest.markdown.utils, markdown.elements, Markdown.HTMLEntities,
  5. markdown.htmlrender, markdown.inlinetext, markdown.line, markdown.parser, markdown.render, markdown.scanner,
  6. markdown.utils, utest.markdown.scanner, utest.markdown.inlinetext, utest.markdown.htmlrender, utest.markdown.parser,
  7. utest.markdown.fpdocrender,markdown.latexrender,utest.markdown.latexrender,markdown.processors;
  8. type
  9. { TMyTestRunner }
  10. TMyTestRunner = class(TTestRunner)
  11. protected
  12. // override the protected methods of TTestRunner to customize its behavior
  13. end;
  14. var
  15. Application: TMyTestRunner;
  16. begin
  17. DefaultRunAllTests:=True;
  18. DefaultFormat:=fPlain;
  19. Application := TMyTestRunner.Create(nil);
  20. Application.Initialize;
  21. Application.Title := 'FPCUnit Console test runner';
  22. Application.Run;
  23. Application.Free;
  24. end.