Commit 4586d636 authored by yoogx's avatar yoogx

* Remove Ada.Text_IO.Put_Line and use Ocarina error reporting

parent 9e990bef
......@@ -29,7 +29,6 @@
-- --
------------------------------------------------------------------------------
with Ada.Text_IO; use Ada.Text_IO;
with Locations;
with Ocarina.FE_AADL_BA.Lexer;
......@@ -192,7 +191,8 @@ package body Ocarina.FE_AADL_BA.Parser.Specifications is
Scan_Token;
if Token = T_END_ANNEX then
Put_Line ("Warning : Empty Annex : Behavior Specification ");
DPE (PC_Behavior_Annex, EMC_Annex_Empty,
Fatal => False, Warning => True);
end if;
if Token = T_Variables then
......
......@@ -115,6 +115,7 @@ package Ocarina.FE_AADL_BA.Parser_Errors is
type Error_Message_Code is
(EMC_Error,
EMC_Debug,
EMC_Annex_Empty,
EMC_Execute_Or_Mode_Transition,
EMC_Invalid_Range,
EMC_List_Is_Empty,
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment