paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-09-08 10:39:15 +02:00
Code Issues Packages Projects Releases Wiki Activity

Codetools: Allow {$MODESWITCH TYPEHELPERS}. Issue #25743, patch from Dennis Fehr.

Browse Source 
git-svn-id: trunk@44514 -
This commit is contained in:
juha 2014-03-24 23:10:11 +00:00
parent 32adb07f4c
commit 5df636d70f
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
components/codetools/linkscanner.pas
View File

@ -182,7 +182,8 @@ type
cmsFinalFields, { allows declaring fields as "final", which means they must be initialised cmsFinalFields, { allows declaring fields as "final", which means they must be initialised
in the (class) constructor and are constant from then on (same as final in the (class) constructor and are constant from then on (same as final
fields in Java) } fields in Java) }
cmsDefault_unicodestring { ? see http://wiki.freepascal.org/FPC_JVM/Language } cmsDefault_unicodestring, { ? see http://wiki.freepascal.org/FPC_JVM/Language }
cmsTypeHelpers
); );
TCompilerModeSwitches = set of TCompilerModeSwitch; TCompilerModeSwitches = set of TCompilerModeSwitch;
const const
@ -717,7 +718,8 @@ const
'ISOUNARYMINUS', 'ISOUNARYMINUS',
'SYSTEMCODEPAGE', 'SYSTEMCODEPAGE',
'FINALFIELDS', 'FINALFIELDS',
'UNICODESTRINGS'); 'UNICODESTRINGS',
'TYPEHELPERS');
// upper case // upper case
PascalCompilerNames: array[TPascalCompiler] of shortstring=( PascalCompilerNames: array[TPascalCompiler] of shortstring=(