summaryrefslogtreecommitdiff
path: root/gcc/ada/errout.ads
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2012-01-23 08:30:37 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2012-01-23 08:30:37 +0000
commit2691091b50f527d069c7a9a436745b6d70c6e6dd (patch)
tree7c32d49d1df71d989f2d62c9a87a67fc204c41ba /gcc/ada/errout.ads
parentaf8e12d00e892ddf09c379cad3d2005df3e64751 (diff)
downloadgcc-2691091b50f527d069c7a9a436745b6d70c6e6dd.tar.gz
2012-01-23 Hristian Kirtchev <kirtchev@adacore.com>
* freeze.adb (Check_Current_Instance): Issue an error when the prefix of 'Unchecked_Access or 'Access does not denote a legal aliased view of a type. (Freeze_Record_Type): Do not halt the processing of record components once the Has_Controlled_Component is set as this bypasses the remaining checks. (Is_Aliased_View_Of_Type): New routine. 2012-01-23 Thomas Quinot <quinot@adacore.com> * errout.ads, freeze.adb: Minor reformatting. 2012-01-23 Thomas Quinot <quinot@adacore.com> * sem_ch10.adb, sem_prag.adb: Remove redundant apostrophes in error messages. 2012-01-23 Olivier Hainque <hainque@adacore.com> * adadecode.c (__gnat_decode): Deal with empty input early, preventing potential erroneous memory access later on. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@183407 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/errout.ads')
-rw-r--r--gcc/ada/errout.ads4
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/errout.ads b/gcc/ada/errout.ads
index ea83a8a7b45..dc444f04b81 100644
--- a/gcc/ada/errout.ads
+++ b/gcc/ada/errout.ads
@@ -6,7 +6,7 @@
-- --
-- S p e c --
-- --
--- Copyright (C) 1992-2011, Free Software Foundation, Inc. --
+-- Copyright (C) 1992-2012, Free Software Foundation, Inc. --
-- --
-- GNAT is free software; you can redistribute it and/or modify it under --
-- terms of the GNU General Public License as published by the Free Soft- --
@@ -445,7 +445,7 @@ package Errout is
Error_Msg_Qual_Level : Int renames Err_Vars.Error_Msg_Qual_Level;
-- Number of levels of qualification required for type name (see the
- -- description of the } insertion character. Note that this value does
+ -- description of the } insertion character). Note that this value does
-- note get reset by any Error_Msg call, so the caller is responsible
-- for resetting it.