comp.lang.ada
 help / color / mirror / Atom feed
From: Georg Bauhaus <rm.dash-bauhaus@futureapps.de>
Subject: Re: GNAT's stack checking in Ubuntu 9.04  (and Shootout regex-dna)
Date: Tue, 04 Aug 2009 16:18:37 +0200
Date: 2009-08-04T16:18:37+02:00	[thread overview]
Message-ID: <4a78433d$0$30239$9b4e6d93@newsspool1.arcor-online.net> (raw)
In-Reply-To: <u18g75108pv06pegc2sk971n97fd11gfjk@4ax.com>

Brian Drummond schrieb:

>>    declare
>> -      Sequence_Lines : Dna_Lines(1..Num_Lines);
>> +      type Dna_Lines_Pointer is access Dna_Lines;  -- avoids stack issues
>> +     -- Sequence_Lines : Dna_Lines_Pointer := new Dna_Lines(1..Num_Lines);
>        Sequence_Lines_ptr : Dna_Lines_Pointer := new Dna_Lines(1..Num_Lines);
>        Sequence_Lines : Dna_Lines(1..Num_Lines) renames Sequence_Lines_ptr.all;
> 
> and now no changes are necessary to the program (which may access the variable
> many times)
> 
>>      Put(Item => Length(Sequence_Lines), Width => 1);

Cool... I had already felt comfortable with .all being optional
when there are parens or tick marks, but this one's nice. Thanks.



  reply	other threads:[~2009-08-04 14:18 UTC|newest]

Thread overview: 24+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2009-08-03 22:54 GNAT's stack checking in Ubuntu 9.04 (and Shootout regex-dna) Georg Bauhaus
2009-08-03 22:56 ` Georg Bauhaus
2009-08-04  7:50   ` Ludovic Brenta
2009-08-04  9:17     ` Georg Bauhaus
2009-08-04  9:58       ` Vadim Godunko
2009-08-04 10:44         ` Georg Bauhaus
2009-08-04 12:30           ` Vadim Godunko
2009-08-04 14:15             ` Georg Bauhaus
2009-08-04 22:20         ` Egil
2009-08-04 15:38       ` Robert A Duff
2009-08-04 11:59 ` Brian Drummond
2009-08-04 14:18   ` Georg Bauhaus [this message]
2009-08-09 19:13   ` Georg Bauhaus
2009-08-10 13:10     ` jonathan
2009-08-10 20:12     ` jonathan
2009-08-10 20:29       ` Ludovic Brenta
2009-08-10 23:34       ` Georg Bauhaus
2009-08-11 20:02         ` jonathan
2009-08-11 21:19           ` jonathan
2009-08-11 21:38           ` Georg Bauhaus
2009-08-11  0:27       ` Georg Bauhaus
2009-08-11 19:05         ` jonathan
2009-08-12  9:32           ` Ludovic Brenta
2009-08-12 16:37             ` jonathan
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox