paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-21 15:49:26 +02:00
Code Issues Packages Projects Releases Wiki Activity

* 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

Browse Source 
git-svn-id: trunk@49403 -
This commit is contained in:
svenbarth 2021-05-27 05:43:01 +00:00
parent bae583118a
commit cb953f68c2
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
rtl/inc/rttih.inc
View File

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