Bonjour,

Je requiers votre aide concernant l'insertion en fin de liste :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
 
procedure empilerQueue(val : integer; var tete : liste);
    var tmp, tmp2: liste;
 
    begin
        new(tmp);
        new(tmp2);
        tmp := tete;
        while( tmp^.data <> nil) do
        begin
            tmp := tmp^.suiv;
        end;
        tmp2^.data := val;
        tmp2^.suiv := nil;
        tmp^.suiv := tmp2;
 
    end;
Il y a une erreur dans le "while" que je ne comprends pas : "operator is not overloaded".
Merci d'avance pour votre aide.