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=-0.5 required=5.0 tests=BAYES_00,INVALID_MSGID, PP_MIME_FAKE_ASCII_TEXT autolearn=no autolearn_force=no version=3.4.4 X-Google-Language: ENGLISH,ASCII X-Google-Thread: 103376,bd40601768eaf8fd X-Google-Attributes: gid103376,public From: "Jean-Pierre Rosen" Subject: Re: Array of Variant Records Question... Date: 1999/09/11 Message-ID: <7rdg4e$qgr$1@wanadoo.fr>#1/1 X-Deja-AN: 523739719 References: <7r5vh3$imu1@svlss.lmms.lmco.com> <37d6a45c@news1.prserv.net> <37d6ccb6@news1.prserv.net> <7r77i8$i08$1@nnrp1.deja.com> <37d7c116@news1.prserv.net> <7r8t21$ov5$1@nnrp1.deja.com> <37d822a1@news1.prserv.net> <7r9r4u$fsc$1@nnrp1.deja.com> <37D96965.81045235@rational.com> <37d9a3b7@news1.prserv.net> X-Priority: 3 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2014.211 X-Complaints-To: abuse@wanadoo.fr X-Trace: wanadoo.fr 937051086 27163 193.250.164.214 (11 Sep 1999 11:58:06 GMT) Organization: Adalog X-MSMail-Priority: Normal NNTP-Posting-Date: 11 Sep 1999 11:58:06 GMT Newsgroups: comp.lang.ada Date: 1999-09-11T11:58:06+00:00 List-Id: Matthew Heaney a �crit dans le message : 37d9a3b7@news1.prserv.net... > In article <37D96965.81045235@rational.com> , Mark Lundquist > wrote: > [Discussion about modifying in parameters snipped] Actually, there is a way of modifiying an in parameter, if you can accept it is limited: Type T is limited private; function F (X : in T) return ...; ... private type Relay (Reference : access T) is limited null record; type T is record Myself : Relay (T'Access); -- other components end record; Inside function F, you are not allowed to modifiy X, but you are allowed to modify X.Myself.all .... -- --------------------------------------------------------- J-P. Rosen (Rosen.Adalog@wanadoo.fr) Visit Adalog's web site at http://perso.wanadoo.fr/adalog