Exemple   004 :
#include <llist.h>
 
LLIST *Lentier;
 
#define ERREUR_CREATION         -1
#define OK                      0
 
 
int main(void)
{ int i;
 
  if( listborn( &Lentier) == LNOK )
  {
          if ( initlist( &Lentier,  LINT , LINT ) != LOK )   
                 return(ERREUR_CREATION);
          else
          {
               for(i=0;i<100;i++)
                    adjq(&Lentier,&i); 
/* création d'une liste d'entier de 100 éléments (0 - 99) */
 
                   fprintf(stdout,"\n Nombre d'éléments détruits = %d ", delete_list(&Lentier) ); 
               if(  listborn( &Lentier ) == LOK )
                        fprintf(stdout,"\n Liste Lentier est toujours utilisable");
               else
                        fprintf(stdout,"\n IMPOSSIBLE !!!");  
          }
 
 
            close_list(&Lentier);      /* Vide et supprime la liste */
   }
exit( OK );
}