From: Piotr Trojanek <trojanek@adacore.com>
Date: Thu, 7 May 2020 13:52:20 +0000 (+0200)
Subject: [Ada] Fix typo in comment of Get_Index_Subtype
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=cf7cdde51a249ff292b603dc345a19d343461779;p=gcc.git

[Ada] Fix typo in comment of Get_Index_Subtype

gcc/ada/

	* exp_util.ads (Get_Index_Subtype): Fix duplicate "Last".
---

diff --git a/gcc/ada/exp_util.ads b/gcc/ada/exp_util.ads
index e30a4f3bbf7..c0a7e9e3fa8 100644
--- a/gcc/ada/exp_util.ads
+++ b/gcc/ada/exp_util.ads
@@ -725,7 +725,7 @@ package Exp_Util is
    --  (e.g. no access check required if N_Op_Ne Null).
 
    function Get_Index_Subtype (N : Node_Id) return Entity_Id;
-   --  Used for Last, Last, and Length, when the prefix is an array type.
+   --  Used for First, Last, and Length, when the prefix is an array type.
    --  Obtains the corresponding index subtype.
 
    function Get_Stream_Size (E : Entity_Id) return Uint;