rpl/src/sequenceur.c - diff

Return to sequenceur.c CVS log

Up to [local] / rpl / src

Diff for /rpl/src/sequenceur.c between versions 1.56 and 1.58

version 1.56, 2012/09/29 17:53:02	version 1.58, 2012/10/01 11:05:09
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.1.10	RPL/2 (R) version 4.1.11
Copyright (C) 1989-2012 Dr. BERTRAND JoÃ«l	Copyright (C) 1989-2012 Dr. BERTRAND Joël

This file is part of RPL/2.	This file is part of RPL/2.

Line 1244 sequenceur(struct_processus *s_etat_proc	Line 1244 sequenceur(struct_processus *s_etat_proc
analyse(s_etat_processus, NULL);	analyse(s_etat_processus, NULL);
}	}
else if ((strcmp(instruction_majuscule, "FOR") == 0)	else if ((strcmp(instruction_majuscule, "FOR") == 0)
\|\| (strcmp(instruction_majuscule, "START")	\|\| (strcmp(instruction_majuscule, "FORALL")
== 0))	== 0) \|\| (strcmp(instruction_majuscule,
	"START") == 0))
{	{
empilement_pile_systeme(s_etat_processus);	empilement_pile_systeme(s_etat_processus);

Line 1298 sequenceur(struct_processus *s_etat_proc	Line 1299 sequenceur(struct_processus *s_etat_proc
* LibÃ©ration des compteurs de boucle.	* LibÃ©ration des compteurs de boucle.
*/	*/

presence_compteur = (((s_etat_processus)	presence_compteur = ((((s_etat_processus)
	.l_base_pile_systeme).type_cloture
	== 'F') \|\| (((s_etat_processus)
.l_base_pile_systeme).type_cloture	.l_base_pile_systeme).type_cloture
== 'F') ? d_vrai : d_faux;	== 'A')) ? d_vrai : d_faux;

if ((((s_etat_processus).l_base_pile_systeme)	if ((((s_etat_processus).l_base_pile_systeme)
.type_cloture != 'S') &&	.type_cloture != 'S') &&

CVSweb interface <joel.bertrand@systella.fr>

Removed from v.1.56
changed lines
	Added in v.1.58