summaryrefslogtreecommitdiff
path: root/gcc/ada/sem_ch10.adb
diff options
context:
space:
mode:
authorcharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-07-22 10:39:30 +0000
committercharlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4>2009-07-22 10:39:30 +0000
commit2f1aac99b60b55722a9d79ba7202a84bc5f3cf7e (patch)
treec5a8963e970a6abe500cd73f739c2b706386f685 /gcc/ada/sem_ch10.adb
parenta67a63e2f256e0ea10297c519be188f09c4a8189 (diff)
downloadgcc-2f1aac99b60b55722a9d79ba7202a84bc5f3cf7e.tar.gz
2009-07-22 Thomas Quinot <quinot@adacore.com>
* sem_util.adb, sem_ch10.adb: Minor reformatting * g-socket.adb (Receive_Socket, recvfrom(2) variant): Apply required special handling for the case of no data received and Item'First = Stream_Element_Offset'First. (Last_Index): New subprogram factoring the above special handling over the various locations where it is required. 2009-07-22 Arnaud Charlet <charlet@adacore.com> * gnat1drv.adb (Gnat1drv): Also disable division by zero and alignment checks in CodePeer_Mode. * gcc-interface/Make-lang.in: Update dependencies. 2009-07-22 Ed Schonberg <schonberg@adacore.com> * sem_aggr.adb: Improve error message. * sem_ch13.adb: If Ignore_Rep_Clauses is enabled, do a minimal analysis of an address representation clause. * freeze.adb (Freeze_Static_Object): An local imported object is legal if it has an address clause. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149926 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/sem_ch10.adb')
-rw-r--r--gcc/ada/sem_ch10.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_ch10.adb b/gcc/ada/sem_ch10.adb
index 88edbcc56e2..6475bdde1dc 100644
--- a/gcc/ada/sem_ch10.adb
+++ b/gcc/ada/sem_ch10.adb
@@ -665,7 +665,7 @@ package body Sem_Ch10 is
-- loading, we set the Context_Pending flag on the current unit. If the
-- flag is already set there is a potential circularity.
-- We exclude predefined units from this check because they are known
- -- to be safe. we also exclude package bodies that are present because
+ -- to be safe. We also exclude package bodies that are present because
-- circularities between bodies are harmless (and necessary).
if Context_Pending (N) then