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.3 required=5.0 tests=BAYES_00,INVALID_MSGID
	autolearn=no autolearn_force=no version=3.4.4
X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: 103376,7b668a769fbfcee0,start
X-Google-Attributes: gid103376,public
From: Mario Amado Alves <maa@di.fct.unl.pt>
Subject: array(enumeration)
Date: 2000/07/19
Message-ID: <Pine.LNX.4.10.10007191643160.863-100000@lexis.di.fct.unl.pt>#1/1
X-Deja-AN: 648581600
To: comp.lang.ada@ada.eu.org
X-Authentication-Warning: lexis.di.fct.unl.pt: maa owned process doing -bs
Content-Type: TEXT/PLAIN; charset=US-ASCII
X-Complaints-To: usenet@enst.fr
X-Trace: menuisier.enst.fr 964095368 23253 137.194.161.2 (20 Jul 2000 12:16:08
 GMT)
Organization: ENST, France
X-BeenThere: comp.lang.ada@ada.eu.org
Mime-Version: 1.0
Reply-To: comp.lang.ada@ada.eu.org
NNTP-Posting-Date: 20 Jul 2000 12:16:08 GMT
Newsgroups: comp.lang.ada
Date: 2000-07-20T12:16:08+00:00
List-Id: <comp.lang.ada>

How do I define an array type indexed by an enumeration type?

  type Array_Type is array(<>) of Some_Type;
    --                    /|\
    --                     |
    -- compiler says identifier expected here

  type Enumeration_Type is (A, B, C);
  type Another_Enumeration_Type is (X, Y, Z);

  A_Thing: Array_Type(Enumeration_Type) := (
    A => ... ,
    B => ... ,
    C => ... );

  Another_Thing: Array_Type(Another_Emuneration_Type) := (
    X => ... ,
    Y => ... ,
    Z => ... );

This makes sense to me, but does not compile. So how do I code the idea?

Thanks.

| |,| | | |RuaFranciscoTaborda24RcD 2815-249CharnecaCaparica 351+939354002
|M|A|R|I|O|
|A|M|A|D|O|DepartmentoDeInformaticaFCT/UNL 2825-114 Caparica 351+212958536
|A|L|V|E|S|                                                  fax 212948541
| | | | | |                 maa@di.fct.unl.pt                FCT 212948300