Discussion :

[koda29]

Bonjour à tous !

je commence à désespérer ... je vous explique mon problème : j'ai une liste chaînée qui marche à merveille, suppression, modification et insertion au milieu, au début ... nickel quoi. Mais mon problème se situe au niveau de l'insertion à la fin de ma liste. Pour info ma liste est composée d'élément record qui eux-même contienne un nombre entier et un deuxième champ qui s'appelle suivant pour faire le lien avec l'élément suivant.
Voila le code que j'ai pour faire mon insertion à la fin je crée un nouvel élément donc je rempli le champs num avec un nombre et je dis qu'il y a pas de suivant. Je parcours ma liste jusqu'au dernier élément. Une fois mon pointeur arrivé sur le dernier élément je dis que ce qui suis ce dernier élément c'est le nouvel élément que je viens de créer et après je dis que ce nouvel élément c'est la fin de la liste.

Code :

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

1
2
3
4
5
6
7
8
9
 
            Pt_nouveau := new T_Element'(num, null);
 
            while Pt_courant /= null loop
            	Pt_courant := Pt_Courant.suivant;
            end loop;
 
            Pt_courant.suivant := Pt_nouveau;
            La_Queue.Queue := Pt_nouveau;

Alors j'ai regardé ... dans plein de livre c'est comme ça, j'ai aussi chercher sur le net ... identique mais lors de la compilation aucun message d'erreur et quand je l'exécute paf une constraint error comme si je débordais de ma liste. Je comprends pas bien comment faire autrement et comment résoudre ce problème ... Si quelqu'un pouvais m'aider ... merci d'avance

environnement : JGrasp

[Invité]

Bonjour à tous !

je commence à désespérer ... je vous explique mon problème : j'ai une liste chaînée qui marche à merveille, suppression, modification et insertion au milieu, au début ... nickel quoi. Mais mon problème se situe au niveau de l'insertion à la fin de ma liste. Pour info ma liste est composée d'élément record qui eux-même contienne un nombre entier et un deuxième champ qui s'appelle suivant pour faire le lien avec l'élément suivant.
Voila le code que j'ai pour faire mon insertion à la fin je crée un nouvel élément donc je rempli le champs num avec un nombre et je dis qu'il y a pas de suivant. Je parcours ma liste jusqu'au dernier élément. Une fois mon pointeur arrivé sur le dernier élément je dis que ce qui suis ce dernier élément c'est le nouvel élément que je viens de créer et après je dis que ce nouvel élément c'est la fin de la liste.

Code :

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

1
2
3
4
5
6
7
8
9
 
            Pt_nouveau := new T_Element'(num, null);
 
            while Pt_courant /= null loop
            	Pt_courant := Pt_Courant.suivant;
            end loop;
 
            Pt_courant.suivant := Pt_nouveau;
            La_Queue.Queue := Pt_nouveau;

Alors j'ai regardé ... dans plein de livre c'est comme ça, j'ai aussi chercher sur le net ... identique mais lors de la compilation aucun message d'erreur et quand je l'exécute paf une constraint error comme si je débordais de ma liste. Je comprends pas bien comment faire autrement et comment résoudre ce problème ... Si quelqu'un pouvais m'aider ... merci d'avance

environnement : JGrasp

Non, si tu tentais d'accéder à un élément inexistant tu aurait Access_Check Failed. L'erreur est ailleurs.

[Invité]

Non, si tu tentais d'accéder à un élément inexistant tu aurait Access_Check Failed. L'erreur est ailleurs.

Donc, un Constraint Error

[Invité]

Code :

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

1
2
3
4
5
6
7
8
Pt_nouveau := new T_Element'(num, null);
 
            while Pt_courant /= null loop
            	Pt_courant := Pt_Courant.suivant;
            end loop;
 
            Pt_courant.suivant := Pt_nouveau;
            La_Queue.Queue := Pt_nouveau;

Ah ben non, hein... Ca peut pas marcher !

Que vaut Pt_courant en fin de boucle ?

[koda29]

Donc, un Constraint Error

oui oui c exactement ça ... mais justement si il existe cet élément comment je peux faire autrement pour l'ajouter à la fin de ma liste ... parce que là je vois vraiment pas

[koda29]

Code :

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

1
2
3
4
5
6
7
8
Pt_nouveau := new T_Element'(num, null);
 
            while Pt_courant /= null loop
            	Pt_courant := Pt_Courant.suivant;
            end loop;
 
            Pt_courant.suivant := Pt_nouveau;
            La_Queue.Queue := Pt_nouveau;

Ah ben non, hein... Ca peut pas marcher !

Que vaut Pt_courant en fin de boucle ?

bin il est sur le dernier élément de ma liste (ce dernier élément a son champ "suivant" sur null )

[Invité]

bin il est sur le dernier élément de ma liste (ce dernier élément a son champ "suivant" sur null )

Donc si il est null, c'est que l'élément n'existe pas !
Et si ton élément n'existe pas, tu ne peux accéder à au champ suivant de l'élément.

Donc ?

[koda29]

Donc si il est null, c'est que l'élément n'existe pas !
Et si ton élément n'existe pas, tu ne peux accéder à au champ suivant de l'élément.

Donc ?

bin je dois dis que le champs suivant de ce dernier élément pointe sur le nouveau ... ? mais eeeeh c'est un peu là qu'est mon problème ... parce que je lui dis

Code :

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

1
2
3
 
Pt_courant.suivant := Pt_nouveau    -- Pt_nouveau donc le pointeur sur mon
                                                  -- nouvel élément

Mais je pense que c'est là le hic enfin c'est en arrivant sur cette ligne qu'il plante

[Invité]

bin je dois dis que le champs suivant de ce dernier élément pointe sur le nouveau ... ? mais eeeeh c'est un peu là qu'est mon problème ... parce que je lui dis

Code :

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

1
2
3
 
Pt_courant.suivant := Pt_nouveau    -- Pt_nouveau donc le pointeur sur mon
                                                  -- nouvel élément

Mais je pense que c'est là le hic enfin c'est en arrivant sur cette ligne qu'il plante

Si c'est là qu'il plante, c'est que l'erreur est en amont.

Il faut que tu arrête ta boucle sur le dernier élément, et non, sur un pointeur null.

[koda29]

Si c'est là qu'il plante, c'est que l'erreur est en amont.

Il faut que tu arrête ta boucle sur le dernier élément, et non, sur un pointeur null.

oui sauf que justement ma boucle s'arrête quand on est sur le dernier élément ... il n'y a que le dernier élément dont le champs suivant soit à null.

Autrement y aurait peut-être la possibilité de ne pas faire de boucle et de dire directement :

Code :

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

1
2
La_Queue.Queue.suivant := Pt_nouveau;   -- dire que l'élément crée va après la queue
La_Queue.Queue := La_Queue.Queue.suivant;      -- dire que le nouvel élément c'est maintenant la queue

c'est peut-être plus propre ... mais y a toujours ce même problème

[Invité]

oui sauf que justement ma boucle s'arrête quand on est sur le dernier élément ... il n'y a que le dernier élément dont le champs suivant soit à null.

Pourquoi tu mets pas while Pt_Courant.suivant /= null loop ?

Autrement y aurait peut-être la possibilité de ne pas faire de boucle et de dire directement :

Code :

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

1
2
La_Queue.Queue.suivant := Pt_nouveau;   -- dire que l'élément crée va après la queue
La_Queue.Queue := La_Queue.Queue.suivant;      -- dire que le nouvel élément c'est maintenant la queue

c'est peut-être plus propre ... mais y a toujours ce même problème

C'est surtout plus rapide. C'est une solution, mais c'est pas comme ça.

[koda29]

Pourquoi tu mets pas while Pt_Courant.suivant /= null loop ?


C'est surtout plus rapide. C'est une solution, mais c'est pas comme ça.

Wow c'est trop trop cool c'est exactement ça ! je sais pas pourquoi j'y ai pas pensé ... en tout cas merci beaucoup parce que j'étais vraiment bloqué et pas la pêche mais alors là c bon je suis tout fou et content. merci encore, faut continuer à faire des forums d'entraide comme ça c'est juste génial !

allé peut-être à une prochaine

ps: voila le code qui marche

Code :

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

1
2
3
4
5
6
7
8
 Pt_nouveau := new T_Element'(num, null);
 
            while Pt_Courant.suivant /= null loop
            	Pt_courant := Pt_Courant.suivant;
            end loop;
 
            Pt_courant.suivant := Pt_nouveau;
            La_Queue.Queue := Pt_nouveau;

[Invité]

Désolé pour mes erreurs.

[koda29]

Désolé pour mes erreurs.

pas de problème ! on est encore des humains, on ne peut pas toujours faire juste ... c'est aussi pour ça qu'il y a des forums comme celui-ci ^^ passe une bonne fin de journée a+