From: Bob Duff <duff@adacore.com>
Date: Wed, 30 May 2018 08:57:38 +0000 (+0000)
Subject: [Ada] Minor comment rework in GNAT.Secondary_Stack_Info
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=83d849a82572a11104ea861b16ca5a8a6451ae3b;p=gcc.git

[Ada] Minor comment rework in GNAT.Secondary_Stack_Info

2018-05-30  Bob Duff  <duff@adacore.com>

gcc/ada/

	* libgnat/g-sestin.ads: Rework documentation comments.

From-SVN: r260936
---

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 8a5b510269d..330a11e7ab6 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2018-05-30  Bob Duff  <duff@adacore.com>
+
+	* libgnat/g-sestin.ads: Rework documentation comments.
+
 2018-05-30  Piotr Trojanek  <trojanek@adacore.com>
 
 	* errout.adb, exp_aggr.adb, exp_ch7.adb, exp_util.adb, lib.adb,
diff --git a/gcc/ada/libgnat/g-sestin.ads b/gcc/ada/libgnat/g-sestin.ads
index 82ab2001162..58ad3fc9239 100644
--- a/gcc/ada/libgnat/g-sestin.ads
+++ b/gcc/ada/libgnat/g-sestin.ads
@@ -30,7 +30,7 @@
 ------------------------------------------------------------------------------
 
 --  This package provides facilities for obtaining information on secondary
---  stack usage.
+--  stack usage. See System.Secondary_Stack for documentation.
 
 with System.Secondary_Stack;
 
@@ -38,11 +38,5 @@ package GNAT.Secondary_Stack_Info is
 
    function SS_Get_Max return Long_Long_Integer
      renames System.Secondary_Stack.SS_Get_Max;
-   --  Return maximum used space in storage units for the current secondary
-   --  stack. For a dynamically allocated secondary stack, the returned
-   --  result is always -1. For a statically allocated secondary stack,
-   --  the returned value shows the largest amount of space allocated so
-   --  far during execution of the program to the current secondary stack,
-   --  i.e. the secondary stack for the current task.
 
 end GNAT.Secondary_Stack_Info;