ACL. Command Line - JulTob/Ada GitHub Wiki

Command Line refers to the call of the executable from the command line. You can use

with Ada.Text_IO;
with Ada.Strings.Unbounded;
with Ada.Command_Line;

procedure Linea_Comandos is

   package ACL renames Ada.Command_Line;
	package ASU renames Ada.Strings.Unbounded;
	use type ASU.Unbounded_String;

	Input_Exception: exception;
	
  begin	
	
	if ACL.Argument_Count /= 2 then
		raise Input_Exception;
		end if;
	
	Ada.Text_Io.Put_Line(ACL.Argument(2));
	
  exception
	when Input_Exception => 
		Ada.Text_Io.Put_Line("Wrong number of inputs");
	
end Linea_Comandos;