aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorEric Botcazou <ebotcazou@adacore.com>2023-01-13 08:53:06 +0100
committerMarc Poulhiès <poulhies@adacore.com>2023-01-16 15:44:55 +0100
commitfe67b75f59c64a9b7cd3b997d406b986c2095cf6 (patch)
treeb7b22b660b5bc455549920146bed0514d73d4edb
parent9cfa7d7e3c3d7144a7b6079e7dc65a38a5327e70 (diff)
downloadgcc-fe67b75f59c64a9b7cd3b997d406b986c2095cf6.zip
gcc-fe67b75f59c64a9b7cd3b997d406b986c2095cf6.tar.gz
gcc-fe67b75f59c64a9b7cd3b997d406b986c2095cf6.tar.bz2
ada: Fix typo in comment
gcc/ada/ * exp_ch3.adb (Make_Allocator_For_Return): Fix typo in comment.
-rw-r--r--gcc/ada/exp_ch3.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/exp_ch3.adb b/gcc/ada/exp_ch3.adb
index daa96df..abe71b2 100644
--- a/gcc/ada/exp_ch3.adb
+++ b/gcc/ada/exp_ch3.adb
@@ -7196,7 +7196,7 @@ package body Exp_Ch3 is
-- We always use the type of the expression for the qualified
-- expression, rather than the return object's type. We cannot
-- always use the return object's type because the expression
- -- might be of a specific type and the result object mignt not.
+ -- might be of a specific type and the return object mignt not.
Alloc :=
Make_Allocator (Loc,