2
0
Эх сурвалжийг харах

* as 3.2.0 is now the oldest compiler we support we can now use {$push} {$pop} to reset the $minenumsize in the RTTI header

git-svn-id: trunk@49403 -
svenbarth 4 жил өмнө
parent
commit
cb953f68c2

+ 2 - 2
rtl/inc/rttih.inc

@@ -11,7 +11,7 @@
 
 
  **********************************************************************}
  **********************************************************************}
 
 
-{ sadly MinEnumSize is not handled by Push/Pop :'( }
+{$PUSH}
 {$MINENUMSIZE 1   this saves a lot of memory }
 {$MINENUMSIZE 1   this saves a lot of memory }
 
 
 type
 type
@@ -26,7 +26,7 @@ type
               tkDynArray,tkInterfaceRaw,tkProcVar,tkUString,tkUChar,
               tkDynArray,tkInterfaceRaw,tkProcVar,tkUString,tkUChar,
               tkHelper,tkFile,tkClassRef,tkPointer);
               tkHelper,tkFile,tkClassRef,tkPointer);
 
 
-{$MINENUMSIZE DEFAULT}
+{$POP}
 
 
 const
 const
   { some Delphi-compatible aliases }
   { some Delphi-compatible aliases }