Access discriminants in tasks (9X)

Access discriminants in tasks (9X)

[Ken Thomas]

Can tasks being limited types have access discriminants. Barnes (4th edition)
says yes (p432) but GNAT rejects the following fragment

package Worker is


  type W is limited private;

private

  task type Job(W_PTR : access W);
  -- GNAT objects

  type W is limited record
     Data : Integer;
     J    : Job(W'ACCESS);
   end record;

end Worker;


Help on this area of Ada syntax would be helpful.


Ken Thomas
University of Southampton, UK
kst@uk.ac.soton.ecs

Re: Access discriminants in tasks (9X)

[Bob Duff]

In article <3b2emu$19f@wynkyn.ecs.soton.ac.uk>,
Ken Thomas <kst@ecs.soton.ac.uk> wrote:
>Can tasks being limited types have access discriminants.

Yes.

- Bob
-- 
Bob Duff                                bobduff@inmet.com
Oak Tree Software, Inc.
Ada 9X Mapping/Revision Team (Intermetrics, Inc.)