i_embed.pas 7.7 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235
  1. {
  2. This unit implements support information structures for the FPC Embedded target
  3. Copyright (c) 1998-2006 by Peter Vreman
  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. unit i_embed;
  18. {$i fpcdefs.inc}
  19. interface
  20. uses
  21. systems;
  22. const
  23. system_arm_embedded_info : tsysteminfo =
  24. (
  25. system : system_arm_embedded;
  26. name : 'Embedded';
  27. shortname : 'embedded';
  28. flags : [tf_needs_symbol_size,tf_files_case_sensitive,
  29. tf_smartlink_sections];
  30. cpu : cpu_arm;
  31. unit_env : '';
  32. extradefines : '';
  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 : '.or';
  43. sharedlibext : '.so';
  44. staticlibext : '.a';
  45. staticlibprefix : 'libp';
  46. sharedlibprefix : 'lib';
  47. sharedClibext : '.so';
  48. staticClibext : '.a';
  49. staticClibprefix : 'lib';
  50. sharedClibprefix : 'lib';
  51. importlibprefix : 'libimp';
  52. importlibext : '.a';
  53. Cprefix : '';
  54. newline : #10;
  55. dirsep : '/';
  56. assem : as_gas;
  57. assemextern : as_gas;
  58. link : nil;
  59. linkextern : nil;
  60. ar : ar_gnu_ar;
  61. res : res_none;
  62. dbg : dbg_stabs;
  63. script : script_unix;
  64. endian : endian_little;
  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 : 4;
  75. localalignmax : 8;
  76. recordalignmin : 0;
  77. recordalignmax : 4;
  78. maxCrecordalign : 4
  79. );
  80. first_parm_offset : 8;
  81. stacksize : 262144;
  82. abi : abi_default
  83. );
  84. system_avr_embedded_info : tsysteminfo =
  85. (
  86. system : system_avr_embedded;
  87. name : 'Embedded';
  88. shortname : 'embedded';
  89. flags : [tf_needs_symbol_size,tf_files_case_sensitive
  90. ,tf_smartlink_sections];
  91. cpu : cpu_avr;
  92. unit_env : '';
  93. extradefines : '';
  94. exeext : '';
  95. defext : '.def';
  96. scriptext : '.sh';
  97. smartext : '.sl';
  98. unitext : '.ppu';
  99. unitlibext : '.ppl';
  100. asmext : '.s';
  101. objext : '.o';
  102. resext : '.res';
  103. resobjext : '.or';
  104. sharedlibext : '.so';
  105. staticlibext : '.a';
  106. staticlibprefix : 'libp';
  107. sharedlibprefix : 'lib';
  108. sharedClibext : '.so';
  109. staticClibext : '.a';
  110. staticClibprefix : 'lib';
  111. sharedClibprefix : 'lib';
  112. importlibprefix : 'libimp';
  113. importlibext : '.a';
  114. Cprefix : '';
  115. newline : #10;
  116. dirsep : '/';
  117. assem : as_gas;
  118. assemextern : as_gas;
  119. link : nil;
  120. linkextern : nil;
  121. ar : ar_gnu_ar;
  122. res : res_none;
  123. dbg : dbg_dwarf2;
  124. script : script_unix;
  125. endian : endian_little;
  126. alignment :
  127. (
  128. procalign : 4;
  129. loopalign : 4;
  130. jumpalign : 0;
  131. constalignmin : 0;
  132. constalignmax : 4;
  133. varalignmin : 0;
  134. varalignmax : 4;
  135. localalignmin : 4;
  136. localalignmax : 8;
  137. recordalignmin : 0;
  138. recordalignmax : 4;
  139. maxCrecordalign : 4
  140. );
  141. first_parm_offset : 0;
  142. stacksize : 1024;
  143. abi : abi_default
  144. );
  145. system_i386_embedded_info : tsysteminfo =
  146. (
  147. system : system_i386_embedded;
  148. name : 'Embedded';
  149. shortname : 'embedded';
  150. flags : [tf_needs_symbol_size,tf_files_case_sensitive
  151. ,tf_smartlink_sections];
  152. cpu : cpu_i386;
  153. unit_env : '';
  154. extradefines : '';
  155. exeext : '';
  156. defext : '.def';
  157. scriptext : '.sh';
  158. smartext : '.sl';
  159. unitext : '.ppu';
  160. unitlibext : '.ppl';
  161. asmext : '.s';
  162. objext : '.o';
  163. resext : '.res';
  164. resobjext : '.or';
  165. sharedlibext : '.so';
  166. staticlibext : '.a';
  167. staticlibprefix : 'libp';
  168. sharedlibprefix : 'lib';
  169. sharedClibext : '.so';
  170. staticClibext : '.a';
  171. staticClibprefix : 'lib';
  172. sharedClibprefix : 'lib';
  173. importlibprefix : 'libimp';
  174. importlibext : '.a';
  175. Cprefix : '';
  176. newline : #10;
  177. dirsep : '/';
  178. assem : as_i386_elf32;
  179. assemextern : as_gas;
  180. link : nil;
  181. linkextern : nil;
  182. ar : ar_gnu_ar;
  183. res : res_none;
  184. dbg : dbg_stabs;
  185. script : script_unix;
  186. endian : endian_little;
  187. alignment :
  188. (
  189. procalign : 16;
  190. loopalign : 4;
  191. jumpalign : 0;
  192. constalignmin : 0;
  193. constalignmax : 8;
  194. varalignmin : 0;
  195. varalignmax : 16;
  196. localalignmin : 4;
  197. localalignmax : 8;
  198. recordalignmin : 0;
  199. recordalignmax : 16;
  200. maxCrecordalign : 4
  201. );
  202. first_parm_offset : 8;
  203. stacksize : 4096;
  204. abi : abi_default
  205. );
  206. implementation
  207. initialization
  208. {$ifdef CPUARM}
  209. {$ifdef embedded}
  210. set_source_info(system_arm_embedded_info);
  211. {$endif embedded}
  212. {$endif CPUARM}
  213. {$ifdef CPUAVR}
  214. {$ifdef embedded}
  215. set_source_info(system_avr_embedded_info);
  216. {$endif embedded}
  217. {$endif CPUAVR}
  218. {$ifdef CPUI386}
  219. {$ifdef embedded}
  220. set_source_info(system_i386_embedded_info);
  221. {$endif embedded}
  222. {$endif CPUI386}
  223. end.