From: Arnaud Charlet <charlet@adacore.com>
Date: Wed, 18 Sep 2019 08:31:42 +0000 (+0000)
Subject: [Ada] System.Stack_Usage: fix a typo
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=aeb68a2b4729e5b918b996c0ab11d34466164cfb;p=gcc.git

[Ada] System.Stack_Usage: fix a typo

2019-09-18  Arnaud Charlet  <charlet@adacore.com>

gcc/ada/

	* libgnat/s-stausa.adb: Fix a typo

From-SVN: r275840
---

diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index d4c51d102d7..8ee1422dc32 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,7 @@
+2019-09-18  Arnaud Charlet  <charlet@adacore.com>
+
+	* libgnat/s-stausa.adb: Fix a typo
+
 2019-09-18  Bob Duff  <duff@adacore.com>
 
 	* libgnat/a-cbhama.adb, libgnat/a-cbhase.adb,
diff --git a/gcc/ada/libgnat/s-stausa.adb b/gcc/ada/libgnat/s-stausa.adb
index f93d1d9bdd5..597634a479b 100644
--- a/gcc/ada/libgnat/s-stausa.adb
+++ b/gcc/ada/libgnat/s-stausa.adb
@@ -42,7 +42,7 @@ package body System.Stack_Usage is
    -- Stack_Slots --
    -----------------
 
-   --  Stackl_Slots is an internal data type to represent a sequence of real
+   --  Stack_Slots is an internal data type to represent a sequence of real
    --  stack slots initialized with a provided pattern, with operations to
    --  abstract away the target call stack growth direction.