Commit fd043de2 authored by Maxime Perrotin's avatar Maxime Perrotin
Browse files

Detect data views that don't have the new constructs

parent e2bfecd9
......@@ -139,7 +139,14 @@ package body TASTE.AADL_Parser is
Result.Deployment_View := Parse_Deployment_View (Deployment_Root);
end if;
Result.Data_View := Parse_Data_View (Dataview_root);
if Result.Configuration.Data_View.all'Length > 0 then
begin
Result.Data_View := Parse_Data_View (Dataview_root);
exception
when Constraint_Error =>
raise Data_View_Error with "Update your data view!";
end;
end if;
Ocarina.Configuration.Reset_Modules;
Ocarina.Reset;
......
package TASTE.Parser_Version is
Parser_Release : constant String :=
"5cc18f3 ; Commit Date: Thu Jan 4 10:12:46 2018 ";
"e2bfecd ; Commit Date: Mon Jan 15 17:32:54 2018 ";
Ocarina_Version : constant String :=
"Ocarina 2017.x (Working Copy from r0b92ed3)";
end TASTE.Parser_Version;
\ No newline at end of file
Supports Markdown
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