Commit 3ddd55de authored by Jerome Hugues's avatar Jerome Hugues

* On_Generate: return value based on the number of errors

          spotted during backend execution
parent 10d3c22a
......@@ -6,7 +6,7 @@
-- --
-- B o d y --
-- --
-- Copyright (C) 2014-2015 ESA & ISAE. --
-- Copyright (C) 2014-2016 ESA & ISAE. --
-- --
-- Ocarina is free software; you can redistribute it and/or modify under --
-- terms of the GNU General Public License as published by the Free Soft- --
......@@ -242,6 +242,7 @@ package body Ocarina.Python_Cmd is
pragma Unreferenced (Command);
begin
Ocarina.Utils.Generate (Nth_Arg (Data, 1, ""));
Set_Return_Value (Data, Errors.N_Errors = 0);
end On_Generate;
---------------------
......@@ -444,8 +445,6 @@ package body Ocarina.Python_Cmd is
-- On_Get_Property_Sets --
--------------------------
-- procedure Get_PropertyBinding return Node_List;
procedure On_Get_Property_Sets
(Data : in out Callback_Data'Class; Command : String);
......
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