Les listes (pointeur) en C

Fermé
hakou28 Messages postés 27 Date d'inscription lundi 12 janvier 2009 Statut Membre Dernière intervention 23 août 2013 - 15 mai 2009 à 15:42
hakou28 Messages postés 27 Date d'inscription lundi 12 janvier 2009 Statut Membre Dernière intervention 23 août 2013 - 15 mai 2009 à 19:09
Bonjour,
je veux convertir cette unité du pascal au C
//------------------------------------------------------------------------------------------------------------------//
unit Liste_D;
interface
const
FinListe = nil;
type pointeur = ^noued;
noued = record
valeur : integer;
suivant : pointeur;
end;

procedure Allouer(var p:pointeur);
procedure Liberer(p:pointeur);
function Suivant(p:pointeur):pointeur;
function Valeur (p:pointeur): integer;
procedure Aff_Adr(p,q:pointeur);
procedure Aff_Val(p: pointeur; valeur:integer);
{---------------------------------------------------}
implementation

procedure Allouer(var p:pointeur);
begin
new(p);
end;

procedure Liberer(p:pointeur);
begin
dispose(p);
end;

function Suivant(p:pointeur):pointeur;
begin
Suivant := p^.suivant;
end;

function Valeur (p:pointeur): integer;
begin
Valeur := p^.valeur;
end;

procedure Aff_Adr(p,q:pointeur);
begin
p^.suivant := q;
end;

procedure Aff_Val(p: pointeur; valeur:integer);
begin
p^.valeur:=valeur;
end;

end.

//-----------------------------------------------------------------------------------------------------------------------//
Merci D'Avance

2 réponses

KX Messages postés 16753 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 25 novembre 2024 3 020
15 mai 2009 à 18:22
Regarde ici : http://www.commentcamarche.net/faq/sujet 8282 les files en langage c
T'auras plus qu'à faire copier-coller et à modifier le code ici ou là...
1
hakou28 Messages postés 27 Date d'inscription lundi 12 janvier 2009 Statut Membre Dernière intervention 23 août 2013 7
15 mai 2009 à 19:09
en tous cas merci avous
mais je veux l'unité dynamique du liste lineaire chaineé pour faire les operation de construction et modification en C
0