paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-10-20 07:11:43 +02:00
Code Issues Packages Projects Releases Wiki Activity

+ x86 define added

Browse Source
This commit is contained in:
florian 2002-07-04 18:55:51 +00:00
parent 0acee5e02e
commit 7ee2694782
2 changed files with 42 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

35
compiler/defines.inc Normal file
View File

@ -0,0 +1,35 @@
{$ifdef FPC}
{$ifdef DELPHI}
{$mode delphi}
{$asmmode intel}
{$else}
{$mode objfpc}
{$H-}
{$goto on}
{ This reduces the memory requirements a lot }
{$PACKENUM 1}
{$define FPCPROCVAR}
{$ifdef I386}
{$define USEEXCEPT}
{$endif}
{$endif}
{$endif}
{$ifdef DELPHI}
{$H-}
{$J+}
{$Z1}
{$undef FPCPROCVAR}
{$define USEEXCEPT}
{$endif}
{$ifdef i386}
{$define x86}
{$endif i386}
{$ifdef x86_64}
{$define x86}
{$endif x86_64}

7
compiler/fpcdefs.inc
View File

@ -26,3 +26,10 @@
{$undef FPCPROCVAR}
{$define USEEXCEPT}
{$endif}
{$ifdef i386}
{$define x86}
{$endif i386}
{$ifdef x86_64}
{$define x86}
{$endif x86_64}