mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-24 10:01:33 +02:00
- Disable smaller_possible_range_check hints/warnings because of too much
false positives. git-svn-id: trunk@7960 -
This commit is contained in:
parent
1eb1bf4c42
commit
eb42e583b1
@ -2571,6 +2571,10 @@ implementation
|
||||
|
||||
procedure check_ranges(const location: tfileposinfo; source: tnode; destdef: tdef);
|
||||
begin
|
||||
{These checks create too much false positives. They might be usefull if we have
|
||||
TP styled common type arithmetic semantics, but with the current semantics
|
||||
there are not usefull.}
|
||||
{$ifdef check_ranges_warnings}
|
||||
{ check if the assignment may cause a range check error }
|
||||
{ if its not explicit, and only if the values are }
|
||||
{ ordinals, enumdef and floatdef }
|
||||
@ -2590,6 +2594,7 @@ implementation
|
||||
MessagePos(location,type_h_smaller_possible_range_check);
|
||||
end;
|
||||
end;
|
||||
{$endif}
|
||||
end;
|
||||
|
||||
|
||||
|
||||
Loading…
Reference in New Issue
Block a user