aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada/sem_prag.adb
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/ada/sem_prag.adb')
-rw-r--r--gcc/ada/sem_prag.adb7
1 files changed, 3 insertions, 4 deletions
diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb
index 8798fa1..dad23da 100644
--- a/gcc/ada/sem_prag.adb
+++ b/gcc/ada/sem_prag.adb
@@ -1382,8 +1382,7 @@ package body Sem_Prag is
-- (Output =>+ null)
- -- Remove the null input and replace it with a copy of the
- -- output:
+ -- Remove null input and replace it with a copy of the output:
-- (Output => Output)
@@ -1459,8 +1458,8 @@ package body Sem_Prag is
Propagate_Output (Output, Inputs);
-- A list with multiple outputs is slowly trimmed until only
- -- one element remains. When this happens, replace the
- -- aggregate with the element itself.
+ -- one element remains. When this happens, replace aggregate
+ -- with the element itself.
if Multiple then
Remove (Output);