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/23
Message-ID: <ImwC4.956$q41.1364@news.pacbell.net>#1/1
X-Deja-AN: 601475868
References: <8bcmds$6e9$1@nnrp1.deja.com>
X-Complaints-To: abuse@pacbell.net
X-Trace: news.pacbell.net 953848360 206.170.24.61 (Thu,
 23 Mar 2000 13:52:40 PST)
Organization: SBC Internet Services
NNTP-Posting-Date: Thu, 23 Mar 2000 13:52:40 PST
Newsgroups: comp.lang.ada
Date: 2000-03-23T00:00:00+00:00
List-Id: <comp.lang.ada>

> 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;
Run on Windows 95 on a RAM disk with the System Monitor Accessory
showing Allocated Memory:
Gnat 3.12p  Allocated memory ramps up, then starts ramping up
  more slowly.  Hard disk activity starts, presumably due to paging.
Janus 3.1.1.e  Allocated memory stays flat during entire run.
ObjectAda 7.1.2  Allocated memory stays flat during entire run.