Re: Command_Line question

[Tucker Taft <stt@avercom.net>]

"Peter I. Hansen" wrote:
> 
> Hello
> 
> I'm new to Ada95, and I'm trying to write a program which needs to read
> arguments from the command line. I found out that the Command_Line
> package is the way to go, but something i don't get. for example if I
> have this code :
> 
> WITH Ada.Text_IO;
> WITH Ada.Command_Line;
> WITH Ada.Integer_Text_IO;
> 
> PROCEDURE Test IS
> 
> Num : Natural ;
> NumLength : Natural ;
> 
> BEGIN -- Test
>    Ada.Integer_text_IO.Get( From => Ada.Command_Line.Argument(Number => 1),
>                             Item => Num,
>                             Last => NumLenght);

Generally, it is easier to use "Integer'Value(blah)" than "Integer_Text_IO.Get(...)".
Integer_Text_IO gives you more control, but Integer'Value is usually adequate.
So you could change this to:

     Num := Integer'Value(Ada.Command_Line.Argument(Number => 1));

>    Ada.Integer_Text_IO.Put(Item => Num);
> 
> END Test;
> 
> The question is : Is there a way to do this whitout the 'NumLength'
> variable, or is this just the way things work ?
> 
> /Peter

-- 
-Tucker Taft   stt@avercom.net   http://www.avercom.net
Chief Technology Officer, AverCom Corporation (A Titan Company) 
Bedford, MA  USA (AverCom was formerly the Commercial Division of AverStar:
http://www.averstar.com/~stt)