diff --git a/src/shared/a_modes.inc b/src/shared/a_modes.inc
index 13c328e85a2c71cc77397cc5fb72634f27058352..57c97a82dc5f0c780f3c2b9fdc44c0b6944877d3 100644 (file)
--- a/src/shared/a_modes.inc
+++ b/src/shared/a_modes.inc
// compiler options, common for all game modules
-{$MODE DELPHI}
+{$MODE OBJFPC}
{$MODESWITCH ADVANCEDRECORDS+}
-{$MODESWITCH DUPLICATELOCALS-}
+{$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-}
+
{$ASSERTIONS ON}
{$BITPACKING OFF}
{$BOOLEVAL OFF}
{$COPERATORS ON}
{$EXTENDEDSYNTAX ON}
-{$FPUTYPE SSE}
+{$IF DEFINED(CPU386)}
+ {$IFDEF USE_X87}
+ {$FPUTYPE x87}
+ {$MMX-}
+ {$ELSE}
+ {$FPUTYPE SSE}
+ {$MMX-}
+ {$ENDIF}
+{$ELSE}
+ {$MMX-} // get lost, mmx
+{$ENDIF}
{$GOTO ON}
{$IEEEERRORS OFF}
{$INLINE ON}
{$POINTERMATH ON}
{$RANGECHECKS OFF}
{$SAFEFPUEXCEPTIONS OFF}
-{$SCOPEDENUMS OFF} // this will possibly be changed later
+{$SCOPEDENUMS ON} // this may be changed later
{$SMARTLINK ON}
-{$TYPEDADDRESS OFF}
-{$TYPEINFO OFF}
+{$TYPEDADDRESS ON}
+{$TYPEINFO ON}
{$VARSTRINGCHECKS OFF}
{$S-} // disable stack checking
-{$MMX-} // get lost, mmx
{$IF DEFINED(D2F_DEBUG)}
{$STACKFRAMES ON}
+ {$HINTS OFF}
{$ELSE}
{$STACKFRAMES OFF}
+ {$HINTS OFF}
+ {$DEFINE D2F_MORE_OPTIM}
{$ENDIF}
+{$WARNINGS ON}
+{$NOTES ON}
+{$IF DEFINED(D2F_DEBUG_OPTIM) or DEFINED(D2F_MORE_OPTIM)}
+ {$OPTIMIZATION DEADVALUES}
+ {$OPTIMIZATION CONSTPROP}
+ {$OPTIMIZATION DEADSTORE}
+{$ENDIF}
+
+{$IFDEF WIN32}
+ {$IFNDEF MSWINDOWS}
+ {$DEFINE MSWINDOWS}
+ {$ENDIF}
+{$ENDIF}
{$IFDEF MSWINDOWS}
{$IFNDEF WINDOWS}
{$DEFINE WINDOWS}
{$ENDIF WINDOWS}
-{$ENDIF MSWINDOWS}
+{$ENDIF}