i_amiga.pas 5.9 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171
  1. {
  2. Copyright (c) 1998-2002 by Peter Vreman
  3. This unit implements support information structures for AmigaOS
  4. This program is free software; you can redistribute it and/or modify
  5. it under the terms of the GNU General Public License as published by
  6. the Free Software Foundation; either version 2 of the License, or
  7. (at your option) any later version.
  8. This program is distributed in the hope that it will be useful,
  9. but WITHOUT ANY WARRANTY; without even the implied warranty of
  10. MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
  11. GNU General Public License for more details.
  12. You should have received a copy of the GNU General Public License
  13. along with this program; if not, write to the Free Software
  14. Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
  15. ****************************************************************************
  16. }
  17. { This unit implements support information structures for the AmigaOS. }
  18. unit i_amiga;
  19. {$i fpcdefs.inc}
  20. interface
  21. uses
  22. systems;
  23. const
  24. system_m68k_amiga_info : tsysteminfo =
  25. (
  26. system : system_m68k_Amiga;
  27. name : 'Commodore Amiga';
  28. shortname : 'amiga';
  29. flags : [tf_files_case_aware,tf_requires_proper_alignment,tf_has_winlike_resources,tf_smartlink_sections];
  30. cpu : cpu_m68k;
  31. unit_env : 'AMIGAUNITS';
  32. extradefines : 'HASAMIGA;AMIGA68K';
  33. exeext : '';
  34. defext : '.def';
  35. scriptext : '.sh';
  36. smartext : '.sl';
  37. unitext : '.ppu';
  38. unitlibext : '.ppl';
  39. asmext : '.s';
  40. objext : '.o';
  41. resext : '.res';
  42. resobjext : '.fpcres'; { Because 68k Amiga uses external resources for now }
  43. sharedlibext : '.library';
  44. staticlibext : '.a';
  45. staticlibprefix : 'libp';
  46. sharedlibprefix : '';
  47. sharedClibext : '.library';
  48. staticClibext : '.a';
  49. staticClibprefix : 'lib';
  50. sharedClibprefix : '';
  51. importlibprefix : 'libimp';
  52. importlibext : '.a';
  53. Cprefix : '';
  54. newline : #10;
  55. dirsep : '/';
  56. assem : as_m68k_as_aout;
  57. assemextern : as_m68k_as_aout;
  58. link : ld_none;
  59. linkextern : ld_amiga;
  60. ar : ar_gnu_ar;
  61. res : res_ext;
  62. dbg : dbg_stabs;
  63. script : script_amiga;
  64. endian : endian_big;
  65. alignment :
  66. (
  67. procalign : 4;
  68. loopalign : 4;
  69. jumpalign : 0;
  70. constalignmin : 0;
  71. constalignmax : 4;
  72. varalignmin : 0;
  73. varalignmax : 4;
  74. localalignmin : 0;
  75. localalignmax : 4;
  76. recordalignmin : 0;
  77. recordalignmax : 2;
  78. maxCrecordalign : 4
  79. );
  80. first_parm_offset : 8;
  81. stacksize : 262144;
  82. stackalign : 2;
  83. abi : abi_default;
  84. llvmdatalayout : 'todo';
  85. );
  86. system_powerpc_amiga_info : tsysteminfo =
  87. (
  88. system : system_powerpc_Amiga;
  89. name : 'AmigaOS for PowerPC';
  90. shortname : 'amiga';
  91. flags : [tf_files_case_aware,tf_requires_proper_alignment,tf_has_winlike_resources,tf_smartlink_sections];
  92. cpu : cpu_powerpc;
  93. unit_env : 'AMIGAUNITS';
  94. extradefines : 'PPC603;HASAMIGA;AMIGAOS4';
  95. exeext : '';
  96. defext : '.def';
  97. scriptext : '.sh';
  98. smartext : '.sl';
  99. unitext : '.ppu';
  100. unitlibext : '.ppl';
  101. asmext : '.s';
  102. objext : '.o';
  103. resext : '.res';
  104. resobjext : '.or';
  105. sharedlibext : '.library';
  106. staticlibext : '.a';
  107. staticlibprefix : 'libp';
  108. sharedlibprefix : '';
  109. sharedClibext : '.library';
  110. staticClibext : '.a';
  111. staticClibprefix : 'lib';
  112. sharedClibprefix : '';
  113. importlibprefix : 'libimp';
  114. importlibext : '.a';
  115. Cprefix : '';
  116. newline : #10;
  117. dirsep : '/';
  118. assem : as_gas;
  119. assemextern : as_gas;
  120. link : ld_none;
  121. linkextern : ld_amiga;
  122. ar : ar_gnu_ar;
  123. res : res_elf;
  124. dbg : dbg_stabs;
  125. script : script_amiga;
  126. endian : endian_big;
  127. alignment :
  128. (
  129. procalign : 4;
  130. loopalign : 4;
  131. jumpalign : 0;
  132. constalignmin : 0;
  133. constalignmax : 4;
  134. varalignmin : 0;
  135. varalignmax : 4;
  136. localalignmin : 0;
  137. localalignmax : 4;
  138. recordalignmin : 0;
  139. recordalignmax : 4;
  140. maxCrecordalign : 4
  141. );
  142. first_parm_offset : 8;
  143. stacksize : 262144;
  144. stackalign : 16;
  145. abi : abi_powerpc_sysv;
  146. 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-v128:128:128-n32';
  147. );
  148. implementation
  149. initialization
  150. {$ifdef CPU68}
  151. {$ifdef AMIGA}
  152. set_source_info(system_m68k_Amiga_info);
  153. {$endif AMIGA}
  154. {$endif CPU68}
  155. {$ifdef CPUPOWERPC}
  156. {$ifdef AMIGA}
  157. set_source_info(system_powerpc_Amiga_info);
  158. {$endif AMIGA}
  159. {$endif CPUPOWERPC}
  160. end.