comp.lang.ada
 help / color / mirror / Atom feed
From: bobduff@world.std.com (Robert A Duff)
Subject: Re: Program_Error from library level task declaration...
Date: 1996/07/31
Date: 1996-07-31T00:00:00+00:00	[thread overview]
Message-ID: <DvEsMq.I48@world.std.com> (raw)
In-Reply-To: 31FE562A.237C228A@escmail.orl.mmc.com


>Dale Stanbrough wrote:
>> I've tried to create a library level semaphore to be used
>> for screen locking. The semaphore is the standard implementation
>> using a task (yes, I know a protected object would be better).
>> 
>> The declaration is...
>> 
>> with semaphores; use semaphores;
>> package screen_lock is
>> 
>>         screen:semaphore;
>> 
>> end screen_lock;

It looks like you're activating a task whose body is not yet elaborated
(see 3.11(12)).  You should put pragma Preelaborate or Elaborate_Body on
the Semaphores package.  If that's illegal (can't tell without seeing
it), put pragma Elaborate_All(Semaphores) on the Screen_Lock package.

- Bob




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

Thread overview: 3+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
1996-07-27  0:00 Program_Error from library level task declaration Dale Stanbrough
1996-07-30  0:00 ` Theodore E. Dennison
1996-07-31  0:00   ` Robert A Duff [this message]
replies disabled

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