summaryrefslogtreecommitdiff
path: root/gcc/ada/sem_warn.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-04-15 08:58:45 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-04-15 08:58:45 +0000
commit235a2f4e3ded35229ea76603beb8716870728d32 (patch)
treef9da83f4485c49d5f6f9716454f8876aa69edf0f /gcc/ada/sem_warn.ads
parente5501a8ecf6bbf6a9f0d5b72bfe5d47d4eadd292 (diff)
downloadgcc-235a2f4e3ded35229ea76603beb8716870728d32.tar.gz
2009-04-15 Thomas Quinot <quinot@adacore.com>
* sem_warn.ads: Minor reformatting 2009-04-15 Ed Schonberg <schonberg@adacore.com> * sem_ch3.adb: better error message for illegal interfaces * sem_ch6.adb (Possible_Freeze): Delay freezing a subprogram if a formal is an incomplete type from a limited_with clause. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@146086 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_warn.ads')
-rw-r--r--gcc/ada/sem_warn.ads8
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/sem_warn.ads b/gcc/ada/sem_warn.ads
index b375b20dd51..3acb6873915 100644
--- a/gcc/ada/sem_warn.ads
+++ b/gcc/ada/sem_warn.ads
@@ -171,10 +171,10 @@ package Sem_Warn is
procedure Check_Low_Bound_Tested (Expr : Node_Id);
-- Expr is the node for a comparison operation. This procedure checks if
-- the comparison is a source comparison of P'First with some other value
- -- and if so, sets the Low_Bound_Tested flag in Expr to suppress warnings
- -- about improper low bound assumptions (we assume that if the code has a
- -- test that explicitly checks X'First, then it is not operating in blind
- -- assumption mode).
+ -- and if so, sets the Low_Bound_Tested flag on entity P to suppress
+ -- warnings about improper low bound assumptions (we assume that if the
+ -- code has a test that explicitly checks P'First, then it is not operating
+ -- in blind assumption mode).
procedure Warn_On_Known_Condition (C : Node_Id);
-- C is a node for a boolean expression resulting from a relational