* Fpc fixes

git-svn-id: https://svn.code.sf.net/p/kolmck/code@156 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07
This commit is contained in:
dkolmck
2017-01-20 03:43:56 +00:00
parent 6b45e73d46
commit 8acb6d67e6

View File

@@ -360,6 +360,8 @@
{$ENDIF} {$ENDIF}
{$IFDEF FPC} {$IFDEF FPC}
{$MODE DELPHI}
{$ASMMODE INTEL}
{$DEFINE PAS_ONLY} {$DEFINE PAS_ONLY}
{$DEFINE USE_OLD_FLAGS} //size of set type in fpc is 4 bytes {$DEFINE USE_OLD_FLAGS} //size of set type in fpc is 4 bytes
{------------------------------------ {------------------------------------
@@ -449,24 +451,26 @@
//{$DEFINE TEST_VERSION} //{$DEFINE TEST_VERSION}
{$IFNDEF _D6orHigher} {$IFNDEF _D6orHigher}
{$DEFINE PARANOIA} //seems not needed from D6 !!! Inprise fixed this, finally... {$DEFINE PARANOIA} //seems not needed from D6 !!! Inprise fixed this, finally...
{$ENDIF} {$ENDIF}
{$IFNDEF USE_OLD_FLAGS} {$IFNDEF USE_OLD_FLAGS}
{$DEFINE USE_FLAGS} {$DEFINE USE_FLAGS}
{$ELSE} {$UNDEF USE_FLAGS} {$ELSE}
{$UNDEF USE_FLAGS}
{$ENDIF} {$ENDIF}
{$IFnDEF EVENTS_STATIC} {$IFnDEF EVENTS_STATIC}
{$DEFINE EVENTS_DYNAMIC} {$DEFINE EVENTS_DYNAMIC}
{$ENDIF} {$ENDIF}
{$IFnDEF CMDACTIONS_RECORD} {$IFnDEF CMDACTIONS_RECORD}
{$DEFINE COMMANDACTIONS_OBJ} {$DEFINE COMMANDACTIONS_OBJ}
{$DEFINE PACK_COMMANDACTIONS} {$DEFINE PACK_COMMANDACTIONS}
{$IFDEF NOT_PACK_COMMANDACTIONS} {$IFDEF NOT_PACK_COMMANDACTIONS}
{$UNDEF PACK_COMMANDACTIONS} {$UNDEF PACK_COMMANDACTIONS}
{$ENDIF} {$ENDIF}
{$ENDIF} {$ENDIF}
{$DEFINE KOL3XX} {$DEFINE KOL3XX}