From 01046664b7fb53a64abeb067ece510fbe149609f Mon Sep 17 00:00:00 2001 From: charlet Date: Wed, 15 Jul 2009 09:42:04 +0000 Subject: [PATCH] 2009-07-15 Robert Dewar * g-htable.ads, s-htable.ads: Minor reformatting git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@149667 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/ChangeLog | 4 ++++ gcc/ada/g-htable.ads | 6 +++--- gcc/ada/s-htable.ads | 6 +++--- 3 files changed, 10 insertions(+), 6 deletions(-) diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index c50487b..d8fa823 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,5 +1,9 @@ 2009-07-15 Robert Dewar + * g-htable.ads, s-htable.ads: Minor reformatting + +2009-07-15 Robert Dewar + * switch-c.adb, sem_ch10.adb, sem_warn.adb, sem_warn.ads: Implement new switch -gnatw.g. (Set_GNAT_Mode_Warnings): New procedure. diff --git a/gcc/ada/g-htable.ads b/gcc/ada/g-htable.ads index a158d09..e747637 100644 --- a/gcc/ada/g-htable.ads +++ b/gcc/ada/g-htable.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1995-2008, AdaCore -- +-- Copyright (C) 1995-2009, AdaCore -- -- -- -- 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- -- @@ -103,7 +103,7 @@ package GNAT.HTable is -- function Get_First return Element; -- -- Returns No_Element if the HTable is empty, otherwise returns one - -- -- non specified element. There is no guarantee that 2 calls to + -- -- non specified element. There is no guarantee that two calls to -- -- this function will return the same element. -- function Get_Next return Element; @@ -188,7 +188,7 @@ package GNAT.HTable is -- function Get_First return Elmt_Ptr; -- -- Returns Null_Ptr if the HTable is empty, otherwise returns one - -- -- non specified element. There is no guarantee that 2 calls to + -- -- non specified element. There is no guarantee that two calls to -- -- this function will return the same element. -- function Get_Next return Elmt_Ptr; diff --git a/gcc/ada/s-htable.ads b/gcc/ada/s-htable.ads index bc416ab..fc97cf4 100644 --- a/gcc/ada/s-htable.ads +++ b/gcc/ada/s-htable.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1995-2008, AdaCore -- +-- Copyright (C) 1995-2009, AdaCore -- -- -- -- 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- -- @@ -88,7 +88,7 @@ package System.HTable is function Get_First return Element; -- Returns No_Element if the HTable is empty, otherwise returns one - -- non specified element. There is no guarantee that 2 calls to this + -- non specified element. There is no guarantee that two calls to this -- function will return the same element. function Get_Next return Element; @@ -175,7 +175,7 @@ package System.HTable is function Get_First return Elmt_Ptr; -- Returns Null_Ptr if the HTable is empty, otherwise returns one - -- non specified element. There is no guarantee that 2 calls to this + -- non specified element. There is no guarantee that two calls to this -- function will return the same element. function Get_Next return Elmt_Ptr; -- 2.7.4