[gcc r15-4908] ada: Add Schema to the SARIF report

[Marc Poulhi?s via Gcc-cvs]

https://gcc.gnu.org/g:8314fdc7f352c2cd90fe0bfd6a87af48807bf65c

commit r15-4908-g8314fdc7f352c2cd90fe0bfd6a87af48807bf65c
Author: Viljar Indus <in...@adacore.com>
Date:   Fri Oct 11 13:19:04 2024 +0300

    ada: Add Schema to the SARIF report
    
    gcc/ada/ChangeLog:
    
            * diagnostics-sarif_emitter.adb (Print_SARIF_Report): Add a
            Schema field to the SARIF report.

Diff:
---
 gcc/ada/diagnostics-sarif_emitter.adb | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

diff --git a/gcc/ada/diagnostics-sarif_emitter.adb 
b/gcc/ada/diagnostics-sarif_emitter.adb
index cbb423b2e1dd..fe251f9754db 100644
--- a/gcc/ada/diagnostics-sarif_emitter.adb
+++ b/gcc/ada/diagnostics-sarif_emitter.adb
@@ -31,6 +31,14 @@ with Sinput;                 use Sinput;
 
 package body Diagnostics.SARIF_Emitter is
 
+   --  We are currently using SARIF 2.1.0
+
+   SARIF_Version : constant String := "2.1.0";
+   pragma Style_Checks ("M100");
+   SARIF_Schema  : constant String :=
+     
"https://docs.oasis-open.org/sarif/sarif/v2.1.0/errata01/os/schemas/sarif-schema-2.1.0.json";;
+   pragma Style_Checks ("M79");
+
    type Artifact_Change is record
       File  : String_Ptr;
       --  Name of the file
@@ -1074,7 +1082,11 @@ package body Diagnostics.SARIF_Emitter is
       Begin_Block;
       NL_And_Indent;
 
-      Write_String_Attribute ("version", "2.1.0");
+      Write_String_Attribute ("$schema", SARIF_Schema);
+      Write_Char (',');
+      NL_And_Indent;
+
+      Write_String_Attribute ("version", SARIF_Version);
       Write_Char (',');
       NL_And_Indent;