Re: Aide Ada

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 ?

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".

Merci