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 --git a/gcc/ada/diagnostics-sarif_emitter.adb b/gcc/ada/diagnostics-sarif_emitter.adb
index cbb423b2e1ddaaddf86c8060d745da05a60cedae..fe251f9754dbca01f58f4d7e2d8d3a2d107d9475 100644 (file)
--- 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;