From b80646f049a529e178a97793714aed337a49abcd Mon Sep 17 00:00:00 2001 From: charlet Date: Wed, 20 Apr 2016 10:43:18 +0000 Subject: [PATCH] Minor reformatting. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@235262 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/exp_unst.ads | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/gcc/ada/exp_unst.ads b/gcc/ada/exp_unst.ads index d455175ca14e..e6b7c5c44467 100644 --- a/gcc/ada/exp_unst.ads +++ b/gcc/ada/exp_unst.ads @@ -681,13 +681,13 @@ package Exp_Unst is function Get_Level (Subp : Entity_Id; Sub : Entity_Id) return Nat; -- Sub is either Subp itself, or a subprogram nested within Subp. This -- function returns the level of nesting (Subp = 1, subprograms that - -- are immediately nested within Subp = 2, etc). + -- are immediately nested within Subp = 2, etc.). function Subp_Index (Sub : Entity_Id) return SI_Type; - -- Given the entity for a subprogram, return corresponding Subps index + -- Given the entity for a subprogram, return corresponding Subp's index procedure Unnest_Subprogram (Subp : Entity_Id; Subp_Body : Node_Id); - -- Subp is a library level subprogram which has nested subprograms, and + -- Subp is a library-level subprogram which has nested subprograms, and -- Subp_Body is the corresponding N_Subprogram_Body node. This procedure -- declares the AREC types and objects, adds assignments to the AREC record -- as required, defines the xxxPTR types for uplevel referenced objects, -- 2.47.3