fpcdefs.inc 2.3 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110
  1. {$ifdef FPC}
  2. {$mode objfpc}
  3. {$asmmode default}
  4. {$H-}
  5. {$goto on}
  6. {$inline on}
  7. { 1Mb stack }
  8. {$MEMORY 1000000}
  9. { This reduces the memory requirements a lot }
  10. {$PACKENUM 1}
  11. {$ifndef VER1_0}
  12. { We don't use exceptions, so turn off the implicit
  13. exceptions in the constructors }
  14. {$IMPLICITEXCEPTIONS OFF}
  15. { Inline small functions, but not when EXTDEBUG is used }
  16. {$ifndef EXTDEBUG}
  17. {$define USEINLINE}
  18. {$endif EXTDEBUG}
  19. {$else}
  20. { Optimizer is broken when compiling with optimizations using 1.0.x }
  21. {$ifndef USEOPT}
  22. {$define NOOPT}
  23. {$endif}
  24. { 1.0.x generates broken code for sysutils }
  25. {$ifndef FORCE_SYSUTILS}
  26. {$undef USE_SYSUTILS}
  27. {$endif}
  28. {$endif VER1_0}
  29. {$ifdef VER1_9_4}
  30. { 1.9.4 generates broken code for sysutils }
  31. {$ifndef FORCE_SYSUTILS}
  32. {$undef USE_SYSUTILS}
  33. {$endif}
  34. {$endif}
  35. {$define USEEXCEPT}
  36. {$ifdef cpuarm}
  37. {$packrecords c}
  38. {$endif cpuarm}
  39. {$endif}
  40. {$ifdef i386}
  41. {$define x86}
  42. {$define cpuflags}
  43. {$define cpuextended}
  44. {$endif i386}
  45. {$ifdef x86_64}
  46. {$define x86}
  47. {$define cpuflags}
  48. {$define cpu64bit}
  49. {$define cpuextended}
  50. {$define cpufloat128}
  51. {$define cputargethasfixedstack}
  52. {$endif x86_64}
  53. {$ifdef alpha}
  54. {$define cpu64bit}
  55. {$endif alpha}
  56. {$ifdef sparc}
  57. {$define cpuflags}
  58. {$define cputargethasfixedstack}
  59. {$define cpurequiresproperalignment}
  60. {$endif sparc}
  61. {$ifdef powerpc}
  62. {$define cpuflags}
  63. {$define cputargethasfixedstack}
  64. {$endif powerpc}
  65. {$ifdef arm}
  66. {$define cpuflags}
  67. {$define cpuneedsdiv32helper}
  68. {$define cputargethasfixedstack}
  69. {$define cpurequiresproperalignment}
  70. {$endif arm}
  71. {$ifdef m68k}
  72. {$define cpuflags}
  73. {$define cpufpemu}
  74. {$endif m68k}
  75. {$IFDEF MACOS}
  76. {$DEFINE MACOS_USE_FAKE_SYSUTILS}
  77. {$ENDIF MACOS}
  78. {
  79. $Log$
  80. Revision 1.50 2005-02-26 01:26:59 jonas
  81. * fixed generic jumps optimizer and enabled it for ppc (the label table
  82. was not being initialised -> getfinaldestination always failed, which
  83. caused wrong optimizations in some cases)
  84. * changed the inverse_cond into a function, because tasmcond is a record
  85. on ppc
  86. + added a compare_conditions() function for the same reason
  87. Revision 1.49 2005/02/14 17:13:06 peter
  88. * truncate log
  89. Revision 1.48 2005/02/08 22:33:51 olle
  90. * fixed compilation on MacOS
  91. }