artem3213212/AGLogs
1
0
Fork 0
Code Issues 1 Releases Activity

const str optimization

Browse Source
This commit is contained in:
Artem3213212
2018-06-01 20:52:37 +03:00
parent 67a0b6c480
commit 6dad5b98a2
2 changed files with 64 additions and 66 deletions
Download Patch File Download Diff File Expand all files Collapse all files

129
FPCTest/fpcunitproject1.lps
View File

@@ -16,8 +16,7 @@
<Filename Value="testcase1.pas"/>
<IsPartOfProject Value="True"/>
<UnitName Value="TestCase1"/>
<TopLine Value="15"/>
<CursorPos X="50" Y="28"/>
<CursorPos X="116" Y="32"/>
<UsageCount Value="194"/>
<Loaded Value="True"/>
</Unit1>
@@ -26,8 +25,8 @@
<IsPartOfProject Value="True"/>
<IsVisibleTab Value="True"/>
<EditorIndex Value="1"/>
<TopLine Value="7"/>
<CursorPos X="35" Y="19"/>
<TopLine Value="362"/>
<CursorPos X="34" Y="376"/>
<UsageCount Value="194"/>
<Loaded Value="True"/>
</Unit2>
@@ -42,123 +41,123 @@
<JumpHistory Count="30" HistoryIndex="29">
<Position1>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="35" Column="11" TopLine="21"/>
<Caret Line="34" Column="38" TopLine="10"/>
</Position1>
<Position2>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="214" Column="38" TopLine="200"/>
<Filename Value="testcase1.pas"/>
<Caret Line="29" TopLine="4"/>
</Position2>
<Position3>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="21" Column="7" TopLine="7"/>
<Filename Value="testcase1.pas"/>
<Caret Line="41" Column="51" TopLine="28"/>
</Position3>
<Position4>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="182" Column="40" TopLine="178"/>
<Filename Value="testcase1.pas"/>
<Caret Line="48" Column="53" TopLine="9"/>
</Position4>
<Position5>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="53" Column="35" TopLine="40"/>
<Filename Value="testcase1.pas"/>
<Caret Line="19" Column="11" TopLine="5"/>
</Position5>
<Position6>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="214" Column="38" TopLine="191"/>
<Filename Value="testcase1.pas"/>
<Caret Line="48" Column="58" TopLine="34"/>
</Position6>
<Position7>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="13" Column="15"/>
<Filename Value="testcase1.pas"/>
<Caret Line="17" Column="26" TopLine="5"/>
</Position7>
<Position8>
<Filename Value="testcase1.pas"/>
<Caret Line="8" Column="31"/>
<Caret Line="50" Column="58" TopLine="35"/>
</Position8>
<Position9>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="19" Column="38"/>
<Filename Value="testcase1.pas"/>
<Caret Line="48" Column="63" TopLine="24"/>
</Position9>
<Position10>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="319" Column="28" TopLine="298"/>
</Position10>
<Position11>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="13" Column="49"/>
</Position11>
<Position12>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="34" Column="38" TopLine="10"/>
</Position12>
<Position13>
<Filename Value="testcase1.pas"/>
<Caret Line="29" TopLine="4"/>
</Position13>
<Position14>
<Filename Value="testcase1.pas"/>
<Caret Line="41" Column="51" TopLine="28"/>
</Position14>
<Position15>
<Filename Value="testcase1.pas"/>
<Caret Line="48" Column="53" TopLine="9"/>
</Position15>
<Position16>
<Filename Value="testcase1.pas"/>
<Caret Line="19" Column="11" TopLine="5"/>
</Position10>
<Position11>
<Filename Value="testcase1.pas"/>
<Caret Line="48" Column="59" TopLine="33"/>
</Position11>
<Position12>
<Filename Value="testcase1.pas"/>
<Caret Line="21" TopLine="6"/>
</Position12>
<Position13>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="25" Column="27" TopLine="13"/>
</Position13>
<Position14>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="32" Column="57" TopLine="11"/>
</Position14>
<Position15>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="328" Column="7" TopLine="305"/>
</Position15>
<Position16>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="317" Column="25" TopLine="315"/>
</Position16>
<Position17>
<Filename Value="testcase1.pas"/>
<Caret Line="48" Column="58" TopLine="34"/>
<Caret Line="28" Column="50" TopLine="15"/>
</Position17>
<Position18>
<Filename Value="testcase1.pas"/>
<Caret Line="17" Column="26" TopLine="5"/>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="21" Column="7" TopLine="7"/>
</Position18>
<Position19>
<Filename Value="testcase1.pas"/>
<Caret Line="50" Column="58" TopLine="35"/>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="64" Column="35" TopLine="50"/>
</Position19>
<Position20>
<Filename Value="testcase1.pas"/>
<Caret Line="48" Column="63" TopLine="24"/>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="28" Column="30" TopLine="10"/>
</Position20>
<Position21>
<Filename Value="testcase1.pas"/>
<Caret Line="19" Column="11" TopLine="5"/>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="134" Column="47" TopLine="134"/>
</Position21>
<Position22>
<Filename Value="testcase1.pas"/>
<Caret Line="48" Column="59" TopLine="33"/>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="179" Column="32" TopLine="165"/>
</Position22>
<Position23>
<Filename Value="testcase1.pas"/>
<Caret Line="21" TopLine="6"/>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="184" Column="37" TopLine="170"/>
</Position23>
<Position24>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="25" Column="27" TopLine="13"/>
<Caret Line="257" Column="33" TopLine="243"/>
</Position24>
<Position25>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="32" Column="57" TopLine="11"/>
<Caret Line="297" Column="33" TopLine="283"/>
</Position25>
<Position26>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="328" Column="7" TopLine="305"/>
<Caret Line="310" Column="40" TopLine="296"/>
</Position26>
<Position27>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="317" Column="25" TopLine="315"/>
<Caret Line="312" Column="6" TopLine="301"/>
</Position27>
<Position28>
<Filename Value="testcase1.pas"/>
<Caret Line="28" Column="50" TopLine="15"/>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="324" Column="21" TopLine="301"/>
</Position28>
<Position29>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="21" Column="7" TopLine="7"/>
<Caret Line="344" Column="35" TopLine="330"/>
</Position29>
<Position30>
<Filename Value="..\AG.Logs.pas"/>
<Caret Line="64" Column="35" TopLine="50"/>
<Caret Line="360" Column="37" TopLine="346"/>
</Position30>
</JumpHistory>
</ProjectSession>

1
FPCTest/testcase1.pas
View File

@@ -49,7 +49,6 @@ SetLength(s,0);
MultiLog.Write('Str Test');
MultiLog.Write('Str+Object Test',self);
FreeAndNil(MultiLog);
end;