Commit 9902f04b authored by yoogx's avatar yoogx
Browse files

* Remove Usage function

parent bfe21ee9
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
-- -- -- --
-- B o d y -- -- B o d y --
-- -- -- --
-- Copyright (C) 2008-2009 Telecom ParisTech, 2010-2015 ESA & ISAE. -- -- Copyright (C) 2008-2009 Telecom ParisTech, 2010-2016 ESA & ISAE. --
-- -- -- --
-- Ocarina is free software; you can redistribute it and/or modify under -- -- 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- -- -- terms of the GNU General Public License as published by the Free Soft- --
...@@ -29,15 +29,11 @@ ...@@ -29,15 +29,11 @@
-- -- -- --
------------------------------------------------------------------------------ ------------------------------------------------------------------------------
with Ocarina.Output;
with Ocarina.FE_AADL.Parser; with Ocarina.FE_AADL.Parser;
with Ocarina.ME_AADL.Tokens; with Ocarina.ME_AADL.Tokens;
package body Ocarina.FE_AADL is package body Ocarina.FE_AADL is
use Ocarina.Output;
---------- ----------
-- Init -- -- Init --
---------- ----------
...@@ -59,28 +55,4 @@ package body Ocarina.FE_AADL is ...@@ -59,28 +55,4 @@ package body Ocarina.FE_AADL is
null; null;
end Reset; end Reset;
-----------
-- Usage --
-----------
procedure Usage is
begin
Write_Line (" -y Automatically load AADL files on demand");
Write_Line (" -f Parse predefined non standard property sets");
Write_Line (" -i Instantiate the AADL model");
Write_Line (" -r <name> The name of the instance tree root");
Write_Line (" -o Specify output file");
Write_Line (" -I Specify the inclusion paths");
Write_Str (" -aadlv1 Use AADL v1 standard");
if Default_AADL_Version = AADL_V1 then
Write_Str (" (default)");
end if;
Write_Eol;
Write_Str (" -aadlv2 Use AADL v2 standard");
if Default_AADL_Version = AADL_V2 then
Write_Str (" (default)");
end if;
Write_Eol;
end Usage;
end Ocarina.FE_AADL; end Ocarina.FE_AADL;
...@@ -6,7 +6,7 @@ ...@@ -6,7 +6,7 @@
-- -- -- --
-- S p e c -- -- S p e c --
-- -- -- --
-- Copyright (C) 2008-2009 Telecom ParisTech, 2010-2015 ESA & ISAE. -- -- Copyright (C) 2008-2009 Telecom ParisTech, 2010-2016 ESA & ISAE. --
-- -- -- --
-- Ocarina is free software; you can redistribute it and/or modify under -- -- 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- -- -- terms of the GNU General Public License as published by the Free Soft- --
...@@ -39,6 +39,4 @@ package Ocarina.FE_AADL is ...@@ -39,6 +39,4 @@ package Ocarina.FE_AADL is
procedure Reset; procedure Reset;
-- Resets the parser and the printer -- Resets the parser and the printer
procedure Usage;
end Ocarina.FE_AADL; end Ocarina.FE_AADL;
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