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-Language: ENGLISH,ASCII-7-bit X-Google-Thread: 103376,ec4a7355f321a22b,start X-Google-Attributes: gid103376,public Path: controlnews3.google.com!news2.google.com!news.maxwell.syr.edu!news1.optus.net.au!optus!news.usyd.edu.au!not-for-mail From: Dave Levy Newsgroups: comp.lang.ada Subject: Task discriminants Date: Fri, 21 May 2004 00:47:42 +1000 Organization: The University of Sydney, Australia Message-ID: <40ACC50E.9040406@mail.usyd.edu.au> NNTP-Posting-Host: p1022.j0.net10.usyd.edu.au Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit X-Trace: spacebar.ucc.usyd.edu.au 1085064512 6247 10.0.3.254 (20 May 2004 14:48:32 GMT) X-Complaints-To: usenet@news.usyd.edu.au NNTP-Posting-Date: 20 May 2004 14:48:32 GMT User-Agent: Mozilla/5.0 (Windows; U; Win98; en-US; rv:0.9.4.1) Gecko/20020508 Netscape6/6.2.3 X-Accept-Language: en-us Xref: controlnews3.google.com comp.lang.ada:707 Date: 2004-05-20T14:48:32+00:00 List-Id: Hi Suppose one has a task type with a discriminant: task type A_Task( Id : integer); and one wishes to declare a set of tasks with initialised discriminants: t1 : A_Task(1); t2 : A_Task(2); t3 : A_Task(3); How could one declare them as an array of tasks with each one getting an initialised discriminant? Perhaps something like: The_Tasks: array (1..3) of A_Task( Id => 1,2,3 ); Except I tried this with Gnat and it won't compile. Thanks Dave