Re: Create-Delete tmp Files

[Achim Gerhard <achim_g@my-deja.com>]

In article <649110192wnr@natron.demon.co.uk>,
Roger@natron.demon.co.uk wrote:
>
> Where and how is "the_file" declared ?
>
Roger,
this is the whole Ada code (the main program)
with Text_IO;
procedure IO_Test
is
the_file : Text_IO.File_Type;
begin
for i in integer range 1 .. 100_000 loop
Text_IO.Create ( File => the_file, Mode => Text_IO.OUT_File );
Text_IO.Reset ( File => the_file, Mode => Text_IO.IN_File );
Text_IO.Delete ( File => the_file );
end loop;
end IO_Test;
Regards,
Achim
> --
> Roger Barnett
>
>
--
_ _
/A/G


Sent via Deja.com http://www.deja.com/
Before you buy.