fpcdefs.inc 1.7 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283
  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. {$define FPCPROCVAR}
  12. {$ifdef I386}
  13. {$define USEEXCEPT}
  14. {$endif}
  15. {$endif}
  16. {$endif}
  17. {$ifdef DELPHI}
  18. {$H-}
  19. {$J+}
  20. {$Z1}
  21. {$undef FPCPROCVAR}
  22. {$endif}
  23. { assume a processor with flags }
  24. {$define cpuflags}
  25. {$ifdef i386}
  26. {$ifdef delphi}
  27. {$define oldset}
  28. {$endif}
  29. {$define x86}
  30. {$else}
  31. {$define oldset}
  32. {$endif i386}
  33. {$ifdef x86_64}
  34. {$define x86}
  35. {$define cpu64bit}
  36. {$endif x86_64}
  37. {$ifdef alpha}
  38. {$define cpu64bit}
  39. {$undef cpuflags}
  40. {$endif alpha}
  41. {
  42. $Log$
  43. Revision 1.12 2002-10-05 12:43:24 carl
  44. * fixes for Delphi 6 compilation
  45. (warning : Some features do not work under Delphi)
  46. Revision 1.11 2002/09/30 07:00:45 florian
  47. * fixes to common code to get the alpha compiler compiled applied
  48. Revision 1.10 2002/09/29 23:19:05 florian
  49. + added define 64bit
  50. Revision 1.9 2002/09/07 15:25:02 peter
  51. * old logs removed and tabs fixed
  52. Revision 1.8 2002/08/30 13:42:29 mazen
  53. - undefining win32 when SPARC defined removed, no more needed.
  54. Revision 1.6 2002/08/19 18:17:48 carl
  55. + optimize64_op_const_reg implemented (optimizes 64-bit constant opcodes)
  56. * more fixes to m68k for 64-bit operations
  57. Revision 1.5 2002/08/15 15:11:53 carl
  58. * oldset define is now correct for all cpu's except i386
  59. * correct compilation problems because of the above
  60. Revision 1.4 2002/07/23 12:34:29 daniel
  61. * Readded old set code. To use it define 'oldset'. Activated by default
  62. for ppc.
  63. Revision 1.3 2002/07/04 18:56:50 florian
  64. + log added
  65. }