diff options
author | Bob Duff <duff@adacore.com> | 2021-10-21 09:54:13 -0400 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-10-25 15:07:21 +0000 |
commit | 83e6be717c5bc9817c1a344627929642547e104f (patch) | |
tree | 09d119fd2d1dd7d6caf5fbc6f5e07d8f3e64fb16 /gcc | |
parent | 034c3117520f33bc108afc930c16b220041e4a97 (diff) | |
download | gcc-83e6be717c5bc9817c1a344627929642547e104f.zip gcc-83e6be717c5bc9817c1a344627929642547e104f.tar.gz gcc-83e6be717c5bc9817c1a344627929642547e104f.tar.bz2 |
[Ada] Fix a comment
gcc/ada/
* inline.adb (Establish_Actual_Mapping_For_Inlined_Call): Fix
comment.
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/ada/inline.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/inline.adb b/gcc/ada/inline.adb index 16a9894..08c454d 100644 --- a/gcc/ada/inline.adb +++ b/gcc/ada/inline.adb @@ -2894,7 +2894,7 @@ package body Inline is if Present (Renamed_Object (F)) then -- If expander is active, it is an error to try to inline a - -- recursive program. In GNATprove mode, just indicate that the + -- recursive subprogram. In GNATprove mode, just indicate that the -- inlining will not happen, and mark the subprogram as not always -- inlined. |