package Ada.Command_Line is pragma Preelaborate(Command_Line); function Argument_Count return Natural; function Argument (Number : in Positive) return String; function Command_Name return String; type Status is range implementation-defined; Success : constant Status; Failure : constant Status; procedure Set_Status (Code : in Status); private ... -notspecifiedbythelanguage end Ada.Command_Line;