rpl/src/simplification.c - diff

Return to simplification.c CVS log

Up to [local] / rpl / src

version 1.41, 2013/02/27 17:11:46	version 1.42, 2013/03/21 11:30:31
Line 38	Line 38
struct_objet *	struct_objet *
simplification(struct_processus s_etat_processus, struct_objet s_objet)	simplification(struct_processus s_etat_processus, struct_objet s_objet)
{	{
	#ifdef EXPERIMENTAL_CODE
struct_arbre *s_arbre;	struct_arbre *s_arbre;
struct_arbre *s_noeud_courant;	struct_arbre *s_noeud_courant;

struct_liste_chainee *l_element_courant;	struct_liste_chainee *l_element_courant;
	#endif
struct_objet *s_objet_simplifie;	struct_objet *s_objet_simplifie;
	#ifdef EXPERIMENTAL_CODE
struct_objet **t_expression;	struct_objet **t_expression;

unsigned long i;	unsigned long i;
unsigned long nombre_elements;	unsigned long nombre_elements;

s_arbre = NULL;	s_arbre = NULL;
	#endif

if ((*s_objet).type == ALG)	if ((*s_objet).type == ALG)
{	{
Line 126 simplification(struct_processus *s_etat_	Line 128 simplification(struct_processus *s_etat_

struct_arbre *	struct_arbre *
creation_arbre(struct_processus *s_etat_processus,	creation_arbre(struct_processus *s_etat_processus,
struct_objet **t_objets, unsigned long indice,	struct_objet **t_objets, integer8 indice, integer8 indice_maximal)
unsigned long indice_maximal)
{	{
struct_arbre *s_noeud;	struct_arbre *s_noeud;

unsigned long i;	//unsigned long i;

if ((s_noeud = malloc(sizeof(struct_arbre))) == NULL)	if ((s_noeud = malloc(sizeof(struct_arbre))) == NULL)
{	{