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
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,dc393c3a10696107
X-Google-Attributes: gid103376,public
From: tmoran@bix.com
Subject: Re: Create-Delete tmp Files
Date: 2000/03/20
Message-ID: <tqtB4.3191$b64.79684@news.pacbell.net>#1/1
X-Deja-AN: 600014777
References: <8b4n77$u4a$1@nnrp1.deja.com>
X-Complaints-To: abuse@pacbell.net
X-Trace: news.pacbell.net 953574169 206.170.2.75 (Mon,
 20 Mar 2000 09:42:49 PST)
Organization: SBC Internet Services
NNTP-Posting-Date: Mon, 20 Mar 2000 09:42:49 PST
Newsgroups: comp.lang.ada
Date: 2000-03-20T00:00:00+00:00
List-Id: <comp.lang.ada>

>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;
>Why does this code cause the Ada runtime to accumulate memory?
>For me, at this time, it doesn't matter what compiler and machine.
  For me, using Janus 3.1.1e for Windows NT and using the vendor's
library Memavail and Maxavail routines, and the Windows 95 System
Monitor accessory, 10,000 times around the loop shows no memory loss.
Sounds like an error in your compilers or OSes.