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

* allow prec/succ on non-consecutive enums if pred/succ are generated internally

Browse Source 
git-svn-id: trunk@34813 -
This commit is contained in:
florian 2016-11-06 15:22:39 +00:00
parent f4d1331bbe
commit a705525e9b
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
compiler/ninl.pas
View File

@ -2924,7 +2924,8 @@ implementation
begin
if (resultdef.typ=enumdef) and
(tenumdef(resultdef).has_jumps) and
not(m_delphi in current_settings.modeswitches) then
not(m_delphi in current_settings.modeswitches) and
not(nf_internal in flags) then
CGMessage(type_e_succ_and_pred_enums_with_assign_not_possible);
end
else