diff options
author | Piotr Trojanek <trojanek@adacore.com> | 2021-09-06 13:30:43 +0200 |
---|---|---|
committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2021-10-04 08:45:12 +0000 |
commit | 861dc87d7513f920365f0cf52be7406ca06711cf (patch) | |
tree | 7777d55d9014e11d3c671d88eff5396fd410f9b8 /gcc/ada/gen_il-gen.adb | |
parent | aa40952cda882dd9e6a116247281aeeac0d38baa (diff) | |
download | gcc-861dc87d7513f920365f0cf52be7406ca06711cf.zip gcc-861dc87d7513f920365f0cf52be7406ca06711cf.tar.gz gcc-861dc87d7513f920365f0cf52be7406ca06711cf.tar.bz2 |
[Ada] Fix indentation in generated AST construction functions
gcc/ada/
* gen_il-gen.adb (Put_Make_Spec): Don't emit the LF character in
the middle of a string, because the Put routine won't indent it
properly.
Diffstat (limited to 'gcc/ada/gen_il-gen.adb')
-rw-r--r-- | gcc/ada/gen_il-gen.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/gen_il-gen.adb b/gcc/ada/gen_il-gen.adb index 9983e10..e786251 100644 --- a/gcc/ada/gen_il-gen.adb +++ b/gcc/ada/gen_il-gen.adb @@ -2423,7 +2423,8 @@ package body Gen_IL.Gen is end if; end loop; - Put (S, ")" & LF & "return " & Node_Or_Entity (Root) & "_Id"); + Put (S, ")" & LF); + Put (S, "return " & Node_Or_Entity (Root) & "_Id"); Decrease_Indent (S, 2); Decrease_Indent (S, 1); end Put_Make_Spec; |