Commit 1b73fbc4 by Robert Dewar Committed by Arnaud Charlet

g-htable.ads, [...]: Minor reformatting

2009-07-15  Robert Dewar  <dewar@adacore.com>

	* g-htable.ads, s-htable.ads: Minor reformatting

From-SVN: r149667
parent 6b3fc735
2009-07-15 Robert Dewar <dewar@adacore.com> 2009-07-15 Robert Dewar <dewar@adacore.com>
* g-htable.ads, s-htable.ads: Minor reformatting
2009-07-15 Robert Dewar <dewar@adacore.com>
* switch-c.adb, sem_ch10.adb, sem_warn.adb, sem_warn.ads: Implement * switch-c.adb, sem_ch10.adb, sem_warn.adb, sem_warn.ads: Implement
new switch -gnatw.g. new switch -gnatw.g.
(Set_GNAT_Mode_Warnings): New procedure. (Set_GNAT_Mode_Warnings): New procedure.
......
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
-- -- -- --
-- S p e c -- -- 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 -- -- 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- -- -- terms of the GNU General Public License as published by the Free Soft- --
...@@ -103,7 +103,7 @@ package GNAT.HTable is ...@@ -103,7 +103,7 @@ package GNAT.HTable is
-- function Get_First return Element; -- function Get_First return Element;
-- -- Returns No_Element if the HTable is empty, otherwise returns one -- -- 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. -- -- this function will return the same element.
-- function Get_Next return Element; -- function Get_Next return Element;
...@@ -188,7 +188,7 @@ package GNAT.HTable is ...@@ -188,7 +188,7 @@ package GNAT.HTable is
-- function Get_First return Elmt_Ptr; -- function Get_First return Elmt_Ptr;
-- -- Returns Null_Ptr if the HTable is empty, otherwise returns one -- -- 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. -- -- this function will return the same element.
-- function Get_Next return Elmt_Ptr; -- function Get_Next return Elmt_Ptr;
......
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
-- -- -- --
-- S p e c -- -- 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 -- -- 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- -- -- terms of the GNU General Public License as published by the Free Soft- --
...@@ -88,7 +88,7 @@ package System.HTable is ...@@ -88,7 +88,7 @@ package System.HTable is
function Get_First return Element; function Get_First return Element;
-- Returns No_Element if the HTable is empty, otherwise returns one -- 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 will return the same element.
function Get_Next return Element; function Get_Next return Element;
...@@ -175,7 +175,7 @@ package System.HTable is ...@@ -175,7 +175,7 @@ package System.HTable is
function Get_First return Elmt_Ptr; function Get_First return Elmt_Ptr;
-- Returns Null_Ptr if the HTable is empty, otherwise returns one -- 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 will return the same element.
function Get_Next return Elmt_Ptr; function Get_Next return Elmt_Ptr;
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment