Discussion :

[sgmsg]

Bonjour à tous

J'ai un problème récurrent mais intermittent avec les boucles For. On sait pas quand ça arrive, mais ça finit par arriver...

soit

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
    for i:=0 to 0 do
       for j:=0 downto 0 do
          beep;

Dans ce bout de code si je trace avec F7 le curseur programme passe qu'une seule fois sur beep;

Or

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
        for i:=0 to iVecteur do
            for j:=S-iSi-1 downto 0 do
               Zen[i].Soustrais(Sd[iSi-vecteur[i]-j]);

Avec iVecteur =0 ainsi que S-iSi-1 = 0

Alors qu'il ne devrait passer qu'une seule fois, le curseur programme passe deux fois sur Zen[i].Soustrais. Au premier passage il exécute bel et bien Soustrais. Mais au second passage, il s'arrête dessus mais n'appelle pas Soustrais ?!?

Si je remplace Zen[i].Soustrais(Sd[iSi-vecteur[i]-j]) par beep,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
        for i:=0 to iVecteur do
            for j:=S-iSi-1 downto 0 do
               beep;;

il ne passe qu'une seule fois.

Donc ce n'est pas un problème dû aux variables lors de l'initialisation des boucles for.

Avez vous des explications?

D'accord ça revient au même mais quand on trace pour déverminer le programme ça fait perdre un temps fou car on cherche à résoudre une punaise qui n'existe pas...

Merci d'avance.

[e-ric]

Salut

Difficile de juger avec des extrait de code aussi petits. Peux-tu exposer le code de Zen[i].Soustrais().
As-tu essayer de déboguer avec puis sans les optimisations ?

Cdlt

[Andnotor]

Tu te poses des questions existentielles là

La prochaine instruction machine à exécuter ne correspond à rien dans ton code (c'est en fait la boucle for qui est compilée sous la forme d'un repeat..until, on est sur le until). Le debugger affiche simplement la dernière ligne la plus proche.

Modifie ton code ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
for i:=0 to iVecteur do
  for j:=S-iSi-1 downto 0 do
  begin
    Zen[i].Soustrais(Sd[iSi-vecteur[i]-j]);
  end;

et la ligne en évidence sera end;.

Presse Ctrl+Alt+d pour afficher le code machine, c'est très instructif

[Paul TOTH]

c'est probablement lié à l'optimisation qui dans le premier cas supprime simplement les boucles for alors que dans le second cas, il évalue l'expression "S-iSi-1", il boucle donc effectivement pour savoir qu'il doit s'arrêter.

[sgmsg]

Tu te poses des questions existentielles là

La prochaine instruction machine à exécuter ne correspond à rien dans ton code (c'est en fait la boucle for qui est compilée sous la forme d'un repeat..until, on est sur le until). Le debugger affiche simplement la dernière ligne la plus proche.

Modifie ton code ainsi :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
for i:=0 to iVecteur do
  for j:=S-iSi-1 downto 0 do
  begin
    Zen[i].Soustrais(Sd[iSi-vecteur[i]-j]);
  end;

et la ligne en évidence sera end;.

Presse Ctrl+Alt+d pour afficher le code machine, c'est très instructif

Effectivement : exactement le comportement que tu avais prédit.

Mais j'ai deux ligne plus bas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
            for i:=0 to iVecteur+1{} do 
                Zen[i].Additionne(Sd[iSi]);

Il ne passe qu'une fois...

J'ai essayé Ctrl+Alt+d: y'a rien qui se passe probablement D6...

c'est probablement lié à l'optimisation qui dans le premier cas supprime simplement les boucles for alors que dans le second cas, il évalue l'expression "S-iSi-1", il boucle donc effectivement pour savoir qu'il doit s'arrêter.

C'est peut-être ça...