* Add tests for string helpers

This commit is contained in:
michael 2020-04-26 11:01:16 +00:00
parent 11fbc72255
commit 42b3e3a87b
3 changed files with 1162 additions and 1 deletions

1158
test/tcstringhelp.pp Normal file

File diff suppressed because it is too large Load Diff

View File

@ -4,10 +4,13 @@
<Version Value="12"/> <Version Value="12"/>
<General> <General>
<Flags> <Flags>
<SaveOnlyProjectUnits Value="True"/>
<MainUnitHasCreateFormStatements Value="False"/> <MainUnitHasCreateFormStatements Value="False"/>
<MainUnitHasTitleStatement Value="False"/> <MainUnitHasTitleStatement Value="False"/>
<MainUnitHasScaledStatement Value="False"/> <MainUnitHasScaledStatement Value="False"/>
<Runnable Value="False"/> <Runnable Value="False"/>
<SaveJumpHistory Value="False"/>
<SaveFoldState Value="False"/>
</Flags> </Flags>
<SessionStorage Value="InProjectDir"/> <SessionStorage Value="InProjectDir"/>
<Title Value="testrtl"/> <Title Value="testrtl"/>

View File

@ -26,7 +26,7 @@ program testrtl;
uses uses
browserconsole, consoletestrunner, frmrtlrun, browserconsole, consoletestrunner, frmrtlrun,
tcstream, tccompstreaming, simplelinkedlist, tcsyshelpers; tcstream, tccompstreaming, simplelinkedlist, tcsyshelpers, tcstringhelp;
var var
Application : TTestRunner; Application : TTestRunner;