public inbox for gcc-cvs@sourceware.org
help / color / mirror / Atom feed
* [gcc/devel/autopar_devel] [Ada] Add early return to Apply_Universal_Integer_Attribute_Checks
@ 2020-08-22 22:44 Giuliano Belinassi
  0 siblings, 0 replies; only message in thread
From: Giuliano Belinassi @ 2020-08-22 22:44 UTC (permalink / raw)
  To: gcc-cvs

https://gcc.gnu.org/g:52213be968dea2f193508f9d288e67c04645dc5b

commit 52213be968dea2f193508f9d288e67c04645dc5b
Author: Eric Botcazou <ebotcazou@adacore.com>
Date:   Mon Apr 20 13:04:45 2020 +0200

    [Ada] Add early return to Apply_Universal_Integer_Attribute_Checks
    
    2020-06-17  Eric Botcazou  <ebotcazou@adacore.com>
    
    gcc/ada/
    
            * checks.adb (Apply_Universal_Integer_Attribute_Checks): Do not do
            anything when the type of the node is already Universal_Integer.

Diff:
---
 gcc/ada/checks.adb | 5 +++++
 1 file changed, 5 insertions(+)

diff --git a/gcc/ada/checks.adb b/gcc/ada/checks.adb
index 43829516c56..ad60a45273d 100644
--- a/gcc/ada/checks.adb
+++ b/gcc/ada/checks.adb
@@ -3823,6 +3823,11 @@ package body Checks is
       if Inside_A_Generic then
          return;
 
+      --  Nothing to do if the result type is universal integer
+
+      elsif Typ = Universal_Integer then
+         return;
+
       --  Nothing to do if checks are suppressed
 
       elsif Range_Checks_Suppressed (Typ)


^ permalink raw reply	[flat|nested] only message in thread
only message in thread, other threads:[~2020-08-22 22:44 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2020-08-22 22:44 [gcc/devel/autopar_devel] [Ada] Add early return to Apply_Universal_Integer_Attribute_Checks Giuliano Belinassi

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).