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.8 required=5.0 tests=BAYES_00,INVALID_DATE
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,502eafcf316bcb10
X-Google-Attributes: gid103376,public
X-Google-ArrivalTime: 1994-12-12 04:54:51 PST
Path: 
 bga.com!news.sprintlink.net!howland.reston.ans.net!news1.digex.net!cnj.digex.net!cnj!gentle
From: gentle@cnj.digex.net (Gentle)
Newsgroups: comp.lang.ada
Subject: Re: Ada can't initialize (aggregate) array of length 1?
Date: 12 Dec 1994 12:54:42 GMT
Organization: Express Access Online Communications, Greenbelt, MD USA
Message-ID: <3chh6i$lp7@cnj.digex.net>
References: <1994Dec12.081230.24978@roxi.rz.fht-mannheim.de>
NNTP-Posting-Host: cnj.digex.net
X-Newsreader: TIN [version 1.2 PL2]
Date: 1994-12-12T12:54:42+00:00
List-Id: <comp.lang.ada>

On Mon, 12 Dec 94 08:12:30 CET, Dirk Zoller (duz@roxi.rz.fht-mannheim.de) wrote:
: Simplified I did this:

:     type stone is array (1..2) of character;
:     shapes: constant array (1..1) of stone := ("[]");
:     ____________________________________________^

  You're trying to squash a string of length 2 into a character space.
Try initializing like this:

  shapes: constant array (1..1) of stone := (1 => ('[',']'));

Although type stone could have been declared as a subtype of STRING of
length 2, then your initialization would have worked.

--
=========================================================================
gentle@cnj.digex.net

Software Engineer (extraordinaire!)
Level: International Hacker
Edison, NJ

Too much of a good thing is WONDERFUL.
		-- Mae West
=========================================================================