* Fpc fixes

git-svn-id: https://svn.code.sf.net/p/kolmck/code@156 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07

KOLDEF.inc

@@ -360,6 +360,8 @@
 {$ENDIF}
 
 {$IFDEF FPC}
+  {$MODE DELPHI}
+  {$ASMMODE INTEL}
   {$DEFINE PAS_ONLY}
   {$DEFINE USE_OLD_FLAGS} //size of set type in fpc is 4 bytes
   {------------------------------------
@@ -455,12 +457,14 @@
 
 {$IFNDEF USE_OLD_FLAGS}
   {$DEFINE USE_FLAGS}
-{$ELSE}  {$UNDEF  USE_FLAGS}
+{$ELSE}
+  {$UNDEF  USE_FLAGS}
 {$ENDIF}
 
 {$IFnDEF EVENTS_STATIC}
   {$DEFINE EVENTS_DYNAMIC}
 {$ENDIF}
+
 {$IFnDEF CMDACTIONS_RECORD}
   {$DEFINE COMMANDACTIONS_OBJ}
   {$DEFINE PACK_COMMANDACTIONS}