:mod:`Ahven.Parameters` -- Package ================================== .. ada:module:: Ahven.Parameters .. moduleauthor:: Tero Koskinen ----- Types ----- Parameter_Info '''''''''''''' :: type Parameter_Info is private; Parameter_Mode '''''''''''''' :: type Parameter_Mode is (NORMAL_PARAMETERS, TAP_PARAMETERS); ------------------------ Procedures and Functions ------------------------ Parse_Parameters '''''''''''''''' :: procedure Parse_Parameters (Mode : Parameter_Mode; Info : out Parameter_Info); Parse Ada.Command_Line parameters and put the results to the Info parameter. Raises Invalid_Parameter if some parameter is invalid. Usage ''''' :: procedure Usage (Mode : Parameter_Mode := NORMAL_PARAMETERS); Print usage. Capture ''''''' :: function Capture (Info : Parameter_Info) return Boolean; Should we capture Ada.Text_IO output? Verbose ''''''' :: function Verbose (Info : Parameter_Info) return Boolean; Should we use verbose mode? XML_Results ''''''''''' :: function XML_Results (Info : Parameter_Info) return Boolean; Should we output XML? Single_Test ''''''''''' :: function Single_Test (Info : Parameter_Info) return Boolean; Should we run a single test (case/suite/routine) only? Test_Name ''''''''' :: function Test_Name (Info : Parameter_Info) return String; Return the name of the test passed as a parameter. Result_Dir '''''''''' :: function Result_Dir (Info : Parameter_Info) return String; Return the directory for XML results.