Ada

Sémantique des tâches en ADA

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Sémantique des tâches en ADA

nginaud

vive le silex

Bonjour,

Je me suis remis récemment à Ada et je bute sur un problème sans doute
tout bête...

Soit un programme qui lance deux taches dans une boucle sans fin :
l'une affichant "Ping", l'autre "Pong". Le "Pong" ne peut s'afficher
qu'après un "Ping" et réciproquement. La première tâche à s'exécuter
doit être le "Ping".

En C, ça se règle à coup de sémaphores, mais je n'arrive pas à
retranscrire ça avec la sémantique des tâches Ada.

En gros, je ne sais pas s'il faut une seule tâche qui aurait deux
entrées (Ping et Pong) avec une synchro adéquate, ou s'il faut deux
tâches...

Quelqu'un peut me mettre sur la voie ?

---------------
Musee departemental de prehistoire du Pas-de-Calais : http://paleolithique.free.fr/dossi [...] e=p3.1.htm

Publicité

Taiche

(╯°□°）╯︵ ┻━┻

Alors, on s'intéresse aux églises romanes du Bas-Berry ? [:cupra]

---------------
Everyone thinks of changing the world, but no one thinks of changing himself | It is the peculiar quality of a fool to perceive the faults of others and to forget his own | Early clumsiness is not a verdict, it’s an essential ingredient.

nraynaud

lol

Taiche a écrit :

Alors, on s'intéresse aux églises romanes du Bas-Berry ? [:cupra]

eh oh !
c'est quoi ta sémantique à toi d'abord ?

drachenkiller

Salut,
je me souviens plus tres bien
mais je pense plutot à 2 tachesavec un point de rendez-vous pour chacune, apres le ping pour la première, avant le pong pour la seconde.

103e

Code :

with text_io; use text_io;
procedure ping_pong is
task Ping is
entry Rendez_Vous;
end Ping;
task Pong is
entry Rendez_Vous;
end Pong;
task body Ping is
begin
loop
accept Rendez_Vous;
Text_Io.Put ( "ping " );
Pong.Rendez_Vous;
end loop;
end Ping;
task body Pong is
begin
loop
accept Rendez_Vous;
Text_Io.Put ( "pong " );
Ping.Rendez_Vous;
end loop;
end Pong;
begin
Ping.Rendez_Vous;
end ping_pong;

sinon il y a

Code :

with text_io; use text_io;
procedure ping_pong is
begin
loop
put ( "ping" );
put ( "pong" );
end loop;
end ping_pog;

ok je sort...

Message édité par - MoKsA - le 09-08-2004 à 20:10:38

FORUM HardWare.fr

Programmation

Ada

Sémantique des tâches en ADA

Sujets relatifs
[ADA] Tant pis si l'autre topic est fermé, j'ai un truc à dire	du son sur ada ?
ADA et SDL : comment configurer	Problemes d erreurs en ADA pour un devoir à rendre Help
Problemes d erreurs en ADA pour un devoir à rendre Help	[ADA] Erreur d'execution \| liste chainée => soucis de pointeur ?
[ADA] utiliser l'heure	Peut on lancer une commande shell unix apartir d'un programme Ada
GTK_Ada -Tout ce qu'on doit savoir...	help projet informatique en ADA pivot de gauss.
Plus de sujets relatifs à : Sémantique des tâches en ADA

Page générée en 0.052 secondes