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

1
FPCTest/testcase1.pas
View File

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