fpcdefs.inc 3.0 KB

123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135
  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. {$define cpuextended}
  36. {$else}
  37. {$define oldset}
  38. {$endif i386}
  39. {$ifdef x86_64}
  40. {$define x86}
  41. {$define cpu64bit}
  42. {$define cpuextended}
  43. {$endif x86_64}
  44. {$ifdef alpha}
  45. {$define cpu64bit}
  46. {$undef cpuflags}
  47. {$endif alpha}
  48. {$ifdef powerpc}
  49. {$define callparatemp}
  50. {$endif powerpc}
  51. { FPU Emulator support }
  52. {$ifdef m68k}
  53. {$define cpufpemu}
  54. {$endif m68k}
  55. { Optimizer is x86 only }
  56. {$ifndef i386}
  57. {$define noopt}
  58. {$endif i386}
  59. {
  60. $Log$
  61. Revision 1.19 2003-05-09 17:47:02 peter
  62. * self moved to hidden parameter
  63. * removed hdisposen,hnewn,selfn
  64. Revision 1.18 2003/04/30 09:42:42 florian
  65. + first changes to make self a hidden parameter
  66. Revision 1.17 2003/04/24 22:29:57 florian
  67. * fixed a lot of PowerPC related stuff
  68. Revision 1.16 2003/04/23 13:47:41 peter
  69. * optimizer is x86
  70. Revision 1.15 2003/04/23 12:35:34 florian
  71. * fixed several issues with powerpc
  72. + applied a patch from Jonas for nested function calls (PowerPC only)
  73. * ...
  74. Revision 1.14 2002/12/06 16:56:57 peter
  75. * only compile cs_fp_emulation support when cpufpuemu is defined
  76. * define cpufpuemu for m68k only
  77. Revision 1.13 2002/10/16 19:01:43 peter
  78. + $IMPLICITEXCEPTIONS switch to turn on/off generation of the
  79. implicit exception frames for procedures with initialized variables
  80. and for constructors. The default is on for compatibility
  81. Revision 1.12 2002/10/05 12:43:24 carl
  82. * fixes for Delphi 6 compilation
  83. (warning : Some features do not work under Delphi)
  84. Revision 1.11 2002/09/30 07:00:45 florian
  85. * fixes to common code to get the alpha compiler compiled applied
  86. Revision 1.10 2002/09/29 23:19:05 florian
  87. + added define 64bit
  88. Revision 1.9 2002/09/07 15:25:02 peter
  89. * old logs removed and tabs fixed
  90. Revision 1.8 2002/08/30 13:42:29 mazen
  91. - undefining win32 when SPARC defined removed, no more needed.
  92. Revision 1.6 2002/08/19 18:17:48 carl
  93. + optimize64_op_const_reg implemented (optimizes 64-bit constant opcodes)
  94. * more fixes to m68k for 64-bit operations
  95. Revision 1.5 2002/08/15 15:11:53 carl
  96. * oldset define is now correct for all cpu's except i386
  97. * correct compilation problems because of the above
  98. Revision 1.4 2002/07/23 12:34:29 daniel
  99. * Readded old set code. To use it define 'oldset'. Activated by default
  100. for ppc.
  101. Revision 1.3 2002/07/04 18:56:50 florian
  102. + log added
  103. }