paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-11-04 09:39:32 +01:00
Code Issues Packages Projects Releases Wiki Activity

* made dblib/fpmake.pp to use the same structure as other fpmake files => avoids hint on unused variable during make all

Browse Source
This commit is contained in:
florian 2024-11-09 14:34:24 +01:00
parent dad75d4472
commit 12f0ccbb01
2 changed files with 10 additions and 17 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

21
packages/dblib/fpmake.pp
View File

@ -4,20 +4,13 @@ program fpmake;
uses {$ifdef unix}cthreads,{$endif} fpmkunit;
{$endif not ALLPACKAGES}
procedure add_dblib(const ADirectory: string);
Const
DBLibOSes = [linux,freebsd,netbsd,openbsd,solaris,win32,win64,haiku,android,dragonfly,beos];
Var
P : TPackage;
T : TTarget;
begin
With Installer do
begin
{$endif ALLPACKAGES}
P:=AddPackage('dblib');
P.ShortName := 'dblb';
P.Directory:=ADirectory;
@ -32,20 +25,16 @@ begin
P.SourcePath.Add('src');
P.IncludePath.Add('src');
P.OSes := DBLibOSes;
P.OSes := [linux,freebsd,netbsd,openbsd,solaris,win32,win64,haiku,android,dragonfly,beos];
if Defaults.CPU=jvm then
P.OSes := P.OSes - [android];
T:=P.Targets.AddUnit('dblib.pp',DBLibOSes);
T:=P.Targets.AddUnit('dblib.pp',P.OSes);
P.NamespaceMap:='namespaces.lst';
end;
end;
{$ifndef ALLPACKAGES}
begin
add_dblib('');
Installer.Run;
Run;
end;
end.
{$endif ALLPACKAGES}

4
packages/fpmake_proc.inc
View File

@ -64,7 +64,11 @@ begin
{$include cocoaint/fpmake.pp}
end;
procedure add_dblib(const ADirectory: string);
begin
with Installer do
{$include dblib/fpmake.pp}
end;
procedure add_dbus(const ADirectory: string);
begin