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,f0ecd5ca045c4f0b
X-Google-Attributes: gid103376,public
From: matthew_heaney@acm.org (Matthew Heaney)
Subject: Re: char  -> int
Date: 1998/11/22
Message-ID: <matthew_heaney-ya023680002111981909380001@news.ni.net>#1/1
X-Deja-AN: 414370198
Content-transfer-encoding: 8bit
References: <36527480.5A60@usa.net> <72vgp5$u9g$1@news02.btx.dtag.de>
Content-Type: text/plain; charset=ISO-8859-1
Mime-Version: 1.0
NNTP-Posting-Date: Sat, 21 Nov 1998 19:09:20 PDT
Newsgroups: comp.lang.ada
Date: 1998-11-22T00:00:00+00:00
List-Id: <comp.lang.ada>

In article <72vgp5$u9g$1@news02.btx.dtag.de>, Juergen.Pfeifer@t-online.de
(Juergen Pfeifer) wrote:

>alex wrote:
>> 
>> How do I cast char to an int using ada?

Use the attribute Character'Pos, as in:

  I : Integer := Character'Pos ('m');

Of course, you can always use Unchecked_Conversion:

  function To_Int is 
    new Unchecked_Conversion (Character, Interfaces.Integer_8);

  I : Integer_8 := To_Int ('m');