123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680 |
- {
- Copyright (c) 1998-2008 by Peter Vreman
- This unit implements support information structures for Darwin
- (Mac OS X/OS X/macOS/iOS/iPhoneSimulator/...)
- This program is free software; you can redistribute it and/or modify
- it under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2 of the License, or
- (at your option) any later version.
- This program is distributed in the hope that it will be useful,
- but WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
- You should have received a copy of the GNU General Public License
- along with this program; if not, write to the Free Software
- Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
- ****************************************************************************
- }
- unit i_darwin;
- {$i fpcdefs.inc}
- interface
- uses
- systems;
- const
- res_macho_info : tresinfo =
- (
- id : res_macho;
- resbin : 'fpcres';
- rescmd : '-o $OBJ -a $ARCH -s $SUBARCH -of mach-o $DBG';
- rcbin : 'windres';
- rccmd : '--include $INC -O res -D FPC -o $RES $RC';
- resourcefileclass : nil;
- resflags : [];
- );
- res_macosx_ext_info : tresinfo =
- (
- id : res_ext;
- resbin : 'fpcres';
- rescmd : '-o $OBJ -a $ENDIAN -of external $DBG';
- rcbin : 'windres';
- rccmd : '--include $INC -O res -D FPC -o $RES $RC';
- resourcefileclass : nil;
- resflags : [res_external_file,res_arch_in_file_name];
- );
- system_powerpc_darwin_info : tsysteminfo =
- (
- system : system_powerpc_darwin;
- name : 'Darwin for PowerPC';
- shortname : 'Darwin';
- flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels,tf_pic_default,tf_has_winlike_resources];
- cpu : cpu_powerpc;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX';
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_darwin;
- assemextern : as_darwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_stabs;
- script : script_unix;
- endian : endian_big;
- alignment :
- (
- procalign : 16;
- loopalign : 4;
- jumpalign : 0;
- constalignmin : 0;
- constalignmax : 4;
- varalignmin : 0;
- varalignmax : 4;
- localalignmin : 0;
- localalignmax : 4;
- recordalignmin : 0;
- recordalignmax : 4;
- maxCrecordalign : 4
- );
- first_parm_offset : 24;
- stacksize : 262144;
- stackalign : 16;
- abi : abi_powerpc_darwin;
- llvmdatalayout : 'E-p:32:32:32-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:32:64-f32:32:32-f64:64:64-v128:128:128-n32';
- );
- system_i386_darwin_info : tsysteminfo =
- (
- system : system_i386_darwin;
- name : 'Darwin for i386';
- shortname : 'Darwin';
- flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels,tf_pic_uses_got,
- tf_pic_default,tf_has_winlike_resources,tf_use_hlcfi,tf_supports_symbolorderfile];
- cpu : cpu_i386;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX';
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_clang_asdarwin;
- assemextern : as_clang_asdarwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_dwarf2;
- script : script_unix;
- endian : endian_little;
- alignment :
- (
- procalign : 16;
- loopalign : 8;
- jumpalign : 16;
- constalignmin : 0;
- constalignmax : 16;
- varalignmin : 0;
- varalignmax : 16;
- localalignmin : 0;
- localalignmax : 8;
- recordalignmin : 0;
- recordalignmax : 16;
- maxCrecordalign : 16
- );
- first_parm_offset : 8;
- stacksize : 262144;
- stackalign : 16;
- abi : abi_i386_dynalignedstack;
- llvmdatalayout : 'e-p:32:32:32-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:32:64-f32:32:32-f64:32:64-v64:64:64-v128:128:128-a0:0:64-f80:128:128-n8:16:32-S128';
- );
- system_i386_iphonesim_info : tsysteminfo =
- (
- system : system_i386_iphonesim;
- name : 'Darwin/iPhoneSim for i386';
- shortname : 'iPhoneSim';
- flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels,
- tf_pic_uses_got,tf_pic_default,tf_has_winlike_resources,tf_use_hlcfi,tf_supports_symbolorderfile,tf_requires_proper_alignment];
- cpu : cpu_i386;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX;DARWIN'; // also define darwin for code compatibility
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_clang_asdarwin;
- assemextern : as_clang_asdarwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_dwarf2;
- script : script_unix;
- endian : endian_little;
- alignment :
- (
- procalign : 16;
- loopalign : 8;
- jumpalign : 16;
- constalignmin : 0;
- constalignmax : 16;
- varalignmin : 0;
- varalignmax : 16;
- localalignmin : 0;
- localalignmax : 16;
- recordalignmin : 0;
- recordalignmax : 16;
- maxCrecordalign : 16
- );
- first_parm_offset : 8;
- stacksize : 262144;
- stackalign : 16;
- abi : abi_i386_dynalignedstack;
- llvmdatalayout : 'e-p:32:32:32-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:32:64-f32:32:32-f64:32:64-v64:64:64-v128:128:128-a0:0:64-f80:128:128-n8:16:32-S128';
- );
- system_powerpc64_darwin_info : tsysteminfo =
- (
- system : system_powerpc64_darwin;
- name : 'Darwin for PowerPC64';
- shortname : 'Darwin';
- flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels,
- tf_pic_default,tf_has_winlike_resources];
- cpu : cpu_powerpc64;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX';
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_darwin;
- assemextern : as_darwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_dwarf2;
- script : script_unix;
- endian : endian_big;
- alignment :
- (
- procalign : 16;
- loopalign : 4;
- jumpalign : 0;
- constalignmin : 4;
- constalignmax : 8;
- varalignmin : 4;
- varalignmax : 8;
- localalignmin : 4;
- localalignmax : 8;
- recordalignmin : 0;
- recordalignmax : 8;
- maxCrecordalign : 4
- );
- first_parm_offset : 48;
- stacksize : 262144;
- stackalign : 16;
- abi : abi_powerpc_darwin;
- llvmdatalayout : 'E-p:64:64:64-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f32:32:32-f64:64:64-v128:128:128-n32:64';
- );
- system_x86_64_darwin_info : tsysteminfo =
- (
- system : system_x86_64_darwin;
- name : 'Darwin for x86_64';
- shortname : 'Darwin';
- flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels,tf_pic_default,tf_has_winlike_resources,tf_use_hlcfi
- {$ifdef llvm},tf_use_psabieh{$endif},tf_supports_symbolorderfile];
- cpu : cpu_x86_64;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX';
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_clang_asdarwin;
- assemextern : as_clang_asdarwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_dwarf2;
- script : script_unix;
- endian : endian_little;
- alignment :
- (
- procalign : 16;
- loopalign : 8;
- jumpalign : 16;
- constalignmin : 0;
- constalignmax : 16;
- varalignmin : 0;
- varalignmax : 16;
- localalignmin : 4;
- localalignmax : 16;
- recordalignmin : 0;
- recordalignmax : 16;
- maxCrecordalign : 16
- );
- first_parm_offset : 16;
- stacksize : 262144;
- stackalign : 16;
- abi : abi_default;
- llvmdatalayout : 'e-p:64:64:64-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f32:32:32-f64:64:64-v64:64:64-v128:128:128-a0:0:64-s0:64:64-f80:128:128-n8:16:32:64-S128';
- );
- system_x86_64_iphonesim_info : tsysteminfo =
- (
- system : system_x86_64_iphonesim;
- name : 'Darwin/iPhoneSim for x86_64';
- shortname : 'iPhoneSim';
- flags : [tf_p_ext_support,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,tf_dwarf_only_local_labels,
- tf_pic_default,tf_has_winlike_resources,tf_use_hlcfi,tf_supports_symbolorderfile,tf_requires_proper_alignment];
- cpu : cpu_x86_64;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX;DARWIN'; // also define darwin for code compatibility
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_clang_asdarwin;
- assemextern : as_clang_asdarwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_dwarf2;
- script : script_unix;
- endian : endian_little;
- alignment :
- (
- procalign : 16;
- loopalign : 8;
- jumpalign : 16;
- constalignmin : 0;
- constalignmax : 16;
- varalignmin : 0;
- varalignmax : 16;
- localalignmin : 4;
- localalignmax : 16;
- recordalignmin : 0;
- recordalignmax : 16;
- maxCrecordalign : 16
- );
- first_parm_offset : 16;
- stacksize : 262144;
- stackalign : 16;
- abi : abi_default;
- llvmdatalayout : 'e-p:64:64:64-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f32:32:32-f64:64:64-v64:64:64-v128:128:128-a0:0:64-s0:64:64-f80:128:128-n8:16:32:64-S128';
- );
- system_arm_ios_info : tsysteminfo =
- (
- system : system_arm_ios;
- name : 'iOS for ARM';
- shortname : 'iOS';
- flags : [tf_p_ext_support,tf_requires_proper_alignment,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,
- tf_dwarf_only_local_labels,tf_has_winlike_resources,tf_pic_default,tf_supports_symbolorderfile];
- cpu : cpu_arm;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX;CPUARMEL;DARWIN';
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_clang_asdarwin;
- assemextern : as_clang_asdarwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_dwarf2;
- script : script_unix;
- endian : endian_little;
- alignment :
- (
- procalign : 16;
- loopalign : 4;
- jumpalign : 0;
- constalignmin : 0;
- constalignmax : 8;
- varalignmin : 0;
- varalignmax : 8;
- localalignmin : 4;
- localalignmax : 8;
- recordalignmin : 0;
- recordalignmax : 8;
- maxCrecordalign : 8
- );
- first_parm_offset : 8;
- stacksize : 262144;
- stackalign : 4;
- abi : abi_default;
- { note: default LLVM stack alignment is 8 bytes for this target }
- llvmdatalayout : 'e-p:32:32:32-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f32:32:32-f64:64:64-v64:64:64-v128:64:128-a0:0:64-n32-S32';
- );
- system_aarch64_ios_info : tsysteminfo =
- (
- system : system_aarch64_ios;
- name : 'iOS for AArch64';
- shortname : 'iOS';
- flags : [tf_p_ext_support,tf_requires_proper_alignment,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,
- tf_dwarf_only_local_labels,tf_pic_default,tf_has_winlike_resources,tf_supports_symbolorderfile];
- cpu : cpu_aarch64;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX;DARWIN';
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_clang_asdarwin;
- assemextern : as_clang_asdarwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_dwarf2;
- script : script_unix;
- endian : endian_little;
- alignment :
- (
- procalign : 16;
- loopalign : 4;
- jumpalign : 0;
- constalignmin : 0;
- constalignmax : 16;
- varalignmin : 0;
- varalignmax : 16;
- localalignmin : 4;
- localalignmax : 16;
- recordalignmin : 0;
- recordalignmax : 16;
- maxCrecordalign : 16
- );
- first_parm_offset : 16;
- stacksize : 8*1024*1024;
- stackalign : 16;
- abi : abi_aarch64_darwin;
- llvmdatalayout : 'e-p:64:64:64-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f32:32:32-f64:64:64-v64:64:64-v128:128:128-a0:0:64-n32:64-S128'
- );
- system_aarch64_darwin_info : tsysteminfo =
- (
- system : system_aarch64_darwin;
- name : 'Darwin for AArch64';
- shortname : 'Darwin';
- flags : [tf_p_ext_support,tf_requires_proper_alignment,tf_files_case_sensitive,tf_smartlink_sections,tf_dwarf_relative_addresses,
- tf_dwarf_only_local_labels,tf_pic_default,tf_has_winlike_resources,tf_supports_symbolorderfile
- {$ifdef llvm},tf_use_psabieh{$endif}];
- cpu : cpu_aarch64;
- unit_env : 'BSDUNITS';
- extradefines : 'UNIX;BSD;HASUNIX';
- exeext : '';
- defext : '.def';
- scriptext : '.sh';
- smartext : '.sl';
- unitext : '.ppu';
- unitlibext : '.ppl';
- asmext : '.s';
- objext : '.o';
- resext : '.res';
- resobjext : '.or';
- sharedlibext : '.dylib';
- staticlibext : '.a';
- staticlibprefix : 'libp';
- sharedlibprefix : 'lib';
- sharedClibext : '.dylib';
- staticClibext : '.a';
- staticClibprefix : 'lib';
- sharedClibprefix : 'lib';
- importlibprefix : 'libimp';
- importlibext : '.a';
- Cprefix : '_';
- newline : #10;
- dirsep : '/';
- assem : as_clang_asdarwin;
- assemextern : as_clang_asdarwin;
- link : ld_none;
- linkextern : ld_darwin;
- ar : ar_gnu_ar;
- res : res_macho;
- dbg : dbg_dwarf2;
- script : script_unix;
- endian : endian_little;
- alignment :
- (
- procalign : 16;
- loopalign : 4;
- jumpalign : 0;
- constalignmin : 0;
- constalignmax : 16;
- varalignmin : 0;
- varalignmax : 16;
- localalignmin : 4;
- localalignmax : 16;
- recordalignmin : 0;
- recordalignmax : 16;
- maxCrecordalign : 16
- );
- first_parm_offset : 16;
- stacksize : 8*1024*1024;
- stackalign : 16;
- abi : abi_aarch64_darwin;
- llvmdatalayout : 'e-p:64:64:64-i1:8:8-i8:8:8-i16:16:16-i32:32:32-i64:64:64-f32:32:32-f64:64:64-v64:64:64-v128:128:128-a0:0:64-n32:64-S128'
- );
- implementation
- initialization
- {$ifdef cpui386}
- {$ifdef Darwin}
- set_source_info(system_i386_Darwin_info);
- {$endif Darwin}
- {$endif cpui386}
- {$ifdef cpux86_64}
- {$ifdef Darwin}
- set_source_info(system_x86_64_darwin_info);
- {$endif}
- {$endif cpux86_64}
- {$ifdef cpupowerpc32}
- {$ifdef Darwin}
- set_source_info(system_powerpc_darwin_info);
- {$endif Darwin}
- {$endif cpupowerpc32}
- {$ifdef cpupowerpc64}
- {$ifdef Darwin}
- set_source_info(system_powerpc64_darwin_info);
- {$endif Darwin}
- {$endif powerpc64}
- {$ifdef cpuarm}
- {$ifdef Darwin}
- set_source_info(system_arm_ios_info);
- {$endif Darwin}
- {$endif cpuarm}
- {$ifdef cpuaarch64}
- {$ifdef Darwin}
- {$ifdef ios}
- set_source_info(system_aarch64_ios_info);
- {$else}
- set_source_info(system_aarch64_darwin_info);
- {$endif}
- {$endif Darwin}
- {$endif cpuaarch64}
- end.
|