X-Git-Url: http://deadsoftware.ru/gitweb?a=blobdiff_plain;ds=inline;f=src%2Fshared%2Fa_modes.inc;h=d4b1795a94b9a9ff77afa0a26e984afbe0bed9ab;hb=345e116f73d0e4b11593a94bee7d18b9e64572eb;hp=9d1da17825a7b8580b5ed4239eaeaca7a4619060;hpb=b744498c3f6d4d30731c74ba376e15e71de9b610;p=d2df-sdl.git

diff --git a/src/shared/a_modes.inc b/src/shared/a_modes.inc
index 9d1da17..d4b1795 100644
--- a/src/shared/a_modes.inc
+++ b/src/shared/a_modes.inc
@@ -24,8 +24,7 @@
 {$MODESWITCH PROPERTIES+}
 {$MODESWITCH REPEATFORWARD+} // Implementation and Forward declaration must match completely.
 {$MODESWITCH RESULT+}
-{$MODESWITCH TYPEHELPERS-} // Allow the use of type helpers.
-{$MODESWITCH UNICODESTRINGS-}
+{$MODESWITCH TYPEHELPERS+} // Allow the use of type helpers.
 {$MODESWITCH UNICODESTRINGS-}
 
 
@@ -34,7 +33,9 @@
 {$BOOLEVAL OFF}
 {$COPERATORS ON}
 {$EXTENDEDSYNTAX ON}
-{$FPUTYPE SSE}
+{$IFDEF CPU32}
+  {$FPUTYPE SSE}
+{$ENDIF CPU32}
 {$GOTO ON}
 {$IEEEERRORS OFF}
 {$INLINE ON}
@@ -45,22 +46,31 @@
 {$POINTERMATH ON}
 {$RANGECHECKS OFF}
 {$SAFEFPUEXCEPTIONS OFF}
-{$SCOPEDENUMS OFF} // this will possibly be changed later
+{$SCOPEDENUMS ON} // this may be changed later
 {$SMARTLINK ON}
 {$TYPEDADDRESS ON}
-{$TYPEINFO OFF}
+{$TYPEINFO ON}
 {$VARSTRINGCHECKS OFF}
 
 {$S-} // disable stack checking
 {$MMX-} // get lost, mmx
 
 {$IF DEFINED(D2F_DEBUG)}
-  {$RANGECHECKS ON}
   {$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 MSWINDOWS}
   {$IFNDEF WINDOWS}