diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-10-16 10:56:54 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2015-10-16 10:56:54 +0000 |
| commit | 678166e6129ac539c9dcdc8bcde678d5d34cfa15 (patch) | |
| tree | 7b3066b72659b6d68cdc501a171f4f82abca3eab | |
| parent | 30f8d103263824fb491d557cc6554c6e41c4c8bf (diff) | |
| download | gcc-678166e6129ac539c9dcdc8bcde678d5d34cfa15.tar.gz | |
2015-10-16 Gary Dismukes <dismukes@adacore.com>
* sem_ch12.adb: Minor reformatting/rewording.
2015-10-16 Arnaud Charlet <charlet@adacore.com>
* einfo.ads: Minor fix of duplicate words
* rident.ads: Minor style fix in comment
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@228872 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/ada/ChangeLog | 9 | ||||
| -rw-r--r-- | gcc/ada/einfo.ads | 2 | ||||
| -rw-r--r-- | gcc/ada/rident.ads | 4 | ||||
| -rw-r--r-- | gcc/ada/sem_ch12.adb | 2 |
4 files changed, 13 insertions, 4 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 050a304ea73..b396593ee2a 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,12 @@ +2015-10-16 Gary Dismukes <dismukes@adacore.com> + + * sem_ch12.adb: Minor reformatting/rewording. + +2015-10-16 Arnaud Charlet <charlet@adacore.com> + + * einfo.ads: Minor fix of duplicate words + * rident.ads: Minor style fix in comment + 2015-10-16 Hristian Kirtchev <kirtchev@adacore.com> * exp_ch3.adb (Expand_N_Full_Type_Declaration): Do not capture, diff --git a/gcc/ada/einfo.ads b/gcc/ada/einfo.ads index 6ca5e5e0140..49d26fb5078 100644 --- a/gcc/ada/einfo.ads +++ b/gcc/ada/einfo.ads @@ -1525,7 +1525,7 @@ package Einfo is -- node will be present on the rep item chain for the entity. For a -- derived type that inherits a default from its ancestor, the default -- value is set, but it may be overridden by an aspect declaration on --- type type derivation. +-- type derivation. -- Has_Default_Init_Cond (Flag3) [base type only] -- Defined in all type entities. Set if pragma Default_Initial_Condition diff --git a/gcc/ada/rident.ads b/gcc/ada/rident.ads index 615e17bfc78..2ebd4f8f034 100644 --- a/gcc/ada/rident.ads +++ b/gcc/ada/rident.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2012, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2015, 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- -- @@ -42,7 +42,7 @@ -- Rather than have clients instantiate System.Rident directly, we have the -- single instantiation here at the library level, which means that we only --- have one copy of the image tables +-- have one copy of the image tables. with System.Rident; diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index e848307fdb8..6f9c24d6e0a 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -2824,7 +2824,7 @@ package body Sem_Ch12 is Set_Is_Dispatching_Operation (Nam); -- A formal abstract procedure cannot have a null default - -- (RM 12.6(4 1.2)). + -- (RM 12.6(4.1/2)). if Nkind (Spec) = N_Procedure_Specification and then Null_Present (Spec) |