fpcdefs.inc 2.6 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112
  1. {$ifdef FPC}
  2. {$ifdef DELPHI}
  3. {$mode delphi}
  4. {$asmmode intel}
  5. {$else}
  6. {$mode objfpc}
  7. {$H-}
  8. {$goto on}
  9. { This reduces the memory requirements a lot }
  10. {$PACKENUM 1}
  11. { We don't use exceptions, so turn off the implicit
  12. exceptions in the constructors }
  13. {$ifndef VER1_0}
  14. {$IMPLICITEXCEPTIONS OFF}
  15. {$endif VER1_0}
  16. {$define FPCPROCVAR}
  17. {$ifdef I386}
  18. {$define USEEXCEPT}
  19. {$endif}
  20. {$endif}
  21. {$endif}
  22. {$ifdef DELPHI}
  23. {$H-}
  24. {$J+}
  25. {$Z1}
  26. {$undef FPCPROCVAR}
  27. {$endif}
  28. { assume a processor with flags }
  29. {$define cpuflags}
  30. {$ifdef i386}
  31. {$ifdef delphi}
  32. {$define oldset}
  33. {$endif}
  34. {$define x86}
  35. {$else}
  36. {$define oldset}
  37. {$endif i386}
  38. {$ifdef x86_64}
  39. {$define x86}
  40. {$define cpu64bit}
  41. {$endif x86_64}
  42. {$ifdef alpha}
  43. {$define cpu64bit}
  44. {$undef cpuflags}
  45. {$endif alpha}
  46. {$ifdef powerpc}
  47. {$define callparatemp}
  48. {$endif powerpc}
  49. { FPU Emulator support }
  50. {$ifdef m68k}
  51. {$define cpufpemu}
  52. {$endif m68k}
  53. {
  54. $Log$
  55. Revision 1.15 2003-04-23 12:35:34 florian
  56. * fixed several issues with powerpc
  57. + applied a patch from Jonas for nested function calls (PowerPC only)
  58. * ...
  59. Revision 1.14 2002/12/06 16:56:57 peter
  60. * only compile cs_fp_emulation support when cpufpuemu is defined
  61. * define cpufpuemu for m68k only
  62. Revision 1.13 2002/10/16 19:01:43 peter
  63. + $IMPLICITEXCEPTIONS switch to turn on/off generation of the
  64. implicit exception frames for procedures with initialized variables
  65. and for constructors. The default is on for compatibility
  66. Revision 1.12 2002/10/05 12:43:24 carl
  67. * fixes for Delphi 6 compilation
  68. (warning : Some features do not work under Delphi)
  69. Revision 1.11 2002/09/30 07:00:45 florian
  70. * fixes to common code to get the alpha compiler compiled applied
  71. Revision 1.10 2002/09/29 23:19:05 florian
  72. + added define 64bit
  73. Revision 1.9 2002/09/07 15:25:02 peter
  74. * old logs removed and tabs fixed
  75. Revision 1.8 2002/08/30 13:42:29 mazen
  76. - undefining win32 when SPARC defined removed, no more needed.
  77. Revision 1.6 2002/08/19 18:17:48 carl
  78. + optimize64_op_const_reg implemented (optimizes 64-bit constant opcodes)
  79. * more fixes to m68k for 64-bit operations
  80. Revision 1.5 2002/08/15 15:11:53 carl
  81. * oldset define is now correct for all cpu's except i386
  82. * correct compilation problems because of the above
  83. Revision 1.4 2002/07/23 12:34:29 daniel
  84. * Readded old set code. To use it define 'oldset'. Activated by default
  85. for ppc.
  86. Revision 1.3 2002/07/04 18:56:50 florian
  87. + log added
  88. }