X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;f=src%2Fshared%2Fa_modes.inc;h=9c5c74c08774122fa8a2e705e89f63d449807b3a;hb=4e0a3d27eb16e912ccebaba777d49aac52151d95;hp=35e29d6ec289341da8ddd68f270baa17b10ce5d6;hpb=dd0d8ac4cc2a0aa774f25c8a1a774f7358acfae7;p=d2df-sdl.git

diff --git a/src/shared/a_modes.inc b/src/shared/a_modes.inc
index 35e29d6..9c5c74c 100644
--- a/src/shared/a_modes.inc
+++ b/src/shared/a_modes.inc
@@ -1,19 +1,65 @@
 // compiler options, common for all game modules
-{$MODE DELPHI}
-{$MODESWITCH NESTEDPROCVARS+}
-{$MODESWITCH DUPLICATELOCALS-}
-{.$MODESWITCH CBLOCKS+}
+{.$MODE DELPHI}
+{$MODE OBJFPC}
+
 {$MODESWITCH ADVANCEDRECORDS+}
+{$MODESWITCH ALLOWINLINE+}
+{$MODESWITCH ANSISTRINGS+} // Allow use of ansistrings.
+{$MODESWITCH AUTODEREF+} // Automatic (silent) dereferencing of typed pointers.
+{$MODESWITCH CLASS+}
+{$MODESWITCH CLASSICPROCVARS+} // Use classical procedural variables.
+{$MODESWITCH DEFAULTPARAMETERS+} // Allow use of default parameter values.
+{$MODESWITCH DUPLICATELOCALS-} // Allow local variables in class methods to have the same names as properties of the class.
+{$MODESWITCH EXCEPTIONS+}
+{$MODESWITCH HINTDIRECTIVE+} // Support the hint directives (deprecated, platform etc.)
+{$MODESWITCH INITFINAL+} // Allow use of Initialization and Finalization
+{.$MODESWITCH ISOUNARYMINUS-} // Unary minus as required by ISO pascal.
+{$MODESWITCH MACPROCVARS-} // Use mac-style procedural variables.
+{$MODESWITCH NESTEDCOMMENTS-}
+{$MODESWITCH NESTEDPROCVARS+}
+{$MODESWITCH OBJPAS+}
+{$MODESWITCH OUT+} // Allow use of the out parameter type.
+{$MODESWITCH PCHARTOSTRING+}
+{$MODESWITCH POINTERTOPROCVAR+} // Allow silent conversion of pointers to procedural variables.
+{$MODESWITCH PROPERTIES+}
+{$MODESWITCH REPEATFORWARD+} // Implementation and Forward declaration must match completely.
+{$MODESWITCH RESULT+}
+{$MODESWITCH TYPEHELPERS-} // Allow the use of type helpers.
+{$MODESWITCH UNICODESTRINGS-}
+{$MODESWITCH UNICODESTRINGS-}
+
+
 {$ASSERTIONS ON}
+{$BITPACKING OFF}
+{$BOOLEVAL OFF}
+{$COPERATORS ON}
+{$EXTENDEDSYNTAX ON}
+{$FPUTYPE SSE}
+{$GOTO ON}
+{$IEEEERRORS OFF}
+{$INLINE ON}
 {$LONGSTRINGS ON}
+{$MACRO OFF}
+{$OBJECTCHECKS OFF}
 {$OVERFLOWCHECKS OFF}
+{$POINTERMATH ON}
 {$RANGECHECKS OFF}
-{.$STATIC ON}
-{$TYPEDADDRESS OFF}
+{$SAFEFPUEXCEPTIONS OFF}
+{$SCOPEDENUMS OFF} // this will possibly be changed later
+{$SMARTLINK ON}
+{$TYPEDADDRESS ON}
+{$TYPEINFO OFF}
 {$VARSTRINGCHECKS OFF}
-{$EXTENDEDSYNTAX ON}
-{$B-}
-{$S-}
+
+{$S-} // disable stack checking
+{$MMX-} // get lost, mmx
+
+{$IF DEFINED(D2F_DEBUG)}
+  {$STACKFRAMES ON}
+{$ELSE}
+  {$STACKFRAMES OFF}
+{$ENDIF}
+
 
 {$IFDEF MSWINDOWS}
   {$IFNDEF WINDOWS}