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,c204c2633e999a33,start
X-Google-Attributes: gid103376,public
From: rlove@neosoft.com (Robert B. Love )
Subject: Rep Clause Vaues??
Date: 1997/01/22
Message-ID: <5c3oh5$7oh@uuneo.neosoft.com>#1/1
X-Deja-AN: 211356862
organization: NeoSoft, Inc.  
newsgroups: comp.lang.ada
Date: 1997-01-22T00:00:00+00:00
List-Id: <comp.lang.ada>



Because of design aspects beyond my control I find myself wanting
to know how to return the bit pattern of an enumerated type that
has a specific rep spec.  A simple example fragment is in order--

type mechs is (bolt,latch);
for mechs use(bolt => 12, latch => 29);

mechanism : mechs := latch;
bit_pattern : integer;

begin
   ....
   ....
   bit_pattern := Integer(mechs'val(mechanism));
   ....
end

What method can I use to get back the bit pattern or integer
value represented by the enumerated type?  All my attempts at
type conversion and pos/val attributes have failed.

All help appreciated.
----------------------------------------------------------------
Bob Love, rlove@neosoft.com (local)        MIME & NeXT Mail OK
rlove@raptor.rmnug.org  (permanent)        PGP key available
----------------------------------------------------------------