From mboxrd@z Thu Jan  1 00:00:00 1970
X-Spam-Checker-Version: SpamAssassin 3.4.4 (2020-01-24) on polar.synack.me
X-Spam-Level: *
X-Spam-Status: No, score=1.3 required=5.0 tests=BAYES_00,INVALID_MSGID,
	MSGID_RANDY autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,dc393c3a10696107,start
X-Google-Attributes: gid103376,public
From: Achim Gerhard <achim_g@my-deja.com>
Subject: Create-Delete tmp Files
Date: 2000/03/17
Message-ID: <8at7g0$bhc$1@nnrp1.deja.com>#1/1
X-Deja-AN: 598718065
X-Http-Proxy: 1.0 x43.deja.com:80 (Squid/1.1.22) for client 195.243.118.226
Organization: Deja.com - Before you buy.
X-Article-Creation-Date: Fri Mar 17 12:12:52 2000 GMT
X-MyDeja-Info: XMYDJUIDachim_g
Newsgroups: comp.lang.ada
X-Http-User-Agent: Mozilla/4.7 [en] (WinNT; I)
Date: 2000-03-17T00:00:00+00:00
List-Id: <comp.lang.ada>

Hi all,
is this legal Ada code?
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;
The background is:
in an application I use a temporary file. First i create a (noname) file
and write some stuff into that file. After that, I want to read that
stuff. So, I'll open that file as In_File and read from the beginning
(reset...).
Finally I throw away that file (delete).
The main things Create/Reset/Delete are written in the code fragment
above.
I don't see anything illegal in this code, but the Ada runtime seems to
accumulate memory (for file handles?) until ... it throws in the towel.
Any comments?
Hope this will not lead into a discussion 'how2use tmp files' :-)
Regards,
Achim
--
_ _
/A/G


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