rpl/src/sequenceur.c - diff

Return to sequenceur.c CVS log

Up to [local] / rpl / src

version 1.13, 2010/04/21 12:30:26	version 1.26, 2010/11/26 11:46:38
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.0.14	RPL/2 (R) version 4.0.20
Copyright (C) 1989-2010 Dr. BERTRAND Joël	Copyright (C) 1989-2010 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.
Line 20	Line 20
*/	*/


#include "rpl.conv.h"	#include "rpl-conv.h"


/*	/*
Line 850 sequenceur(struct_processus *s_etat_proc	Line 850 sequenceur(struct_processus *s_etat_proc
{	{
(*s_etat_processus).erreur_execution =	(*s_etat_processus).erreur_execution =
d_ex_manque_argument;	d_ex_manque_argument;
////////////////////////////////////////////////////////////////////////////////
return(d_erreur);	return(d_erreur);
}	}

Line 1091 sequenceur(struct_processus *s_etat_proc	Line 1090 sequenceur(struct_processus *s_etat_proc
erreur = d_absence_erreur;	erreur = d_absence_erreur;
}	}
}	}
	else if ((*s_etat_processus).recherche_type == 'Y')
	{
	erreur = d_erreur;
	}
else if ((*s_etat_processus).arret_si_exception == d_vrai)	else if ((*s_etat_processus).arret_si_exception == d_vrai)
{	{
drapeau_fin = d_faux;	drapeau_fin = d_faux;