paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-05 15:47:54 +02:00
Code Issues Packages Projects Releases Wiki Activity

Add dummy version for symbian

Browse Source
This commit is contained in:
Pierre Muller 2023-05-22 09:11:41 +00:00
parent b11d526fdf
commit 13368fbb8a
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
rtl/arm/cpu.pp
View File

@ -16,6 +16,10 @@
{$mode objfpc}
unit cpu;
{$ifdef symbian}
{$define NO_ELF_SUPPORT}
{$endif}
interface
function VFPv4Support : Boolean;
@ -57,6 +61,7 @@ unit cpu;
auxv: PElf32AuxiliaryVector;
begin
psysinfo := 0;
{$ifndef NO_ELF_SUPPORT}
ep := envp;
while ep^ <> nil do
Inc(ep);
@ -75,6 +80,7 @@ unit cpu;
end;
Inc(auxv);
end;
{$endif ndef NO_ELF_SUPPORT}
end;