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 autolearn=ham autolearn_force=no version=3.4.4 X-Google-Thread: 103376,e92d558e5b77fce2 X-Google-NewGroupId: yes X-Google-Attributes: gida07f3367d7,domainid0,public,usenet X-Google-Language: ENGLISH,ASCII Received: by 10.68.227.40 with SMTP id rx8mr11097330pbc.5.1328532295462; Mon, 06 Feb 2012 04:44:55 -0800 (PST) Path: lh20ni266794pbb.0!nntp.google.com!news2.google.com!postnews.google.com!c20g2000vbb.googlegroups.com!not-for-mail From: Julian Leyh Newsgroups: comp.lang.ada Subject: Re: Building limited types through nested creator functions Date: Mon, 6 Feb 2012 04:44:55 -0800 (PST) Organization: http://groups.google.com Message-ID: <38fd29a1-cb2a-453e-bd78-ab539b874de6@c20g2000vbb.googlegroups.com> References: <40048c5a-ecf5-43e6-8c76-a294d0c333d1@l14g2000vbe.googlegroups.com> NNTP-Posting-Host: 194.156.172.86 Mime-Version: 1.0 X-Trace: posting.google.com 1328532295 10648 127.0.0.1 (6 Feb 2012 12:44:55 GMT) X-Complaints-To: groups-abuse@google.com NNTP-Posting-Date: Mon, 6 Feb 2012 12:44:55 +0000 (UTC) Complaints-To: groups-abuse@google.com Injection-Info: c20g2000vbb.googlegroups.com; posting-host=194.156.172.86; posting-account=4IMjSwoAAABghF4GBOy5ozdaZM8EkGwR User-Agent: G2/1.0 X-Google-Web-Client: true X-Google-Header-Order: HACRNKUSEL X-HTTP-UserAgent: Mozilla/5.0 (Windows NT 5.1) AppleWebKit/535.7 (KHTML, like Gecko) Chrome/16.0.912.77 Safari/535.7,gzip(gfe) Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable Date: 2012-02-06T04:44:55-08:00 List-Id: On 5 Feb., 23:03, Simon Belmont wrote: > function Make_Outer (arg : Inner) return Outer is > begin > =A0 return Outer'(i =3D> arg); > end Make_Outer how about: return Outer'(i =3D> Make_Inner (arg)); ? Make_Inner would have to handle an argument of type Inner..