https://gcc.gnu.org/g:99574f2500631b48c2d267bbb53421b8c5986516
commit r17-944-g99574f2500631b48c2d267bbb53421b8c5986516 Author: Piotr Trojanek <[email protected]> Date: Tue Mar 10 16:18:13 2026 +0100 ada: Require compilation unit to have no indentation We had a style check for compilation unit to start at column number which is multiple of indentation value. Now we require compilation units to no have no indentation. gcc/ada/ChangeLog: * par-ch10.adb (P_Compilation_Unit): Require no indentation. Diff: --- gcc/ada/par-ch10.adb | 13 +++++++++++-- 1 file changed, 11 insertions(+), 2 deletions(-) diff --git a/gcc/ada/par-ch10.adb b/gcc/ada/par-ch10.adb index 7b019662f7f2..a2e112758830 100644 --- a/gcc/ada/par-ch10.adb +++ b/gcc/ada/par-ch10.adb @@ -336,8 +336,17 @@ package body Ch10 is Set_Keyword_Casing (Current_Source_File, Determine_Token_Casing); - if Style_Check then - Style.Check_Indentation; + -- For most column style checks, we only test that the first non-blank + -- character is on a column multiple of the indentation value. But here + -- the only reasonable choice seems to start at the first column, so we + -- test for that instead. + + if RM_Column_Check + and then Token_Is_At_Start_Of_Line + and then Start_Column /= 0 + then + Error_Msg_BC -- CODEFIX + ("(style) incorrect layout?l?"); end if; -- Remaining processing depends on particular type of compilation unit
