* [QUESTION] Annuler une instruction Get_Immediate?
@ 1998-02-19 0:00 C�dric Rathgeb
1998-02-20 0:00 ` Remerciements C�dric Rathgeb
1998-02-20 0:00 ` [QUESTION] Annuler une instruction Get_Immediate? Anonymous
0 siblings, 2 replies; 3+ messages in thread
From: C�dric Rathgeb @ 1998-02-19 0:00 UTC (permalink / raw)
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 2209 bytes --]
Hi, my english is so poor. I'll write this message in french ;-)
Salut,
Voici un descriptif de mon probl�me:
J'ai un programme qui fonctionne dans un terminal et qui utilises les
instructions Get_Immediate et Put_Line de Text_IO pour respectivement
obtenir un caract�re et afficher une ligne de type Fixed_String.
Ce que j'aimerais c'est pouvoir afficher plusieurs lignes � l'�cran,
puis effectuer une pause de dur�e d�termin�e (environ de 0.05 secondes � 10
secondes) et ensuite effectuer ma boucle et afficher � nouveau plusieurs
lignes. Le probl�me vient du fait que parall�lement je d�sire v�rifier si
l'utilisateur appuie sur une touche du clavier (afin de quitter ma boucle o�
lancer l'�x�cution d'une autre partie de code).
J'ai essayer d'utiliser l'instruction Get_Immediate(Standard_Input, C);
mais mon programme se retrouve bloqu�.
J'ai essay� de cr�er une t�che o� j'obtiens un caract�re, pour tenter
d'aborter cette t�che (qui s'appelle
Spy_Keyboard) j'ai essay� la commande "abort Spy_Keyboard", mais comme je
suis dans un rendez-vous je re�ois une exception Tasking_Error et il semble
que je ne
puisse pas rappeler la t�che (Tasking_Error est encore une fois lev�), j'en
d�duis que la t�che pr�c�dente n'a pas �t� correctement avort�e.
Si vous connaissez une m�thode pour obtenir les touches press�es par
l'utilisateur ou comment v�rifier s'il y a des caract�res dans le buffer du
clavier et ce sans bloquer l'ex�cution du programme faites m'en part.
Eventuellement je pourrais me contenter de v�rifier si une touche a �t�
press�e durant la pause, mais je ne sais pas comment en finir avec le
Get_Immediate � la fin de ma pause.
En vous remerciant � l'avance de m'aider � r�soudre ce probl�me.
--
____________________________________
C�dric Rathgeb
shark@infomaniak.ch.net (enlever le ".net" pour r�pondre)
Switzerland
____________________________________
P.S. Pour me r�pondre il faut enlever le ".net" � la fin de mon adresse
e-mail (d�sol� c'est le seul moyen que j'ai trouv� pour �viter la publicit�
dans ma bo�te au lettres)
^ permalink raw reply [flat|nested] 3+ messages in thread
* Re: [QUESTION] Annuler une instruction Get_Immediate?
1998-02-19 0:00 [QUESTION] Annuler une instruction Get_Immediate? C�dric Rathgeb
1998-02-20 0:00 ` Remerciements C�dric Rathgeb
@ 1998-02-20 0:00 ` Anonymous
1 sibling, 0 replies; 3+ messages in thread
From: Anonymous @ 1998-02-20 0:00 UTC (permalink / raw)
Avez vous essayer une select Asynchronous Transfer of Control (ATC)?
Have you tried an ATC select statement?
select
<trigger>
[<sequence of statements>]
then abort
<abortable sequence of statments>
end select;
<trigger> = delay statement (pour vous/for your purposes)
<abortable sequence of statements? = Get_Immediate
Avez vous essayer une Get_Immediate avec Available? C'est peut-etre
votre seule chance a reussir si I/O bloque toutes les tasks.
Have you tried a Get_Immediate with the parameter Available? It may be
your only solution if I/O blocks all tasks with your compiler.
Jeff Carter PGP:1024/440FBE21
My real e-mail address: ( carter @ innocon . com )
"I blow my nose on you."
Monty Python & the Holy Grail
Posted with Spam Hater - see
http://www.compulink.co.uk/~net-services/spam/
^ permalink raw reply [flat|nested] 3+ messages in thread
* Remerciements
1998-02-19 0:00 [QUESTION] Annuler une instruction Get_Immediate? C�dric Rathgeb
@ 1998-02-20 0:00 ` C�dric Rathgeb
1998-02-20 0:00 ` [QUESTION] Annuler une instruction Get_Immediate? Anonymous
1 sibling, 0 replies; 3+ messages in thread
From: C�dric Rathgeb @ 1998-02-20 0:00 UTC (permalink / raw)
[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #1: Type: text/plain, Size: 544 bytes --]
Je vous remercie tous pour vos nombreuses r�ponses, mon programme
fonctionne enfin correctement.
Si je n'ai pas mis le compilateur et l'environnement c'est que j'utilise
�
l'�cole GNAT 3.0? (7 ou 9) sur des stations SUN avec Solaris et chez moi
invariablement GNAT 3.10p ou Object Ada d'Aonix sous 95/NT. Autrement dit,
il
faut que mon programme soit portable ;-)
--
____________________________________
C�dric Rathgeb
shark@infomaniak.ch.net (remove the ".net" to reply)
Switzerland
____________________________________
^ permalink raw reply [flat|nested] 3+ messages in thread
end of thread, other threads:[~1998-02-20 0:00 UTC | newest]
Thread overview: 3+ messages (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
1998-02-19 0:00 [QUESTION] Annuler une instruction Get_Immediate? C�dric Rathgeb
1998-02-20 0:00 ` Remerciements C�dric Rathgeb
1998-02-20 0:00 ` [QUESTION] Annuler une instruction Get_Immediate? Anonymous
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox