Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
The table of contents is too big for display.
Diff view
Diff view
  •  
  •  
  •  
6 changes: 6 additions & 0 deletions .gitignore
Original file line number Diff line number Diff line change
Expand Up @@ -69,4 +69,10 @@ __recovery/
# Boss dependency manager vendor folder https://github.com/HashLoad/boss
modules/

# Indy package build output - all Full*.bat scripts emit here
/Output/

# Transient temp build dir used by the C++Builder Fullc_*.bat scripts (artifacts are relocated to /Output/)
/Lib/Output/

# End of https://www.gitignore.io/api/delphi
6 changes: 3 additions & 3 deletions Builder/Package Generator/DModule.pas
Original file line number Diff line number Diff line change
Expand Up @@ -124,7 +124,7 @@ procedure TDM.CheckForMissingFiles;
SR: TSearchRec;
UnitName: String;
begin
if FindFirst(GIndyPath + 'Lib\System\*.pas', faAnyFile, SR) = 0 then
if FindFirst(GIndyPath + 'Lib\Source\System\*.pas', faAnyFile, SR) = 0 then
try
repeat
UnitName := ChangeFileExt(SR.Name, '');
Expand All @@ -139,7 +139,7 @@ procedure TDM.CheckForMissingFiles;
FindClose(SR);
end;

if FindFirst(GIndyPath + 'Lib\Core\*.pas', faAnyFile, SR) = 0 then
if FindFirst(GIndyPath + 'Lib\Source\Core\*.pas', faAnyFile, SR) = 0 then
try
repeat
UnitName := ChangeFileExt(SR.Name, '');
Expand All @@ -154,7 +154,7 @@ procedure TDM.CheckForMissingFiles;
FindClose(SR);
end;

if FindFirst(GIndyPath + 'Lib\Protocols\*.pas', faAnyFile, SR) = 0 then
if FindFirst(GIndyPath + 'Lib\Source\Protocols\*.pas', faAnyFile, SR) = 0 then
try
repeat
UnitName := ChangeFileExt(SR.Name, '');
Expand Down
3 changes: 3 additions & 0 deletions Builder/Package Generator/Data/PkgGen.ini
Original file line number Diff line number Diff line change
@@ -0,0 +1,3 @@
[Settings]
LastVersion=10.7.0.0

92 changes: 46 additions & 46 deletions Builder/Package Generator/LazPkgGen.dpr
Original file line number Diff line number Diff line change
Expand Up @@ -62,44 +62,44 @@ The format is like this:

===
<Files Count="9">
<Item1>
<Filename Value="IdAbout.pas"/>
<UnitName Value="IdAbout"/>
</Item1>
<Item2>
<Filename Value="IdAboutVCL.pas"/>
<UnitName Value="IdAboutVCL"/>
</Item2>
<Item3>
<Filename Value="IdAboutVCL.lrs"/>
<Type Value="LRS"/>
</Item3>
<Item4>
<Filename Value="IdAntiFreeze.pas"/>
<UnitName Value="IdAntiFreeze"/>
</Item4>
<Item5>
<Filename Value="IdDsnBaseCmpEdt.pas"/>
<UnitName Value="IdDsnBaseCmpEdt"/>
</Item5>
<Item6>
<Filename Value="IdDsnCoreResourceStrings.pas"/>
<UnitName Value="IdDsnCoreResourceStrings"/>
</Item6>
<Item7>
<Filename Value="IdRegisterCore.pas"/>
<HasRegisterProc Value="True"/>
<UnitName Value="IdRegisterCore"/>
</Item7>
<Item8>
<Filename Value="IdRegisterCore.lrs"/>
<Type Value="LRS"/>
</Item8>
<Item9>
<Filename Value="IdCoreDsnRegister.pas"/>
<HasRegisterProc Value="True"/>
<UnitName Value="IdCoreDsnRegister"/>
</Item9>
<Item1>
<Filename Value="IdAbout.pas"/>
<UnitName Value="IdAbout"/>
</Item1>
<Item2>
<Filename Value="IdAboutVCL.pas"/>
<UnitName Value="IdAboutVCL"/>
</Item2>
<Item3>
<Filename Value="IdAboutVCL.lrs"/>
<Type Value="LRS"/>
</Item3>
<Item4>
<Filename Value="IdAntiFreeze.pas"/>
<UnitName Value="IdAntiFreeze"/>
</Item4>
<Item5>
<Filename Value="IdDsnBaseCmpEdt.pas"/>
<UnitName Value="IdDsnBaseCmpEdt"/>
</Item5>
<Item6>
<Filename Value="IdDsnCoreResourceStrings.pas"/>
<UnitName Value="IdDsnCoreResourceStrings"/>
</Item6>
<Item7>
<Filename Value="IdRegisterCore.pas"/>
<HasRegisterProc Value="True"/>
<UnitName Value="IdRegisterCore"/>
</Item7>
<Item8>
<Filename Value="IdRegisterCore.lrs"/>
<Type Value="LRS"/>
</Item8>
<Item9>
<Filename Value="IdCoreDsnRegister.pas"/>
<HasRegisterProc Value="True"/>
<UnitName Value="IdCoreDsnRegister"/>
</Item9>
</Files>
===
}
Expand Down Expand Up @@ -348,16 +348,16 @@ begin
Exit;
end;

MakeFPCPackage('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=System', 'indysystemfpc', OutputPath + '\Lib\System');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=System', 'indysystemlaz.lpk', OutputPath + '\Lib\System');
MakeFPCPackage('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=System', 'indysystemfpc', OutputPath + '\Lib\Source\System');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=System', 'indysystemlaz.lpk', OutputPath + '\Lib\Source\System');

MakeFPCPackage('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=Core', 'indycorefpc', OutputPath + '\Lib\Core');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=Core', 'indycorelaz.lpk', OutputPath + '\Lib\Core');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=True, Pkg=Core', 'dclindycorelaz.lpk', OutputPath + '\Lib\Core');
MakeFPCPackage('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=Core', 'indycorefpc', OutputPath + '\Lib\Source\Core');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=Core', 'indycorelaz.lpk', OutputPath + '\Lib\Source\Core');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=True, Pkg=Core', 'dclindycorelaz.lpk', OutputPath + '\Lib\Source\Core');

MakeFPCPackage('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=Protocols', 'indyprotocolsfpc', OutputPath + '\Lib\Protocols');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=Protocols', 'indyprotocolslaz.lpk', OutputPath + '\Lib\Protocols');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=True, Pkg=Protocols', 'dclindyprotocolslaz.lpk', OutputPath + '\Lib\Protocols');
MakeFPCPackage('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=Protocols', 'indyprotocolsfpc', OutputPath + '\Lib\Source\Protocols');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=False, Pkg=Protocols', 'indyprotocolslaz.lpk', OutputPath + '\Lib\Source\Protocols');
WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=True, Pkg=Protocols', 'dclindyprotocolslaz.lpk', OutputPath + '\Lib\Source\Protocols');

WriteLPK('FPC=True, FPCListInPkg=True, DesignUnit=True', 'indylaz.lpk', OutputPath + '\Lib');

Expand Down
Loading