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=-0.3 required=5.0 tests=BAYES_00,
	REPLYTO_WITHOUT_TO_CC autolearn=no autolearn_force=no version=3.4.4
X-Google-Thread: 103376,640b65cbfbab7216
X-Google-Attributes: gid103376,domainid0,public,usenet
X-Google-Language: ENGLISH,ASCII-7-bit
Path: 
 g2news1.google.com!news3.google.com!feeder.news-service.com!newsfeed-fusi2.netcologne.de!news.netcologne.de!newsfeed-hp2.netcologne.de!newsfeed.arcor.de!newsspool2.arcor-online.net!news.arcor.de.POSTED!not-for-mail
From: "Dmitry A. Kazakov" <mailbox@dmitry-kazakov.de>
Subject: Re: Ada.Strings.Bounded
Newsgroups: comp.lang.ada
User-Agent: 40tude_Dialog/2.0.15.1
MIME-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Content-Transfer-Encoding: 7bit
Reply-To: mailbox@dmitry-kazakov.de
Organization: cbb software GmbH
References: <q5CdnepU0ZzTxmzanZ2dnUVZ_t-nnZ2d@earthlink.com>
 <1jdzw15tbj376$.nyv9yml75wj4$.dlg@40tude.net>
 <80c6fdca-1a89-4d98-b61d-9a405e57d8e5@s13g2000prd.googlegroups.com>
 <1wh7cbu67y4wz$.7iu8likx0fct.dlg@40tude.net>
 <bc3a8b4e-63fe-47a6-b10b-7056f6d7d586@w5g2000prd.googlegroups.com>
 <144w648u50r6q.1erjxxu0cplbw.dlg@40tude.net>
 <d5dc2989-7c5e-416b-ad6f-54f187fb6e3b@a9g2000prl.googlegroups.com>
 <g0h6sr1pyq67.vixepl474n4k$.dlg@40tude.net>
 <611360e0-595c-43a7-b5cb-137a278ec0c1@s13g2000prd.googlegroups.com>
 <15389tuelo6x6$.1c1a6yixordts$.dlg@40tude.net>
 <4c1be2a2-0178-4c1f-8c96-526020550f42@w4g2000prd.googlegroups.com>
 <wcczlrnb8rz.fsf@shell01.TheWorld.com>
 <15514187-d7d0-4650-a058-13ec5684be2c@w5g2000prd.googlegroups.com>
 <wcck5ir84on.fsf@shell01.TheWorld.com>
 <07e98c4f-9b79-412f-9e95-94dd04082355@p39g2000prm.googlegroups.com>
 <wcck5ipkic6.fsf@shell01.TheWorld.com>
 <1di2jdq2ciclq$.y9qyndv1t3q9$.dlg@40tude.net>
 <87lk35690o.fsf@willow.rfc1149.net>
Date: Tue, 22 Apr 2008 20:59:27 +0200
Message-ID: <ld5ugr99l0ri.1fwsi71j72z6o$.dlg@40tude.net>
NNTP-Posting-Date: 22 Apr 2008 20:59:28 CEST
NNTP-Posting-Host: 453c9a24.newsspool1.arcor-online.net
X-Trace: 
 DXC=XGi_RhaNnl>nBOkdL^Lo7>ic==]BZ:af>4Fo<]lROoR18kF<OcfhCO;^oHljd>o6=5WRXZ37ga[7:jTA67ckJ=X54=^QngO\l_095\^X3=3=<5
X-Complaints-To: usenet-abuse@arcor.de
Xref: g2news1.google.com comp.lang.ada:21040
Date: 2008-04-22T20:59:28+02:00
List-Id: <comp.lang.ada>

On Tue, 22 Apr 2008 20:26:31 +0200, Samuel Tardieu wrote:

>>>>>> "Dmitry" == Dmitry A Kazakov <mailbox@dmitry-kazakov.de> writes:
> 
> Dmitry> If compilable. The following should break GNAT GPL 2007:
> 
> It doesn't break GCC 4.4.0:
> 
> % gnatmake -g -O2 t
> gcc -c -g -O2 t.adb
> gnatbind -x t.ali
> gnatlink t.ali -g
> 
> % ./t
>  2147483647
> 
> The file I used is on http://www.rfc1149.net/tmp/t.adb if you want to
> try it yourself :)

Well, it seems I miscalculated the number of lines. But actually not too
much, I have added 30 lines to each summand and got the infamous: GNAT BUG
DETECTED ... GPL 2007 (20070405-41) (i586-pc-mingw32msv) Storage_Error heap
exhausted [*]... However it is not a bug of course. In simpler cases like:

   M : constant := 2**1_000_000;

GNAT gives reasonable: "static value too large, capacity exceeded"

---------------
*  In case that would not help (I don't know how many terabytes of memory
you have (:-)), double the number of lines in each summand. Continue so
until the Easter egg reveal itself...

-- 
Regards,
Dmitry A. Kazakov
http://www.dmitry-kazakov.de