[Ada] Fix layout of pragma Inline in generated AST unit

gcc/ada/

	* gen_il-gen.adb (Put_Make_Decls): Put pragma Inline in a
	dedicated line, so that the current indentation is taken into
	account.
This commit is contained in:
Piotr Trojanek 2021-12-21 15:44:47 +01:00 committed by Pierre-Marie de Rodat
parent 8313d0ee55
commit 22a69380dc

View file

@ -2472,7 +2472,8 @@ package body Gen_IL.Gen is
for T in First_Concrete (Root) .. Last_Concrete (Root) loop
if T not in N_Unused_At_Start | N_Unused_At_End then
Put_Make_Spec (S, Root, T);
Put (S, ";" & LF & "pragma " & Inline & " (Make_" &
Put (S, ";" & LF);
Put (S, "pragma " & Inline & " (Make_" &
Image_Sans_N (T) & ");" & LF & LF);
end if;
end loop;