aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/exp_ch3.ads
diff options
context:
space:
mode:
authorGary Dismukes <dismukes@adacore.com>2020-04-14 14:13:47 -0400
committerPierre-Marie de Rodat <derodat@adacore.com>2020-06-17 04:14:12 -0400
commit14e75608240f1df215e003c08b8fdbe4a6a9844c (patch)
tree4938955ee7fdec1634b6bb3ec5149c076de1c6d1 /gcc/ada/exp_ch3.ads
parentc602003b6a2552c01d77fd1fdd5f12848743075f (diff)
downloadgcc-14e75608240f1df215e003c08b8fdbe4a6a9844c.zip
gcc-14e75608240f1df215e003c08b8fdbe4a6a9844c.tar.gz
gcc-14e75608240f1df215e003c08b8fdbe4a6a9844c.tar.bz2
[Ada] Various typo corrections plus minor reformatting
2020-06-17 Gary Dismukes <dismukes@adacore.com> gcc/ada/ * exp_ch3.ads (Build_Access_Subprogram_Wrapper_Body): Adjust colon columns; reformat comment. * exp_ch3.adb (Build_Access_Subprogram_Wrapper_Body): Likewise. * sem_ch3.adb (Build_Access_Subprogram_Wrapper): Reformat spec comment and reformat comment in body. (Analyze_Full_Type_Declaration): Reformat comment. (Replace_Type_Name): Fixed three typos, plus reformatting of comment. * sem_prag.adb (Analyze_Pre_Post_Condition): Fix typos. * sem_warn.adb (Warn_On_Overlapping_Actuals): Edit comments: remove hyphen, add missing word.
Diffstat (limited to 'gcc/ada/exp_ch3.ads')
-rw-r--r--gcc/ada/exp_ch3.ads15
1 files changed, 7 insertions, 8 deletions
diff --git a/gcc/ada/exp_ch3.ads b/gcc/ada/exp_ch3.ads
index 12387cf..fcbe83b 100644
--- a/gcc/ada/exp_ch3.ads
+++ b/gcc/ada/exp_ch3.ads
@@ -47,15 +47,14 @@ package Exp_Ch3 is
-- Add a field _parent in the extension part of the record
procedure Build_Access_Subprogram_Wrapper_Body
- (Decl : Node_Id;
+ (Decl : Node_Id;
New_Decl : Node_Id);
- -- Build the wrapper body, which holds the indirect call through
- -- an access_to_subprogram, and whose expansion incorporates the
- -- contracts of the access type declaration. Called from Build_
- -- Access_Subprogram_Wrapper.
- -- Building the wrapper is done during analysis to perform proper
- -- semantic checks on the relevant aspects. The wrapper body could
- -- be simplified to a null body when expansion is disabled ???
+ -- Build the wrapper body, which holds the indirect call through an access-
+ -- to-subprogram, and whose expansion incorporates the contracts of the
+ -- access type declaration. Called from Build_Access_Subprogram_Wrapper.
+ -- Building the wrapper is done during analysis to perform proper semantic
+ -- checks on the relevant aspects. The wrapper body could be simplified to
+ -- a null body when expansion is disabled ???
procedure Build_Discr_Checking_Funcs (N : Node_Id);
-- Builds function which checks whether the component name is consistent