i_linux.pas 24 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575576577578579580581582583584585586587588589590591592593594595596597598599600601602603604605606607608609610611612613614615616617618619620621622623624625626627628629630631632633634635636637638639640641642643644645646647648649650651652653654655656657658659660661662663664665666667668669670671672673674675676677678679680681682683
  1. {
  2. Copyright (c) 1998-2008 by Peter Vreman
  3. This unit implements support information structures for linux
  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 linux. }
  18. unit i_linux;
  19. interface
  20. uses
  21. systems, rescmn;
  22. const
  23. system_i386_linux_info : tsysteminfo =
  24. (
  25. system : system_i386_LINUX;
  26. name : 'Linux for i386';
  27. shortname : 'Linux';
  28. flags : [tf_needs_symbol_size,tf_pic_uses_got{,tf_smartlink_sections}{,tf_winlikewidestring},
  29. {$ifdef segment_threadvars}
  30. tf_section_threadvars,
  31. {$endif segment_threadvars}
  32. tf_needs_symbol_type,tf_files_case_sensitive,tf_use_function_relative_addresses,
  33. tf_smartlink_library,tf_needs_dwarf_cfi,tf_has_winlike_resources];
  34. cpu : cpu_i386;
  35. unit_env : 'LINUXUNITS';
  36. extradefines : 'UNIX;HASUNIX';
  37. exeext : '';
  38. defext : '.def';
  39. scriptext : '.sh';
  40. smartext : '.sl';
  41. unitext : '.ppu';
  42. unitlibext : '.ppl';
  43. asmext : '.s';
  44. objext : '.o';
  45. resext : '.res';
  46. resobjext : '.or';
  47. sharedlibext : '.so';
  48. staticlibext : '.a';
  49. staticlibprefix : 'libp';
  50. sharedlibprefix : 'lib';
  51. sharedClibext : '.so';
  52. staticClibext : '.a';
  53. staticClibprefix : 'lib';
  54. sharedClibprefix : 'lib';
  55. Cprefix : '';
  56. newline : #10;
  57. dirsep : '/';
  58. assem : as_i386_elf32;
  59. assemextern : as_gas;
  60. link : nil;
  61. linkextern : nil;
  62. ar : ar_gnu_ar;
  63. res : res_elf;
  64. dbg : dbg_stabs;
  65. script : script_unix;
  66. endian : endian_little;
  67. alignment :
  68. (
  69. procalign : 16;
  70. loopalign : 4;
  71. jumpalign : 0;
  72. constalignmin : 0;
  73. constalignmax : 8;
  74. varalignmin : 0;
  75. varalignmax : 16;
  76. localalignmin : 4;
  77. localalignmax : 8;
  78. recordalignmin : 0;
  79. recordalignmax : 16;
  80. maxCrecordalign : 4
  81. );
  82. first_parm_offset : 8;
  83. stacksize : 262144;
  84. abi : abi_default
  85. );
  86. system_x86_6432_linux_info : tsysteminfo =
  87. (
  88. system : system_x86_6432_LINUX;
  89. name : 'Linux for x64_6432';
  90. shortname : 'Linux6432';
  91. flags : [tf_needs_symbol_size,tf_needs_symbol_type,tf_files_case_sensitive,tf_use_function_relative_addresses,tf_pic_uses_got{,tf_smartlink_sections},tf_smartlink_library,tf_has_winlike_resources];
  92. cpu : cpu_x86_64;
  93. unit_env : 'LINUXUNITS';
  94. extradefines : 'UNIX;HASUNIX';
  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 : '.so';
  106. staticlibext : '.a';
  107. staticlibprefix : 'libp';
  108. sharedlibprefix : 'lib';
  109. sharedClibext : '.so';
  110. staticClibext : '.a';
  111. staticClibprefix : 'lib';
  112. sharedClibprefix : 'lib';
  113. Cprefix : '';
  114. newline : #10;
  115. dirsep : '/';
  116. assem : as_i386_elf32;
  117. assemextern : as_gas;
  118. link : nil;
  119. linkextern : nil;
  120. ar : ar_gnu_ar;
  121. res : res_elf;
  122. dbg : dbg_stabs;
  123. script : script_unix;
  124. endian : endian_little;
  125. alignment :
  126. (
  127. procalign : 16;
  128. loopalign : 4;
  129. jumpalign : 0;
  130. constalignmin : 0;
  131. constalignmax : 16;
  132. varalignmin : 0;
  133. varalignmax : 16;
  134. localalignmin : 4;
  135. localalignmax : 8;
  136. recordalignmin : 0;
  137. recordalignmax : 16;
  138. maxCrecordalign : 4
  139. );
  140. first_parm_offset : 8;
  141. stacksize : 262144;
  142. abi : abi_default
  143. );
  144. system_m68k_linux_info : tsysteminfo =
  145. (
  146. system : system_m68k_linux;
  147. name : 'Linux for m68k';
  148. shortname : 'Linux';
  149. flags : [tf_needs_symbol_size,tf_needs_symbol_type,tf_files_case_sensitive,tf_use_function_relative_addresses,
  150. tf_smartlink_library,tf_has_winlike_resources];
  151. cpu : cpu_m68k;
  152. unit_env : 'LINUXUNITS';
  153. extradefines : 'UNIX;HASUNIX';
  154. exeext : '';
  155. defext : '';
  156. scriptext : '.sh';
  157. smartext : '.sl';
  158. unitext : '.ppu';
  159. unitlibext : '.ppl';
  160. asmext : '.s';
  161. objext : '.o';
  162. resext : '.res';
  163. resobjext : '.or';
  164. sharedlibext : '.so';
  165. staticlibext : '.a';
  166. staticlibprefix : 'libp';
  167. sharedlibprefix : 'lib';
  168. sharedClibext : '.so';
  169. staticClibext : '.a';
  170. staticClibprefix : 'lib';
  171. sharedClibprefix : 'lib';
  172. Cprefix : '';
  173. newline : #10;
  174. dirsep : '/';
  175. assem : as_gas;
  176. assemextern : as_gas;
  177. link : nil;
  178. linkextern : nil;
  179. ar : ar_gnu_ar;
  180. res : res_elf;
  181. dbg : dbg_stabs;
  182. script : script_unix;
  183. endian : endian_big;
  184. alignment :
  185. (
  186. procalign : 4;
  187. loopalign : 4;
  188. jumpalign : 0;
  189. constalignmin : 0;
  190. constalignmax : 4;
  191. varalignmin : 0;
  192. varalignmax : 4;
  193. localalignmin : 4;
  194. localalignmax : 4;
  195. recordalignmin : 0;
  196. recordalignmax : 2;
  197. maxCrecordalign : 4
  198. );
  199. first_parm_offset : 8;
  200. stacksize : 32*1024*1024;
  201. abi : abi_default
  202. );
  203. system_powerpc_linux_info : tsysteminfo =
  204. (
  205. system : system_powerpc_LINUX;
  206. name : 'Linux for PowerPC';
  207. shortname : 'Linux';
  208. flags : [tf_needs_symbol_size,tf_needs_symbol_type,tf_files_case_sensitive,tf_use_function_relative_addresses,
  209. tf_smartlink_library,tf_has_winlike_resources];
  210. cpu : cpu_powerpc;
  211. unit_env : '';
  212. extradefines : 'UNIX;HASUNIX';
  213. exeext : '';
  214. defext : '.def';
  215. scriptext : '.sh';
  216. smartext : '.sl';
  217. unitext : '.ppu';
  218. unitlibext : '.ppl';
  219. asmext : '.s';
  220. objext : '.o';
  221. resext : '.res';
  222. resobjext : '.or';
  223. sharedlibext : '.so';
  224. staticlibext : '.a';
  225. staticlibprefix : 'libp';
  226. sharedlibprefix : 'lib';
  227. sharedClibext : '.so';
  228. staticClibext : '.a';
  229. staticClibprefix : 'lib';
  230. sharedClibprefix : 'lib';
  231. Cprefix : '';
  232. newline : #10;
  233. dirsep : '/';
  234. assem : as_gas;
  235. assemextern : as_gas;
  236. link : nil;
  237. linkextern : nil;
  238. ar : ar_gnu_ar;
  239. res : res_elf;
  240. dbg : dbg_stabs;
  241. script : script_unix;
  242. endian : endian_big;
  243. alignment :
  244. (
  245. procalign : 4;
  246. loopalign : 4;
  247. jumpalign : 0;
  248. constalignmin : 0;
  249. constalignmax : 4;
  250. varalignmin : 0;
  251. varalignmax : 4;
  252. localalignmin : 4;
  253. localalignmax : 4;
  254. recordalignmin : 0;
  255. recordalignmax : 4;
  256. maxCrecordalign : 8
  257. );
  258. first_parm_offset : 8;
  259. stacksize : 32*1024*1024;
  260. abi : abi_powerpc_sysv;
  261. );
  262. system_powerpc64_linux_info : tsysteminfo =
  263. (
  264. system : system_powerpc64_LINUX;
  265. name : 'Linux for PowerPC64';
  266. shortname : 'Linux';
  267. flags : [tf_needs_symbol_size,tf_needs_symbol_type,tf_files_case_sensitive,tf_use_function_relative_addresses,
  268. tf_requires_proper_alignment,tf_smartlink_library,tf_has_winlike_resources];
  269. cpu : cpu_powerpc64;
  270. unit_env : '';
  271. extradefines : 'UNIX;HASUNIX';
  272. exeext : '';
  273. defext : '.def';
  274. scriptext : '.sh';
  275. smartext : '.sl';
  276. unitext : '.ppu';
  277. unitlibext : '.ppl';
  278. asmext : '.s';
  279. objext : '.o';
  280. resext : '.res';
  281. resobjext : '.or';
  282. sharedlibext : '.so';
  283. staticlibext : '.a';
  284. staticlibprefix : 'libp';
  285. sharedlibprefix : 'lib';
  286. sharedClibext : '.so';
  287. staticClibext : '.a';
  288. staticClibprefix : 'lib';
  289. sharedClibprefix : 'lib';
  290. Cprefix : '';
  291. newline : #10;
  292. dirsep : '/';
  293. assem : as_gas;
  294. assemextern : as_gas;
  295. link : nil;
  296. linkextern : nil;
  297. ar : ar_gnu_ar;
  298. res : res_elf;
  299. dbg : dbg_dwarf2;
  300. script : script_unix;
  301. endian : endian_big;
  302. alignment :
  303. (
  304. procalign : 8;
  305. loopalign : 4;
  306. jumpalign : 0;
  307. constalignmin : 4;
  308. constalignmax : 16;
  309. varalignmin : 4;
  310. varalignmax : 16;
  311. localalignmin : 0;
  312. localalignmax : 16;
  313. recordalignmin : 0;
  314. recordalignmax : 16;
  315. maxCrecordalign : 16
  316. );
  317. first_parm_offset : 8;
  318. stacksize : 10*1024*1024;
  319. abi : abi_powerpc_sysv
  320. );
  321. system_alpha_linux_info : tsysteminfo =
  322. (
  323. system : system_alpha_LINUX;
  324. name : 'Linux for Alpha';
  325. shortname : 'Linux';
  326. flags : [tf_needs_symbol_size,tf_needs_symbol_type,tf_files_case_sensitive,
  327. tf_use_function_relative_addresses,tf_smartlink_library,tf_has_winlike_resources];
  328. cpu : cpu_alpha;
  329. unit_env : 'LINUXUNITS';
  330. extradefines : 'UNIX;HASUNIX';
  331. exeext : '';
  332. defext : '.def';
  333. scriptext : '.sh';
  334. smartext : '.sl';
  335. unitext : '.ppu';
  336. unitlibext : '.ppl';
  337. asmext : '.s';
  338. objext : '.o';
  339. resext : '.res';
  340. resobjext : '.or';
  341. sharedlibext : '.so';
  342. staticlibext : '.a';
  343. staticlibprefix : 'libp';
  344. sharedlibprefix : 'lib';
  345. sharedClibext : '.so';
  346. staticClibext : '.a';
  347. staticClibprefix : 'lib';
  348. sharedClibprefix : 'lib';
  349. Cprefix : '';
  350. newline : #10;
  351. dirsep : '/';
  352. assem : as_gas;
  353. assemextern : as_gas;
  354. link : nil;
  355. linkextern : nil;
  356. ar : ar_gnu_ar;
  357. res : res_elf;
  358. dbg : dbg_stabs;
  359. script : script_unix;
  360. endian : endian_little;
  361. alignment :
  362. (
  363. procalign : 4;
  364. loopalign : 4;
  365. jumpalign : 0;
  366. constalignmin : 0;
  367. constalignmax : 4;
  368. varalignmin : 0;
  369. varalignmax : 4;
  370. localalignmin : 4;
  371. localalignmax : 4;
  372. recordalignmin : 0;
  373. recordalignmax : 2;
  374. maxCrecordalign : 4
  375. );
  376. first_parm_offset : 8;
  377. stacksize : 32*1024*1024;
  378. abi : abi_default
  379. );
  380. system_x86_64_linux_info : tsysteminfo =
  381. (
  382. system : system_x86_64_LINUX;
  383. name : 'Linux for x86-64';
  384. shortname : 'Linux';
  385. flags : [tf_needs_symbol_size,tf_needs_dwarf_cfi,tf_smartlink_library,
  386. tf_library_needs_pic,tf_needs_symbol_type,tf_files_case_sensitive,tf_use_function_relative_addresses,tf_has_winlike_resources];
  387. cpu : cpu_x86_64;
  388. unit_env : 'LINUXUNITS';
  389. extradefines : 'UNIX;HASUNIX';
  390. exeext : '';
  391. defext : '.def';
  392. scriptext : '.sh';
  393. smartext : '.sl';
  394. unitext : '.ppu';
  395. unitlibext : '.ppl';
  396. asmext : '.s';
  397. objext : '.o';
  398. resext : '.res';
  399. resobjext : '.or';
  400. sharedlibext : '.so';
  401. staticlibext : '.a';
  402. staticlibprefix : 'libp';
  403. sharedlibprefix : 'lib';
  404. sharedClibext : '.so';
  405. staticClibext : '.a';
  406. staticClibprefix : 'lib';
  407. sharedClibprefix : 'lib';
  408. Cprefix : '';
  409. newline : #10;
  410. dirsep : '/';
  411. assem : as_x86_64_elf64;
  412. assemextern : as_gas;
  413. link : nil;
  414. linkextern : nil;
  415. ar : ar_gnu_ar;
  416. res : res_elf;
  417. dbg : dbg_dwarf2;
  418. script : script_unix;
  419. endian : endian_little;
  420. alignment :
  421. (
  422. procalign : 8;
  423. loopalign : 4;
  424. jumpalign : 0;
  425. constalignmin : 0;
  426. constalignmax : 8;
  427. varalignmin : 0;
  428. varalignmax : 16;
  429. localalignmin : 4;
  430. localalignmax : 16;
  431. recordalignmin : 0;
  432. recordalignmax : 16;
  433. maxCrecordalign : 8
  434. );
  435. first_parm_offset : 16;
  436. stacksize : 256*1024;
  437. abi : abi_default
  438. );
  439. system_sparc_linux_info : tsysteminfo =
  440. (
  441. system : system_SPARC_Linux;
  442. name : 'Linux for SPARC';
  443. shortname : 'Linux';
  444. flags : [tf_needs_symbol_size,tf_library_needs_pic,tf_smartlink_sections,
  445. tf_needs_symbol_type,tf_files_case_sensitive,tf_smartlink_library,
  446. tf_use_function_relative_addresses,tf_requires_proper_alignment,
  447. tf_has_winlike_resources];
  448. cpu : cpu_SPARC;
  449. unit_env : 'LINUXUNITS';
  450. extradefines : 'UNIX;HASUNIX';
  451. exeext : '';
  452. defext : '.def';
  453. scriptext : '.sh';
  454. smartext : '.sl';
  455. unitext : '.ppu';
  456. unitlibext : '.ppl';
  457. asmext : '.s';
  458. objext : '.o';
  459. resext : '.res';
  460. resobjext : '.or';
  461. sharedlibext : '.so';
  462. staticlibext : '.a';
  463. staticlibprefix : 'libp';
  464. sharedlibprefix : 'lib';
  465. sharedClibext : '.so';
  466. staticClibext : '.a';
  467. staticClibprefix : 'lib';
  468. sharedClibprefix : 'lib';
  469. Cprefix : '';
  470. newline : #10;
  471. dirsep : '/';
  472. assem : as_gas;
  473. assemextern : as_gas;
  474. link : nil;
  475. linkextern : nil;
  476. ar : ar_gnu_ar;
  477. res : res_elf;
  478. dbg : dbg_stabs;
  479. script : script_unix;
  480. endian : endian_big;
  481. alignment :
  482. (
  483. procalign : 4;
  484. loopalign : 4;
  485. jumpalign : 0;
  486. constalignmin : 4;
  487. constalignmax : 8;
  488. varalignmin : 4;
  489. varalignmax : 8;
  490. localalignmin : 4;
  491. localalignmax : 8;
  492. recordalignmin : 0;
  493. recordalignmax : 8;
  494. maxCrecordalign : 8
  495. );
  496. first_parm_offset : 92;
  497. stacksize : 262144;
  498. abi : abi_default
  499. );
  500. {$ifdef FPC_ARMEL}
  501. system_arm_linux_info : tsysteminfo =
  502. (
  503. system : system_arm_Linux;
  504. name : 'Linux for ARMEL';
  505. shortname : 'Linux';
  506. flags : [tf_needs_symbol_size,tf_needs_symbol_type,tf_files_case_sensitive,
  507. tf_use_function_relative_addresses,tf_requires_proper_alignment,tf_smartlink_sections,tf_smartlink_library,tf_has_winlike_resources];
  508. cpu : cpu_arm;
  509. unit_env : 'LINUXUNITS';
  510. extradefines : 'UNIX;HASUNIX;CPUARMEL';
  511. exeext : '';
  512. defext : '.def';
  513. scriptext : '.sh';
  514. smartext : '.sl';
  515. unitext : '.ppu';
  516. unitlibext : '.ppl';
  517. asmext : '.s';
  518. objext : '.o';
  519. resext : '.res';
  520. resobjext : '.or';
  521. sharedlibext : '.so';
  522. staticlibext : '.a';
  523. staticlibprefix : 'libp';
  524. sharedlibprefix : 'lib';
  525. sharedClibext : '.so';
  526. staticClibext : '.a';
  527. staticClibprefix : 'lib';
  528. sharedClibprefix : 'lib';
  529. Cprefix : '';
  530. newline : #10;
  531. dirsep : '/';
  532. assem : as_gas;
  533. assemextern : as_gas;
  534. link : nil;
  535. linkextern : nil;
  536. ar : ar_gnu_ar;
  537. res : res_elf;
  538. dbg : dbg_stabs;
  539. script : script_unix;
  540. endian : endian_little;
  541. alignment :
  542. (
  543. procalign : 4;
  544. loopalign : 4;
  545. jumpalign : 0;
  546. constalignmin : 0;
  547. constalignmax : 8;
  548. varalignmin : 0;
  549. varalignmax : 8;
  550. localalignmin : 4;
  551. localalignmax : 8;
  552. recordalignmin : 0;
  553. recordalignmax : 8;
  554. maxCrecordalign : 8
  555. );
  556. first_parm_offset : 8;
  557. stacksize : 262144;
  558. abi : abi_eabi
  559. );
  560. {$else FPC_ARMEL}
  561. system_arm_linux_info : tsysteminfo =
  562. (
  563. system : system_arm_Linux;
  564. name : 'Linux for ARM';
  565. shortname : 'Linux';
  566. flags : [tf_needs_symbol_size,tf_needs_symbol_type,tf_files_case_sensitive,
  567. tf_use_function_relative_addresses,tf_requires_proper_alignment,tf_smartlink_sections,tf_smartlink_library,tf_has_winlike_resources];
  568. cpu : cpu_arm;
  569. unit_env : 'LINUXUNITS';
  570. extradefines : 'UNIX;HASUNIX';
  571. exeext : '';
  572. defext : '.def';
  573. scriptext : '.sh';
  574. smartext : '.sl';
  575. unitext : '.ppu';
  576. unitlibext : '.ppl';
  577. asmext : '.s';
  578. objext : '.o';
  579. resext : '.res';
  580. resobjext : '.or';
  581. sharedlibext : '.so';
  582. staticlibext : '.a';
  583. staticlibprefix : 'libp';
  584. sharedlibprefix : 'lib';
  585. sharedClibext : '.so';
  586. staticClibext : '.a';
  587. staticClibprefix : 'lib';
  588. sharedClibprefix : 'lib';
  589. Cprefix : '';
  590. newline : #10;
  591. dirsep : '/';
  592. assem : as_gas;
  593. assemextern : as_gas;
  594. link : nil;
  595. linkextern : nil;
  596. ar : ar_gnu_ar;
  597. res : res_elf;
  598. dbg : dbg_stabs;
  599. script : script_unix;
  600. endian : endian_little;
  601. alignment :
  602. (
  603. procalign : 4;
  604. loopalign : 4;
  605. jumpalign : 0;
  606. constalignmin : 0;
  607. constalignmax : 4;
  608. varalignmin : 0;
  609. varalignmax : 4;
  610. localalignmin : 4;
  611. localalignmax : 8;
  612. recordalignmin : 0;
  613. recordalignmax : 4;
  614. maxCrecordalign : 4
  615. );
  616. first_parm_offset : 8;
  617. stacksize : 262144;
  618. abi : abi_default
  619. );
  620. {$endif FPC_ARMEL}
  621. implementation
  622. initialization
  623. {$ifdef CPU86}
  624. {$ifdef linux}
  625. { some FreeBSD versions define linux as well }
  626. {$ifndef FreeBSD}
  627. set_source_info(system_i386_linux_info);
  628. {$endif FreeBSD}
  629. {$endif}
  630. {$endif CPU86}
  631. {$ifdef CPU68}
  632. {$ifdef linux}
  633. set_source_info(system_m68k_linux_info);
  634. {$endif linux}
  635. {$endif CPU68}
  636. {$ifdef CPUX86_64}
  637. {$ifdef linux}
  638. set_source_info(system_x86_64_linux_info);
  639. {$endif linux}
  640. {$endif CPUX86_64}
  641. {$ifdef CPUALPHA}
  642. {$ifdef linux}
  643. set_source_info(system_alpha_linux_info);
  644. {$endif linux}
  645. {$endif CPUALPHA}
  646. {$ifdef CPUSPARC}
  647. {$ifdef linux}
  648. set_source_info(system_sparc_linux_info);
  649. {$endif linux}
  650. {$endif CPUSPARC}
  651. {$ifdef CPUPOWERPC32}
  652. {$ifdef linux}
  653. set_source_info(system_powerpc_linux_info);
  654. {$endif linux}
  655. {$endif CPUPOWERPC32}
  656. {$ifdef CPUPOWERPC64}
  657. {$ifdef linux}
  658. set_source_info(system_powerpc64_linux_info);
  659. {$endif linux}
  660. {$endif CPUPOWERPC64}
  661. {$ifdef CPUARM}
  662. {$ifdef linux}
  663. set_source_info(system_arm_linux_info);
  664. {$endif linux}
  665. {$endif CPUARM}
  666. end.