i_os2.pas 3.8 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120
  1. {
  2. Copyright (c) 1998-2002 by Peter Vreman
  3. This unit implements support information structures for OS/2
  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 OS/2. }
  18. unit i_os2;
  19. {$i fpcdefs.inc}
  20. interface
  21. uses
  22. systems;
  23. const
  24. res_wrc_os2_info : tresinfo =
  25. (
  26. id : res_watcom_wrc_os2;
  27. resbin : '';
  28. rescmd : '';
  29. rcbin : 'wrc';
  30. rccmd : '-r -zm -q -bt=os2 -dFPC -fo=$RES $RC';
  31. resourcefileclass : nil;
  32. resflags : [res_single_file];
  33. );
  34. system_i386_os2_info : tsysteminfo =
  35. (
  36. system : system_i386_OS2;
  37. name : 'OS/2';
  38. shortname : 'OS2';
  39. flags : [tf_need_export,tf_files_case_aware,tf_use_8_3];
  40. cpu : cpu_i386;
  41. unit_env : 'OS2UNITS';
  42. extradefines : '';
  43. exeext : '.exe';
  44. defext : '.def';
  45. scriptext : '.cmd';
  46. smartext : '.sl';
  47. unitext : '.ppu';
  48. unitlibext : '.ppl';
  49. asmext : '.s';
  50. objext : '.o';
  51. resext : '.res';
  52. resobjext : '.or';
  53. sharedlibext : '.dll';
  54. staticlibext : '.a';
  55. staticlibprefix : 'libp';
  56. sharedlibprefix : '';
  57. sharedClibext : '.dll';
  58. staticClibext : '.a';
  59. staticClibprefix : '';
  60. sharedClibprefix : '';
  61. importlibprefix : '';
  62. importlibext : '.a';
  63. Cprefix : '_';
  64. newline : #13#10;
  65. dirsep : '\';
  66. assem : as_i386_as_aout;
  67. assemextern : as_i386_as_aout;
  68. link : ld_none;
  69. linkextern : ld_os2;
  70. ar : ar_gnu_ar;
  71. res : res_watcom_wrc_os2;
  72. dbg : dbg_stabs;
  73. script : script_dos;
  74. endian : endian_little;
  75. alignment :
  76. (
  77. procalign : 4;
  78. loopalign : 4;
  79. jumpalign : 0;
  80. constalignmin : 0;
  81. constalignmax : 4;
  82. varalignmin : 0;
  83. varalignmax : 4;
  84. localalignmin : 0;
  85. localalignmax : 4;
  86. recordalignmin : 0;
  87. recordalignmax : 2;
  88. maxCrecordalign : 4
  89. );
  90. first_parm_offset : 8;
  91. stacksize : 256*1024;
  92. stackalign : 4;
  93. abi : abi_default;
  94. llvmdatalayout : 'todo';
  95. );
  96. implementation
  97. initialization
  98. {$ifdef CPUI386}
  99. {$ifdef os2}
  100. {$IFNDEF EMX}
  101. set_source_info(system_i386_os2_info);
  102. {$ENDIF EMX}
  103. {$IFDEF VER1_0}
  104. set_source_info(system_i386_os2_info);
  105. {$ENDIF VER1_0}
  106. {$endif os2}
  107. {$endif CPUI386}
  108. end.