Re: Aide Ada

animatrix30@gmail.com writes:
> On 9 fév, 06:23, "Jeffrey R. Carter"
> <spam.jrcarter....@acm.nospam.org> wrote:
>> animatri...@gmail.com wrote:
>>
>> > package body Coureurs is
>>
>> >    Coureurs : array (1..Nbcour) of NomDeCoureur;
>> > with Coureurs; use Coureurs;
>>
>> > package body Performances is
>>
>> >    Put(string(Coureurs(Tperf.el.num)));
>> > L'erreur est Incorrect use of "Courreurs"
>>
>> L'array Coureurs (nom complet Coureurs.Coureurs) se trouve dans le body du
>> package Coureurs, et n'est pas visible hors du package body Coureurs. Dans
>> Performances, Coureurs est le nom du package.
>>
>> --
>> Jeff Carter
>> "Sir Lancelot saves Sir Gallahad from almost certain temptation."
>> Monty Python & the Holy Grail
>> 69
>
> D'accord.  J'ai essayé de le mettre dans le package Lexique, mais
> c'est la même chose.  Je ne vois pas comment appeller ce tableau,
> pourriez-vous m'indiquer comment ?

Déclare le tableau dans la spécification (et non le corps) du paquet
Coureurs.

> Pour revenir au premier problème, cela ne marche pas autant avec un
> | qu'un in, voici le code :
>
> elsif Tperf /= null AND THEN Convert_tps(P.tps, Tperf.el.tps) = in
> Sup .. Egal then
> ou
> elsif Tperf /= null AND THEN Convert_tps(P.tps, Tperf.el.tps) = Sup |
> Egal then
>
> Dans le premier cas, j'ai missing operand.
> Dans le second, j'ai l'erreur juste après le Sup : "missing then".

Enlève le signe = et relis mon article précédent pour la syntaxte
correcte :)

-- 
Ludovic Brenta.