paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-08 10:48:12 +02:00
Code Issues Packages Projects Releases Wiki Activity

* use getpagesize function instead of reading external variables to restore

Browse Source 
ability to compile against SDKs < OS X 10.9 (mantis #36653)

git-svn-id: trunk@44396 -
This commit is contained in:
Jonas Maebe 2020-03-29 14:52:49 +00:00
parent 429b3744c4
commit c8307d4022
1 changed files with 4 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
rtl/darwin/sysmach.inc
View File

@ -64,18 +64,14 @@ const
var
mach_task_self_: mach_port_t; cvar; external;
vm_page_size: vm_size_t; cvar; external;
vm_kernel_page_size: vm_size_t; cvar; weakexternal; //__OSX_AVAILABLE_STARTING(__MAC_10_9, __IPHONE_7_0)
darwin_page_size: vm_size_t;
function getpagesize: longint; cdecl; external;
procedure darwin_init_page_size;
begin
if (@vm_kernel_page_size<>nil) and (vm_kernel_page_size>vm_page_size) then
darwin_page_size:=vm_kernel_page_size
else
darwin_page_size:=vm_page_size;
darwin_page_size:=getpagesize;
end;