Delphi/pascalscript
Delphi/pascalscript
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix for defines

Browse Source 
git-svn-id: http://code.remobjects.com/svn/pascalscript@134 5c9d2617-0215-0410-a2ee-e80e04d1c6d8
This commit is contained in:
carlokok 2009-05-12 06:28:26 +00:00
parent c1eca8c038
commit ca29fd7600
1 changed files with 7 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

14
Source/PascalScript.inc
View File

@ -61,14 +61,14 @@ Defines:
{$DEFINE PS_HAVEVARIANT}
{$DEFINE PS_DYNARRAY}
{$DEFINE PS_NOIDISPATCH}
{$if (fpc_version=2) and (fpc_release>=3) and (fpc_patch>=1)}
{$UNDEF FPC_OLD_FIX}
{$UNDEF PS_FPCSTRINGWORKAROUND}
{$if defined(fpc_version) and defined(fpc_patch) and defined(fpc_release) and (fpc_version=2) and (fpc_release>=3) and (fpc_patch>=1)}
{$UNDEF FPC_OLD_FIX}
{$UNDEF PS_FPCSTRINGWORKAROUND}
{FreePascal 2.3.1 and above has much Delphi compatibility bugs fixed}
{$else}
{$DEFINE FPC_OLD_FIX}
{$DEFINE PS_FPCSTRINGWORKAROUND}
{$endif}
{$else}
{$DEFINE FPC_OLD_FIX}
{$DEFINE PS_FPCSTRINGWORKAROUND}
{$ifend}
{$DEFINE DELPHI3UP}
{$DEFINE DELPHI6UP}
{$ENDIF}