diff options
| author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-03 14:00:02 +0000 |
|---|---|---|
| committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-03-03 14:00:02 +0000 |
| commit | ddf0dc62ba1e3bd772e8155d295ddb3487d5d305 (patch) | |
| tree | 801dd2d41e17fb33e0fe9ddef81214edb407df56 /Game/Code/switches.inc | |
| parent | 71115fe4d1873e61101f2ceb2c99fc3554ac4171 (diff) | |
| download | usdx-ddf0dc62ba1e3bd772e8155d295ddb3487d5d305.tar.gz usdx-ddf0dc62ba1e3bd772e8155d295ddb3487d5d305.tar.xz usdx-ddf0dc62ba1e3bd772e8155d295ddb3487d5d305.zip | |
delphi 7 compatibility (inline was introduced with delphi 2005)
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@902 b956fd51-792f-4845-bead-9b4dfca2ff2c
Diffstat (limited to '')
| -rw-r--r-- | Game/Code/switches.inc | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/Game/Code/switches.inc b/Game/Code/switches.inc index 46997405..9b31f3af 100644 --- a/Game/Code/switches.inc +++ b/Game/Code/switches.inc @@ -23,9 +23,20 @@ {$ENDIF}
{$DEFINE DLL_CDECL}
+ {$DEFINE HasInline}
{$UNDEF UseSerialPort}
{$ELSE}
{$DEFINE Delphi}
+
+ // Delphi version numbers (ignore versions released before Delphi 6 as they miss the $IF directive):
+ // Delphi 6 (VER140), Delphi 7 (VER150), Delphi 8 (VER160)
+ // Delphi 9/2005 (VER170), Delphi 10/2006 (VER180)
+
+ // the inline-procedure directive was introduced with Delphi 2005
+ {$IF not (Defined(VER140) or Defined(VER150) or Defined(VER160))}
+ {$DEFINE HasInline}
+ {$IFEND}
+
{$DEFINE DLL_STDCALL}
{$UNDEF UseSerialPort}
{$ENDIF}
|