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,FREEMAIL_FROM
	autolearn=unavailable autolearn_force=no version=3.4.4
X-Received: by 10.66.191.233 with SMTP id hb9mr5914365pac.4.1413092505273;
        Sat, 11 Oct 2014 22:41:45 -0700 (PDT)
X-Received: by 10.50.50.130 with SMTP id c2mr182410igo.15.1413092505082; Sat,
 11 Oct 2014 22:41:45 -0700 (PDT)
Path: 
 eternal-september.org!reader01.eternal-september.org!reader02.eternal-september.org!news.eternal-september.org!mx02.eternal-september.org!news.eternal-september.org!feeder.eternal-september.org!news.glorb.com!uq10no9012345igb.0!news-out.google.com!rp1ni27119igb.0!nntp.google.com!uq10no9012341igb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail
Newsgroups: comp.lang.ada
Date: Sat, 11 Oct 2014 22:41:44 -0700 (PDT)
In-Reply-To: <kTn_v.410776$412.305487@fx30.iad>
Complaints-To: groups-abuse@google.com
Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=24.6.21.101;
 posting-account=Qh2kiQoAAADpCLlhT_KTYoGO8dU3n4I6
NNTP-Posting-Host: 24.6.21.101
References: <8d412a6d-5589-4601-a7f8-5bb6d1b8850f@googlegroups.com>
 <FKl_v.358075$JH1.299775@fx08.iad>
 <f14cdaa7-eff3-4ae6-bc5f-84079051ad14@googlegroups.com>
 <kTn_v.410776$412.305487@fx30.iad>
User-Agent: G2/1.0
MIME-Version: 1.0
Message-ID: <09d538c4-6d10-4752-9b8a-d5281855e3db@googlegroups.com>
Subject: Re: type conversion
From: Anh Vo <anhvofrcaus@gmail.com>
Injection-Date: Sun, 12 Oct 2014 05:41:45 +0000
Content-Type: text/plain; charset=ISO-8859-1
Xref: news.eternal-september.org comp.lang.ada:22373
Date: 2014-10-11T22:41:44-07:00
List-Id: <comp.lang.ada>

On Saturday, October 11, 2014 9:57:54 PM UTC-7, Shark8 wrote:
> On 10/11/2014 10:53 PM, Anh Vo wrote: 
>> On Saturday, October 11, 2014 7:32:07 PM UTC-7, Shark8 wrote: 
>>> Well, let's make some subtypes! 
>>> 
>>>    Subtype Integer_String is 
>>>     with Dynamic_Predicate => Integer'Value( Integer_String ) in Integer 
>>>                               or else raise Constraint_Error; 
>> 
>> Look like the parent type is missing. You probably meant this. 
>> 
>>     Subtype Integer_String is Integer 
>>      with Dynamic_Predicate => Integer'Value( Integer_String ) in Integer 
>>                                or else raise Constraint_Error;  
> Almost,
> 
> Subtype Integer_String is new String 
>    with Dynamic_Predicate => Integer'Value( Integer_String ) in Integer 
>                              or else raise Constraint_Error;

Of course. Otherwise, it won't pass through the compiler.