/!\ Écrasement d'adresse

#include <stdio.h>
#include <stdlib.h>

/* Macro Bool */
typedef enum{false,true}bool;

/***
* Structure Simple d'une Pile
***/
typedef struct _Pile{
	
	unsigned int iVal;
 	struct _Pile *pPrec;
}ts_Pile;

/***
* Fonction qui initialise
* la Pile
***/
bool f_initPile(ts_Pile *pIn){
	
	pIn = NULL;
 	if( pIn != NULL )
  		return ( false );
 	return ( true );
}

/***
* Fonction qui ajoute un élement
* dans la Pile
***/
void f_addPile(ts_Pile **pIn, unsigned int const iVal){
	
	ts_Pile *tmp = malloc( sizeof( ts_Pile* ) );
 	if( !tmp ){
  		printf(" Erreur interne d'allocation\n ");
  		exit( 1 );
 	}
	
	/*	Ajout de l'élément	*/
 	tmp->iVal = iVal;
 	tmp->pPrec = (*pIn);
 	(*pIn) = tmp;
}

/***
* fonction qui retire un élement
* de la Pile
***/
unsigned const int f_PopPile(ts_Pile **pIn){
	
	unsigned int iVal = 0;
 	
 	ts_Pile *tmp = NULL;
 	if( !(*pIn) )
  		return ( -1 );
 	
 	tmp = (*pIn)->pPrec;
 	iVal = (*pIn)->iVal;
 	
 	free( *pIn );
 	*pIn = tmp;
 	
 	return ( iVal );
}


/***
* Fonction principale
***/

int main(void) {
	
	int i = 0;
	
 	ts_Pile *pile_1;	/*	Pile (1)	*/
 	ts_Pile *pile_2;	/*	Pile (2) 	*/
 	ts_Pile *pile_3;	/*	Pile (3)	*/
 
 	/* initialisation des Piles */
 	if( f_initPile( pile_1 ) == false ){
  		printf("Impossible d'initialiser la pile (1) \n");
  		exit( 1 );
 	}
 
	/* Pile (2) */
 	if( f_initPile( pile_2 ) == false ){
  		printf("Impossible d'initialiser la pile (2) \n");
  		exit( 1 );
 	}
 
	/* Pile (3) */
 	if( f_initPile( pile_3 ) == false ){
  		printf("Impossible d'initialiser la pile (3) \n");
  		exit( 1 );
 	}
 	
 	/* Tableau Pointeur de Pile */
 	ts_Pile (*pTabAddr[3]) = { &pile_1, &pile_2, &pile_3};
 	
 	/* Ajout des nouvelle valeurs aux Pile*/
 	for (i = 0; i < 20 ;i++ ){
 		
 		f_addPile( pTabAddr[0], i );
  		f_addPile( pTabAddr[1], (i*2) );
  		f_addPile( pTabAddr[2], (i*4) );
 	}

 	printf("\n\t==========\tPile (1)\t==========\n");
 	for( i = 0; i < 20 ; i++)
  		printf("\t\t\tPop (1) = %d\n",f_PopPile( &pTabAddr[0] ) );
  	
 
 	printf("\n\t==========\tPile (2)\t==========\n");
 
 	/* Nouvelle affichage Pile (2) */
 	for( i = 0; i < 20 ; i++)
  		printf("\t\t\tPop (2) = %d\n",f_PopPile( &pTabAddr[1] ) );
 
 	printf("\n\t==========\tPile (3)\t==========\n");
  	/* Nouvelle affichage Pile (3) */
 		for( i = 0; i < 20 ; i++)
  			printf("\t\t\tPop (3) = %d\n",f_PopPile( &pTabAddr[2] ) );
 
 	return ( 0 );
}