* Rework warning message for non supported annexes

src/core/mgmt/ocarina-parser.adb

@@ -32,6 +32,7 @@
 ------------------------------------------------------------------------------
 
 with Charset;   use Charset;
+with Errors;    use Errors;
 with Namet;     use Namet;
 with Output;    use Output;
 
@@ -67,9 +68,10 @@ package body Ocarina.Parser is
          end if;
       end loop;
 
-      Set_Standard_Error;
-      Write_Line ("Cannot find language " & Get_Name_String (Language));
-      Set_Standard_Output;
+      Error_Loc (1) := From;
+      Error_Name (1) := Language;
+      Display_Warning ("no support provided for annex language %");
+
       return AADL_Root;
    end Parse;
 

tests/SAE-standard-examples-01192009/example_008.aadl.out

-Cannot find language error_model
+example_008.aadl:12:19: warning: no support provided for annex language error_model
 example_008.aadl:14:15: warning: negative exponent in integer literal
 example_008.aadl:10:29: Sampling::Sample (entity reference) qualified reference name not found in 'with' statements of Test (package specification) 
 example_008.aadl:11:32: Sampling::Sample (entity reference) qualified reference name not found in 'with' statements of Test (package specification)