comp.lang.ada
 help / color / mirror / Atom feed
From: bobduff@world.std.com (Robert A Duff)
Subject: Re: Q. about Inheritance in Ada95
Date: 1996/07/02
Date: 1996-07-02T00:00:00+00:00	[thread overview]
Message-ID: <DtxuF5.BKp@world.std.com> (raw)
In-Reply-To: 4rc2q8$b84@portal.gmu.edu


In article <4rc2q8$b84@portal.gmu.edu>,
Wajdi H Al-Jedaibi (INFT) <waljedai@site.gmu.edu> wrote:
>	Does Ada 95 allows for task to be extended.

Not directly.  However, you can do things like this:

    type Action is access procedure;

    task type Do_Anything(To_Do: Action);

    task body Do_Anything is
    begin
        To_Do.all;
    end Do_Anything;

Now you can create tasks to do whatever you like:

    procedure My_Action is ...
    
    Task_Obj: Do_Anything(To_Do => My_Action'Access);

- Bob




  reply	other threads:[~1996-07-02  0:00 UTC|newest]

Thread overview: 6+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1996-07-02  0:00 Q. about Inheritance in Ada95 Wajdi H Al-Jedaibi (INFT)
1996-07-02  0:00 ` Robert A Duff [this message]
1996-07-03  0:00   ` Mark A Biggar
1996-07-03  0:00     ` Robert A Duff
1996-07-03  0:00 ` Tucker Taft
1996-07-03  0:00 ` Jon S Anthony
replies disabled

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox