comp.lang.ada
 help / color / mirror / Atom feed
* pragma storage_size
@ 2002-10-09  9:03 Lele
  2002-10-09 10:11 ` David C. Hoos, Sr.
  0 siblings, 1 reply; 6+ messages in thread
From: Lele @ 2002-10-09  9:03 UTC (permalink / raw)


I need to set the storage_size of few tasks, and I've used the storage_size
attribute, in example:

-----------------------------------------------------------------
task type DISPATCHER is
   pragma priority(14);
end task;

for DISPATCHER_TYPE'STORAGE_SIZE use 100*512;
-----------------------------------------------------------------

How can I perform the same thing using the pragma STORAGE_SIZE?








^ permalink raw reply	[flat|nested] 6+ messages in thread
* Re: pragma storage_size
  2002-10-09  9:03 pragma storage_size Lele
@ 2002-10-09 10:11 ` David C. Hoos, Sr.
  2002-10-09 11:01   ` Lele
  0 siblings, 1 reply; 6+ messages in thread
From: David C. Hoos, Sr. @ 2002-10-09 10:11 UTC (permalink / raw)



----- Original Message ----- 
From: "Lele" <emas@libero.it>
Newsgroups: comp.lang.ada
To: <comp.lang.ada@ada.eu.org>
Sent: October 09, 2002 4:03 AM
Subject: pragma storage_size


> I need to set the storage_size of few tasks, and I've used the storage_size
> attribute, in example:
> 
> -----------------------------------------------------------------
> task type DISPATCHER is
>    pragma priority(14);
> end task;
> 
> for DISPATCHER_TYPE'STORAGE_SIZE use 100*512;
> -----------------------------------------------------------------
> 
> How can I perform the same thing using the pragma STORAGE_SIZE?
> -----------------------------------------------------------------
task type DISPATCHER is
   pragma priority(14);
   pragma Storage_Size (100*512);
end task;
-----------------------------------------------------------------






^ permalink raw reply	[flat|nested] 6+ messages in thread
* Re: pragma storage_size
  2002-10-09 10:11 ` David C. Hoos, Sr.
@ 2002-10-09 11:01   ` Lele
  2002-10-10 15:53     ` Toshitaka Kumano
       [not found]     ` <3DA5A267.FFD561D7@cl.cilas.net>
  0 siblings, 2 replies; 6+ messages in thread
From: Lele @ 2002-10-09 11:01 UTC (permalink / raw)


Thanks

> -----------------------------------------------------------------
> task type DISPATCHER is
>    pragma priority(14);
>    pragma Storage_Size (100*512);
> end task;
> -----------------------------------------------------------------






^ permalink raw reply	[flat|nested] 6+ messages in thread
* Re: pragma storage_size
  2002-10-09 11:01   ` Lele
@ 2002-10-10 15:53     ` Toshitaka Kumano
       [not found]     ` <3DA5A267.FFD561D7@cl.cilas.net>
  1 sibling, 0 replies; 6+ messages in thread
From: Toshitaka Kumano @ 2002-10-10 15:53 UTC (permalink / raw)


Lele wrote:
> 
> Thanks
> 
> > -----------------------------------------------------------------
> > task type DISPATCHER is
> >    pragma priority(14);
> >    pragma Storage_Size (100*512);
> > end task;
> > -----------------------------------------------------------------

OR You can like this, if necessary:

task type Dispatcher (Storage : Any_Integer_Type) is
    pragma Priority(14);
    pragma Storage_Size (Size);
end task;

AND

Small  : Dispatcher (Storage => 100 * 512);
Medium : Dispatcher (Storage => 200 * 512);
Large  : Dispatcher (Storage => 300 * 512);
 
-- 
Toshitaka Kumano
Kamakura, Japan



^ permalink raw reply	[flat|nested] 6+ messages in thread
* Re: pragma storage_size
       [not found]     ` <3DA5A267.FFD561D7@cl.cilas.net>
@ 2002-10-10 19:12       ` David C. Hoos
       [not found]       ` <044f01c27090$f59e50b0$453ab4d8@sy.com>
  1 sibling, 0 replies; 6+ messages in thread
From: David C. Hoos @ 2002-10-10 19:12 UTC (permalink / raw)



----- Original Message ----- 
From: "Toshitaka Kumano" <kumano@cl.cilas.net>
To: <comp.lang.ada@ada.eu.org>
Sent: Thursday, October 10, 2002 10:53 AM
Subject: Re: pragma storage_size


> Lele wrote:
> > 
> > Thanks
> > 
> > > -----------------------------------------------------------------
> > > task type DISPATCHER is
> > >    pragma priority(14);
> > >    pragma Storage_Size (100*512);
> > > end task;
> > > -----------------------------------------------------------------
> 
> OR You can like this, if necessary:
> 
> task type Dispatcher (Storage : Any_Integer_Type) is
>     pragma Priority(14);
>     pragma Storage_Size (Size);
> end task;
Where is Size declared in your example?





^ permalink raw reply	[flat|nested] 6+ messages in thread
* Re: pragma storage_size
       [not found]       ` <044f01c27090$f59e50b0$453ab4d8@sy.com>
@ 2002-10-11 16:06         ` Toshitaka Kumano
  0 siblings, 0 replies; 6+ messages in thread
From: Toshitaka Kumano @ 2002-10-11 16:06 UTC (permalink / raw)


Oh, sorry.

"David C. Hoos" wrote:
> > task type Dispatcher (Storage : Any_Integer_Type) is
> >     pragma Priority(14);
> >     pragma Storage_Size (Size);
> > end task;
> Where is Size declared in your example?

   pragma Storage_Size (Size);
should be
   pragma Storage_Size (Storage);

-- 
Toshitaka Kumano
Kamakura, Japan



^ permalink raw reply	[flat|nested] 6+ messages in thread
end of thread, other threads:[~2002-10-11 16:06 UTC | newest]

Thread overview: 6+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2002-10-09  9:03 pragma storage_size Lele
2002-10-09 10:11 ` David C. Hoos, Sr.
2002-10-09 11:01   ` Lele
2002-10-10 15:53     ` Toshitaka Kumano
     [not found]     ` <3DA5A267.FFD561D7@cl.cilas.net>
2002-10-10 19:12       ` David C. Hoos
     [not found]       ` <044f01c27090$f59e50b0$453ab4d8@sy.com>
2002-10-11 16:06         ` Toshitaka Kumano

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