https://gcc.gnu.org/g:caa6ba604ca1a8d6c4fbdea2eae64c591d993173
commit r16-1943-gcaa6ba604ca1a8d6c4fbdea2eae64c591d993173 Author: Eric Botcazou <ebotca...@adacore.com> Date: Tue Jun 10 10:35:09 2025 +0200 ada: Fix minor fallout of latest change This adjusts the header of the renamed files and adds missing blank lines. gcc/ada/ChangeLog: * errid.ads: Adjust header to renaming and fix copyright line. * errid.adb: Adjust header to renaming and add blank line. * erroutc-pretty_emitter.ads: Adjust header to renaming. * erroutc-pretty_emitter.adb: Likewise. * erroutc-sarif_emitter.ads: Likewise. * erroutc-sarif_emitter.adb: Likewise. * errsw.ads: Adjust header to renaming and add blank line. * errsw.adb: Likewise. * json_utils.ads: Likewise. * json_utils.adb: Adjust header to renaming. Diff: --- gcc/ada/errid.adb | 3 ++- gcc/ada/errid.ads | 5 +++-- gcc/ada/erroutc-pretty_emitter.adb | 2 +- gcc/ada/erroutc-pretty_emitter.ads | 2 +- gcc/ada/erroutc-sarif_emitter.adb | 2 +- gcc/ada/erroutc-sarif_emitter.ads | 3 +-- gcc/ada/errsw.adb | 3 ++- gcc/ada/errsw.ads | 3 ++- gcc/ada/json_utils.adb | 2 +- gcc/ada/json_utils.ads | 3 ++- 10 files changed, 16 insertions(+), 12 deletions(-) diff --git a/gcc/ada/errid.adb b/gcc/ada/errid.adb index a661fcf1e0be..46d319e2d540 100644 --- a/gcc/ada/errid.adb +++ b/gcc/ada/errid.adb @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . R E P O S I T O R Y -- +-- E R R I D -- -- -- -- B o d y -- -- -- @@ -22,6 +22,7 @@ -- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ + with JSON_Utils; use JSON_Utils; with Output; use Output; diff --git a/gcc/ada/errid.ads b/gcc/ada/errid.ads index acabc3b1dfe8..4d56d73cdf57 100644 --- a/gcc/ada/errid.ads +++ b/gcc/ada/errid.ads @@ -2,11 +2,11 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . R E P O S I T O R Y -- +-- E R R I D -- -- -- -- S p e c -- -- -- --- Copyright (C) 19925, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2025, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -22,6 +22,7 @@ -- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ + with Types; use Types; with Errsw; use Errsw; diff --git a/gcc/ada/erroutc-pretty_emitter.adb b/gcc/ada/erroutc-pretty_emitter.adb index d9bf560dd8d2..72cc03fadb5a 100644 --- a/gcc/ada/erroutc-pretty_emitter.adb +++ b/gcc/ada/erroutc-pretty_emitter.adb @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . P R E T T Y _ E M I T T E R -- +-- E R R O U T C . P R E T T Y _ E M I T T E R -- -- -- -- B o d y -- -- -- diff --git a/gcc/ada/erroutc-pretty_emitter.ads b/gcc/ada/erroutc-pretty_emitter.ads index 3ff0109db639..a4521a26d170 100644 --- a/gcc/ada/erroutc-pretty_emitter.ads +++ b/gcc/ada/erroutc-pretty_emitter.ads @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . P R E T T Y _ E M I T T E R -- +-- E R R O U T C . P R E T T Y _ E M I T T E R -- -- -- -- S p e c -- -- -- diff --git a/gcc/ada/erroutc-sarif_emitter.adb b/gcc/ada/erroutc-sarif_emitter.adb index 90f7a7c73a90..1d4df0c6f691 100644 --- a/gcc/ada/erroutc-sarif_emitter.adb +++ b/gcc/ada/erroutc-sarif_emitter.adb @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . S A R I F _ E M I T T E R -- +-- E R R O U T C . S A R I F _ E M I T T E R -- -- -- -- B o d y -- -- -- diff --git a/gcc/ada/erroutc-sarif_emitter.ads b/gcc/ada/erroutc-sarif_emitter.ads index 9272b545462f..e3953712f85b 100644 --- a/gcc/ada/erroutc-sarif_emitter.ads +++ b/gcc/ada/erroutc-sarif_emitter.ads @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . S A R I F _ E M I T T E R -- +-- E R R O U T C . S A R I F _ E M I T T E R -- -- -- -- S p e c -- -- -- @@ -24,6 +24,5 @@ ------------------------------------------------------------------------------ package Erroutc.SARIF_Emitter is - procedure Print_SARIF_Report; end Erroutc.SARIF_Emitter; diff --git a/gcc/ada/errsw.adb b/gcc/ada/errsw.adb index 511e00d3b93e..1edc8cd615b2 100644 --- a/gcc/ada/errsw.adb +++ b/gcc/ada/errsw.adb @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . D I A G N O S T I C S _ R E P O S I T O R Y -- +-- E R R S W -- -- -- -- B o d y -- -- -- @@ -22,6 +22,7 @@ -- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ + with JSON_Utils; use JSON_Utils; with Output; use Output; diff --git a/gcc/ada/errsw.ads b/gcc/ada/errsw.ads index b6d01304c1ae..93af18296bb3 100644 --- a/gcc/ada/errsw.ads +++ b/gcc/ada/errsw.ads @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . D I A G N O S T I C S _ R E P O S I T O R Y -- +-- E R R S W -- -- -- -- S p e c -- -- -- @@ -22,6 +22,7 @@ -- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ + with Types; use Types; package Errsw is diff --git a/gcc/ada/json_utils.adb b/gcc/ada/json_utils.adb index 61b0693b5352..9d289fb45ff2 100644 --- a/gcc/ada/json_utils.adb +++ b/gcc/ada/json_utils.adb @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . J S O N _ U T I L S -- +-- J S O N _ U T I L S -- -- -- -- B o d y -- -- -- diff --git a/gcc/ada/json_utils.ads b/gcc/ada/json_utils.ads index b251def9a3bb..7a8251c97a49 100644 --- a/gcc/ada/json_utils.ads +++ b/gcc/ada/json_utils.ads @@ -2,7 +2,7 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- D I A G N O S T I C S . J S O N _ U T I L S -- +-- J S O N _ U T I L S -- -- -- -- S p e c -- -- -- @@ -22,6 +22,7 @@ -- Extensive contributions were provided by Ada Core Technologies Inc. -- -- -- ------------------------------------------------------------------------------ + with Types; use Types; package JSON_Utils is