Browse Source

* do not warn about disjunct ranges for internally created cmp nodes

git-svn-id: trunk@30269 -
florian 10 năm trước cách đây
mục cha
commit
a8e001d4ad
1 tập tin đã thay đổi với 1 bổ sung1 xóa
  1. 1 1
      compiler/nadd.pas

+ 1 - 1
compiler/nadd.pas

@@ -2152,7 +2152,7 @@ implementation
             inserttypeconv(right,sinttype);
           end;
 
-         if cmp_of_disjunct_ranges(res) then
+         if cmp_of_disjunct_ranges(res) and not(nf_internal in flags) then
            begin
              if res then
                CGMessage(type_w_comparison_always_true)