Skip to content

Update CodeProfiler #522

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
Zeus64 merged 10 commits into from
Sep 22, 2026
Merged

Update CodeProfiler #522

Show file tree
Hide file tree
Changes from all commits
Commits
Show all changes
10 commits
Select commit Hold shift + click to select a range
221d56d
uPDATE
stephane128 Jul 16, 2026
a0da81e
Update CodeProfiler
stephane128 Sep 9, 2026
adf78e6
Update
stephane128 Sep 21, 2026
f8f6a66
update
stephane128 Sep 21, 2026
a7941af
update
stephane128 Sep 21, 2026
f3b21a2
update
stephane128 Sep 22, 2026
984b379
update
stephane128 Sep 22, 2026
f9d6955
update
stephane128 Sep 22, 2026
51ca158
update
stephane128 Sep 22, 2026
8e28559
Merge branch 'master' into master
Zeus64 Sep 22, 2026
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
18 changes: 18 additions & 0 deletions References/DelphiAST/Demo/Parser/ParserDemo.dpr
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -0,0 +1,18 @@
program ParserDemo;

uses
FastMM4,
Forms,
uMainForm in 'uMainForm.pas' {MainForm},
StringUsageLogging in 'StringUsageLogging.pas';

{$R *.res}

begin
System.ReportMemoryLeaksOnShutdown := True;

Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TMainForm, MainForm);
Application.Run;
end.
547 changes: 547 additions & 0 deletions References/DelphiAST/Demo/Parser/ParserDemo.dproj
View file
Open in desktop

Large diffs are not rendered by default.

98 changes: 98 additions & 0 deletions References/DelphiAST/Demo/Parser/ParserDemo.lpi
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -0,0 +1,98 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectOptions>
<Version Value="10"/>
<PathDelim Value="\"/>
<General>
<Flags>
<MainUnitHasUsesSectionForAllUnits Value="False"/>
<MainUnitHasCreateFormStatements Value="False"/>
<MainUnitHasTitleStatement Value="False"/>
</Flags>
<SessionStorage Value="InProjectDir"/>
<MainUnit Value="0"/>
<Title Value="ParserDemo"/>
<UseAppBundle Value="False"/>
<ResourceType Value="res"/>
</General>
<i18n>
<EnableI18N LFM="False"/>
</i18n>
<VersionInfo>
<StringTable ProductVersion=""/>
</VersionInfo>
<BuildModes Count="1">
<Item1 Name="Default" Default="True"/>
</BuildModes>
<PublishOptions>
<Version Value="2"/>
</PublishOptions>
<RunParams>
<local>
<FormatVersion Value="1"/>
</local>
</RunParams>
<RequiredPackages Count="1">
<Item1>
<PackageName Value="LCL"/>
</Item1>
</RequiredPackages>
<Units Count="4">
<Unit0>
<Filename Value="ParserDemo.lpr"/>
<IsPartOfProject Value="True"/>
</Unit0>
<Unit1>
<Filename Value="uMainForm.pas"/>
<IsPartOfProject Value="True"/>
<ComponentName Value="MainForm"/>
<HasResources Value="True"/>
<ResourceBaseClass Value="Form"/>
</Unit1>
<Unit2>
<Filename Value="..\..\Source\DelphiAST.Classes.pas"/>
<IsPartOfProject Value="True"/>
</Unit2>
<Unit3>
<Filename Value="..\..\Source\DelphiAST.pas"/>
<IsPartOfProject Value="True"/>
</Unit3>
</Units>
</ProjectOptions>
<CompilerOptions>
<Version Value="11"/>
<PathDelim Value="\"/>
<SearchPaths>
<IncludeFiles Value="..\..\Source;..\..\Source\SimpleParser;..\..\Source\FreePascalSupport\Generics.Collections\src;$(ProjOutDir)"/>
<OtherUnitFiles Value="..\..\Source;..\..\Source\FreePascalSupport\FPC_StringBuilder\Src;..\..\Source\FreePascalSupport\Generics.Collection\src;..\..\Source\FreePascalSupport;..\..\Source\SimpleParser"/>
</SearchPaths>
<Parsing>
<SyntaxOptions>
<SyntaxMode Value="Delphi"/>
</SyntaxOptions>
</Parsing>
<Linking>
<Options>
<Win32>
<GraphicApplication Value="True"/>
</Win32>
</Options>
</Linking>
<Other>
<CustomOptions Value="-dBorland -dVer150 -dDelphi7 -dCompiler6_Up -dPUREPASCAL"/>
</Other>
</CompilerOptions>
<Debugging>
<Exceptions Count="3">
<Item1>
<Name Value="EAbort"/>
</Item1>
<Item2>
<Name Value="ECodetoolError"/>
</Item2>
<Item3>
<Name Value="EFOpenError"/>
</Item3>
</Exceptions>
</Debugging>
</CONFIG>
16 changes: 16 additions & 0 deletions References/DelphiAST/Demo/Parser/ParserDemo.lpr
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -0,0 +1,16 @@
program ParserDemo;

{$MODE Delphi}

uses
Forms, Interfaces,
uMainForm in 'uMainForm.pas' {MainForm};

{$R *.res}

begin
Application.Initialize;
Application.MainFormOnTaskbar := True;
Application.CreateForm(TMainForm, MainForm);
Application.Run;
end.
178 changes: 178 additions & 0 deletions References/DelphiAST/Demo/Parser/ParserDemo.lps
View file
Open in desktop
Original file line number Diff line number Diff line change
@@ -0,0 +1,178 @@
<?xml version="1.0" encoding="UTF-8"?>
<CONFIG>
<ProjectSession>
<PathDelim Value="\"/>
<Version Value="9"/>
<BuildModes Active="Default"/>
<Units Count="9">
<Unit0>
<Filename Value="ParserDemo.lpr"/>
<IsPartOfProject Value="True"/>
<IsVisibleTab Value="True"/>
<CursorPos X="53" Y="16"/>
<UsageCount Value="33"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit0>
<Unit1>
<Filename Value="uMainForm.pas"/>
<IsPartOfProject Value="True"/>
<HasResources Value="True"/>
<EditorIndex Value="1"/>
<TopLine Value="22"/>
<CursorPos X="58" Y="48"/>
<UsageCount Value="33"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit1>
<Unit2>
<Filename Value="..\Source\DelphiAST.Classes.pas"/>
<IsPartOfProject Value="True"/>
<EditorIndex Value="2"/>
<TopLine Value="49"/>
<CursorPos X="29" Y="68"/>
<UsageCount Value="33"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit2>
<Unit3>
<Filename Value="..\Source\DelphiAST.pas"/>
<IsPartOfProject Value="True"/>
<EditorIndex Value="4"/>
<CursorPos X="22" Y="8"/>
<UsageCount Value="33"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit3>
<Unit4>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<EditorIndex Value="3"/>
<TopLine Value="684"/>
<CursorPos X="42" Y="661"/>
<UsageCount Value="16"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit4>
<Unit5>
<Filename Value="..\..\Generics.Collections\src\inc\generics.dictionaries.inc"/>
<EditorIndex Value="-1"/>
<TopLine Value="143"/>
<CursorPos X="92" Y="158"/>
<UsageCount Value="9"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit5>
<Unit6>
<Filename Value="..\..\Generics.Collections\src\generics.defaults.pas"/>
<EditorIndex Value="-1"/>
<TopLine Value="59"/>
<CursorPos X="48" Y="85"/>
<UsageCount Value="15"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit6>
<Unit7>
<Filename Value="..\Source\DelphiAST.Writer.pas"/>
<EditorIndex Value="5"/>
<TopLine Value="65"/>
<CursorPos X="15" Y="74"/>
<UsageCount Value="15"/>
<Loaded Value="True"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit7>
<Unit8>
<Filename Value="..\..\FPC_StringBuilder\Src\StringBuilderUnit.pas"/>
<EditorIndex Value="-1"/>
<TopLine Value="98"/>
<CursorPos X="95" Y="124"/>
<UsageCount Value="14"/>
<DefaultSyntaxHighlighter Value="Delphi"/>
</Unit8>
</Units>
<JumpHistory Count="22" HistoryIndex="21">
<Position1>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="702" Column="29" TopLine="675"/>
</Position1>
<Position2>
<Filename Value="..\Source\DelphiAST.Classes.pas"/>
</Position2>
<Position3>
<Filename Value="..\Source\DelphiAST.pas"/>
<Caret Line="1528" Column="14" TopLine="1492"/>
</Position3>
<Position4>
<Filename Value="..\Source\DelphiAST.pas"/>
<Caret Line="1518" Column="26" TopLine="1492"/>
</Position4>
<Position5>
<Filename Value="..\Source\DelphiAST.pas"/>
<Caret Line="231" Column="22" TopLine="188"/>
</Position5>
<Position6>
<Filename Value="..\Source\DelphiAST.pas"/>
<Caret Line="234" Column="34" TopLine="190"/>
</Position6>
<Position7>
<Filename Value="..\Source\DelphiAST.pas"/>
<Caret Line="216" Column="48" TopLine="198"/>
</Position7>
<Position8>
<Filename Value="..\Source\DelphiAST.pas"/>
<Caret Line="231" Column="49" TopLine="201"/>
</Position8>
<Position9>
<Filename Value="..\Source\DelphiAST.pas"/>
<Caret Line="52" Column="131" TopLine="31"/>
</Position9>
<Position10>
<Filename Value="..\Source\DelphiAST.Writer.pas"/>
</Position10>
<Position11>
<Filename Value="..\Source\DelphiAST.Writer.pas"/>
<Caret Line="7" Column="23"/>
</Position11>
<Position12>
<Filename Value="..\Source\DelphiAST.Writer.pas"/>
<Caret Line="22" Column="48"/>
</Position12>
<Position13>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="662" Column="35" TopLine="637"/>
</Position13>
<Position14>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="647" Column="34" TopLine="637"/>
</Position14>
<Position15>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="678" TopLine="637"/>
</Position15>
<Position16>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="677" Column="11" TopLine="637"/>
</Position16>
<Position17>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="676" TopLine="637"/>
</Position17>
<Position18>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="693" Column="58" TopLine="686"/>
</Position18>
<Position19>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="667" TopLine="646"/>
</Position19>
<Position20>
<Filename Value="..\Source\SimpleParser\SimpleParser.pas"/>
<Caret Line="676" Column="24" TopLine="648"/>
</Position20>
<Position21>
<Filename Value="..\Source\DelphiAST.pas"/>
<Caret Line="239" Column="8" TopLine="201"/>
</Position21>
<Position22>
<Filename Value="ParserDemo.lpr"/>
</Position22>
</JumpHistory>
</ProjectSession>
</CONFIG>
Binary file added References/DelphiAST/Demo/Parser/ParserDemo.or
View file
Open in desktop
Binary file not shown.
Loading