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.182.230.168 with SMTP id sz8mr6581780obc.9.1391124230813; Thu, 30 Jan 2014 15:23:50 -0800 (PST) X-Received: by 10.50.107.67 with SMTP id ha3mr327018igb.7.1391124230655; Thu, 30 Jan 2014 15:23:50 -0800 (PST) Path: border1.nntp.dca3.giganews.com!backlog4.nntp.dca3.giganews.com!border4.nntp.dca.giganews.com!border2.nntp.dca.giganews.com!nntp.giganews.com!uq10no7218176igb.0!news-out.google.com!vg8ni3igb.0!nntp.google.com!uq10no7218168igb.0!postnews.google.com!glegroupsg2000goo.googlegroups.com!not-for-mail Newsgroups: comp.lang.ada Date: Thu, 30 Jan 2014 15:23:50 -0800 (PST) In-Reply-To: Complaints-To: groups-abuse@google.com Injection-Info: glegroupsg2000goo.googlegroups.com; posting-host=66.126.103.122; posting-account=KSa2aQoAAACOxnC0usBJYX8NE3x3a1Xq NNTP-Posting-Host: 66.126.103.122 References: User-Agent: G2/1.0 MIME-Version: 1.0 Message-ID: Subject: Re: Freezing query From: adambeneschan@gmail.com Injection-Date: Thu, 30 Jan 2014 23:23:50 +0000 Content-Type: text/plain; charset=ISO-8859-1 X-Original-Bytes: 1775 Xref: number.nntp.dca.giganews.com comp.lang.ada:184617 Date: 2014-01-30T15:23:50-08:00 List-Id: On Thursday, January 30, 2014 1:49:26 PM UTC-8, Simon Wright wrote: > A question[1] on StackOverflow thinks that given > type U is tagged private; > type W is new U with private; > type X is new W with private; > > procedure M1 (P1 : U; P2 : in out U; P3 : Integer); > procedure M2 (P1 : Float ; P2 : in out U); > procedure M2 (P1 : Float ; P2 : Boolean ; P3 : in out W); > > the three operations are primitive. > > GNAT doesn't treat them as primitive unless you re-order so that the > subprograms come immediately after the type concerned: Have you seen the latest comment on the SO page? Does it address your question? -- Adam