Re: basic basic ada question

[Stephen Leake <stephen_leake@stephe-leake.org>]

"markww" <markww@gmail.com> writes:

> Thanks for your response. I just don't understand how to implement it.
> In ada we have a function definition like:
>
> procedure DynamicArray is
> begin
>
>     -- Function body stuff here...
>     -- Where does Argument_Count come from?

The same place argc does in C.

>     
>     -- Where does Argument (0...numArgs) come from?

The same place argv does in C. Except Argument is a function, not an array.

> end DynamicArray;

I think you are missing how packages work in Ada; you need to go back
to your textbook.

Here's a working example:


with Ada.Command_Line;
with Ada.Text_IO;
procedure Demo is
begin
   Ada.Text_IO.Put_Line 
    ("Command line args: " & Integer'Image (Ada.Command_Line.Argument_Count));
   Ada.Text_IO.Put_Line 
    ("First        arg : '" & Ada.Command_Line.Argument (1) & "'");
end;

./demo.exe foo bar
Command line args:  2
First        arg : 'foo'

-- 
-- Stephe