aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorArnaud Charlet <charlet@gcc.gnu.org>2015-10-16 12:56:54 +0200
committerArnaud Charlet <charlet@gcc.gnu.org>2015-10-16 12:56:54 +0200
commite1d458b026a0a0c35e65c7ed6bae29ca1d55da24 (patch)
tree7b3066b72659b6d68cdc501a171f4f82abca3eab
parent1af4455aacd8aeb3a4ca59e7024cc8a0829e4134 (diff)
downloadgcc-e1d458b026a0a0c35e65c7ed6bae29ca1d55da24.zip
gcc-e1d458b026a0a0c35e65c7ed6bae29ca1d55da24.tar.gz
gcc-e1d458b026a0a0c35e65c7ed6bae29ca1d55da24.tar.bz2
[multiple changes]
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 From-SVN: r228872
-rw-r--r--gcc/ada/ChangeLog9
-rw-r--r--gcc/ada/einfo.ads2
-rw-r--r--gcc/ada/rident.ads4
-rw-r--r--gcc/ada/sem_ch12.adb2
4 files changed, 13 insertions, 4 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 050a304..b396593 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 6ca5e5e..49d26fb 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 615e17b..2ebd4f8 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 e848307..6f9c24d 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)