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,LOTS_OF_MONEY
	autolearn=ham autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,aeab6b16387b2612
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 2001-07-16 15:45:24 PST
Newsgroups: comp.lang.ada
Path: 
 archiver1.google.com!newsfeed.google.com!newsfeed.stanford.edu!nntp.cs.ubc.ca!newsfeed.direct.ca!look.ca!router1.news.adelphia.net!uunet!ash.uu.net!xyzzy!nntp
From: Jeffrey Carter <jeffrey.carter@boeing.com>
Subject: Re: Nonsense (was Re: How to do it in Ada ?)
X-Nntp-Posting-Host: e246420.msc.az.boeing.com
Content-Type: text/plain; charset=us-ascii
Message-ID: <3B5368B8.D16F932A@boeing.com>
Sender: nntp@news.boeing.com (Boeing NNTP News Access)
Content-Transfer-Encoding: 7bit
Organization: The Boeing Company
X-Accept-Language: en
References: <9itna2$i5b$1@news.tpi.pl>
 <Z9w47.213303$%i7.122829537@news1.rdc1.sfba.home.com>
 <P0F47.357734$p33.7248200@news1.sttls1.wa.home.com>
 <yAG47.358161$p33.7256533@news1.sttls1.wa.home.com>
Mime-Version: 1.0
Date: Mon, 16 Jul 2001 22:20:40 GMT
X-Mailer: Mozilla 4.5 [en]C-CCK-MCD Boeing Kit  (WinNT; U)
Xref: archiver1.google.com comp.lang.ada:10033
Date: 2001-07-16T22:20:40+00:00
List-Id: <comp.lang.ada>

Mark Lundquist wrote:
> 
> I <up.yerz@nospam.com> wrote nonsense in message
> news:P0F47.357734$p33.7248200@news1.sttls1.wa.home.com...
> >
> >[snip]
> >
> > Alternatively, the declaration could be written this way:
> >
> >     X := new X_Array_Type (1 .. N) := (others => 0);
> >
> 
> What a bunch of crap!  I can't belive I wrote that.

I'm glad you realize this is incorrect. However, ...

>     X : new X_Array_Type (1 .. N);
> 
>     begin
>             X := (others => 0);

this is also incorrect. You could write

X := new X_Array_Type (1 .. N);
X.all := (X'range => 0);

-- 
Jeffrey Carter