with Ada.Text_IO;
with Ada.Command_Line;
 
procedure Args is
   package IO renames Ada.Text_IO;
   package CLI renames Ada.Command_Line;
begin
   IO.Put_Line (Item => "Argument Count:" & CLI.Argument_Count'Img);
   IO.Put_Line (CLI.Command_Name);
end Args;

Go back


Trace: • ada.command_line • ada.containers.vectors • the_dice_roller_program • variables_and_constants • the_hello_world_program • ada.environment_variables • ada.containers.doubly_linked_lists • ada.command_line.argument_example_source • ada.environment_variables.set_example_source • ada.command_line.command_name_example_source

Navigation