sigsuspend or pause system calls in Ada

sigsuspend or pause system calls in Ada

[alfonso acosta]

hi:

I need to use those system calls, are they aviable in Ada? In case they 
arent, can I interface with libc?

Thanks in advance:

Alfonso Acosta

Re: sigsuspend or pause system calls in Ada

[Samuel Tardieu]

>>>>> "Alfonso" == alfonso acosta <alfonso_acosta_mail@yahoo.es> writes:

Alfonso> hi: I need to use those system calls, are they aviable in
Alfonso> Ada? In case they arent, can I interface with libc?

procedure Pause;
pragma Import (C, Pause);

(the return value is useless, as it is always -1)

  Sam
-- 
Samuel Tardieu -- sam@rfc1149.net -- http://www.rfc1149.net/sam

Re: sigsuspend or pause system calls in Ada

[Rodrigo Garcia]

"alfonso acosta" <alfonso_acosta_mail@yahoo.es> wrote in message
news:3e484b2c$1_2@news.arrakis.es...
> hi:
>
> I need to use those system calls, are they aviable in Ada? In case they
> arent, can I interface with libc?
>
> Thanks in advance:
>
> Alfonso Acosta

Do you really *need* to use them?
If you just want to pause your system, try a simple "delay" statement.

Rodrigo

Re: sigsuspend or pause system calls in Ada

[alfonso acosta]

> Do you really *need* to use them?
Well, I need my rocedure to be waiting for a signal, maybe it works if I 
just do

while True loop;
   delay 1;
end loop;

signals will be handled when delay is executed?

> If you just want to pause your system, try a simple "delay" statement.
> 
> Rodrigo
> 
> 

Re: sigsuspend or pause system calls in Ada

[Rodrigo Garcia]

"alfonso acosta" <alfonso_acosta_mail@yahoo.es> wrote in message
news:3e490ec7_4@news.arrakis.es...
>
> > Do you really *need* to use them?
> Well, I need my rocedure to be waiting for a signal, maybe it works if I
> just do
>
> while True loop;
>    delay 1;
> end loop;
>
> signals will be handled when delay is executed?

    Hmm, then I think it is better to suspend the thread by calling an entry
on a protected object. The protected object will have a procedure attached
to the signal you are waiting for. This procedure will open the barrier when
it receives the signal. Got it? Do you prefer it in Spanish?  ;^)

    BTW, how are you handling the signals you receive?

Rodrigo