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.9 required=5.0 tests=BAYES_00,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 2002:a6b:f49:: with SMTP id
 x70-v6mr14243691ioi.107.1525404251008;
        Thu, 03 May 2018 20:24:11 -0700 (PDT)
X-Received: by 2002:a9d:5a0a:: with SMTP id
 v10-v6mr1669088oth.13.1525404250912;
 Thu, 03 May 2018 20:24:10 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!feeder.eternal-september.org!news.uzoreto.com!weretis.net!feeder6.news.weretis.net!feeder.usenetexpress.com!feeder-in1.iad1.usenetexpress.com!border1.nntp.dca1.giganews.com!nntp.giganews.com!u74-v6no43064itb.0!news-out.google.com!b185-v6ni1440itb.0!nntp.google.com!u74-v6no43063itb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Thu, 3 May 2018 20:24:10 -0700 (PDT)
In-Reply-To: <87h8no1nli.fsf@nightsong.com>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com;
 posting-host=188.87.244.237;
 posting-account=gRqrnQkAAAAC_02ynnhqGk1VRQlve6ZG
NNTP-Posting-Host: 188.87.244.237
References: <1c73f159-eae4-4ae7-a348-03964b007197@googlegroups.com>
 <dbcb51b9-8ab9-4d39-bb70-47fdb15ebfd8@googlegroups.com>
 <pb7eii$bf1$1@dont-email.me>
 <b75ad71f-a917-4638-9b38-ccfe69b04e53@googlegroups.com>
 <slrnpdpiv9.ntv.address@is.invalid>
 <pbr3mi$leu$1@franka.jacob-sparre.dk> <87k1su7nag.fsf@nightsong.com>
 <pbtlno$3k2$1@franka.jacob-sparre.dk> <87po2la2qt.fsf@nightsong.com>
 <87in8buttb.fsf@jacob-sparre.dk> <87wowqpowu.fsf@nightsong.com>
 <16406268-83df-4564-8855-9bd0fe9caac0@googlegroups.com>
 <87o9i2pkcr.fsf@nightsong.com>
 <pc8l7e$km5$1@franka.jacob-sparre.dk> <87in88m43h.fsf@nightsong.com>
 <cd866ee8-ad4d-489e-a38b-d8e5f5d4af00@googlegroups.com>
 <87efiuope8.fsf@nightsong.com>
 <322f9b26-01de-4753-bb50-6ef2f3d993d8@googlegroups.com>
 <87a7th9pd1.fsf@nightsong.com>
 <bbda04b9-0f91-47c5-9193-279b667f503c@googlegroups.com>
 <87h8no1nli.fsf@nightsong.com>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <f778e764-facc-47b5-896c-fc01d7a3bdbe@googlegroups.com>
Subject: Re: How to get Ada to ?cross the chasm??
From: gautier_niouzes@hotmail.com
Injection-Date: Fri, 04 May 2018 03:24:11 +0000
Content-Type: text/plain; charset="UTF-8"
Xref: reader02.eternal-september.org comp.lang.ada:51962
Date: 2018-05-03T20:24:10-07:00
List-Id: <comp.lang.ada>

> But then you have to free the memory, or else your program has a leak.
> There are various ways you can deal with this storage management issue.

Thank you for looking at the CBSG. There are indeed tons of temporary data produced in almost no time, so it is certainly an interesting example.

Now, the surprise (for you):
- there is no memory to be freed
- there is no leak
- there is no storage management issue.
Just try this:

with Produce_Corporate_Bullshit;
procedure Noleak is
begin
  loop
    Produce_Corporate_Bullshit;
  end loop;
end;

At each iteration (1/2 second on my 1.66 GHz netbook) around 100 A4 pages of bla bla are produced, final HTML size around 400KB.