rpl/src/indicateurs.c - diff

Return to indicateurs.c CVS log

Up to [local] / rpl / src

Diff for /rpl/src/indicateurs.c between versions 1.1.1.1 and 1.65

CVSweb interface <joel.bertrand@systella.fr>

version 1.1.1.1, 2010/01/26 15:22:45	version 1.65, 2020/01/10 11:15:43
Line 1	Line 1
/*	/*
================================================================================	================================================================================
RPL/2 (R) version 4.0.9	RPL/2 (R) version 4.1.32
Copyright (C) 1989-2010 Dr. BERTRAND Joël	Copyright (C) 1989-2020 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 51 sf(struct_processus *s_etat_processus, u	Line 51 sf(struct_processus *s_etat_processus, u
indice_bloc = indice_drapeau / taille_bloc;	indice_bloc = indice_drapeau / taille_bloc;
indice_bit = indice_drapeau % taille_bloc;	indice_bit = indice_drapeau % taille_bloc;

masque = ((t_8_bits) 1) << (taille_bloc - indice_bit - 1);	masque = (t_8_bits) (((t_8_bits) 1) << (taille_bloc - indice_bit - 1));

(*s_etat_processus).drapeaux_etat[indice_bloc] \|= masque;	(*s_etat_processus).drapeaux_etat[indice_bloc] \|= masque;
}	}
Line 85 cf(struct_processus *s_etat_processus, u	Line 85 cf(struct_processus *s_etat_processus, u
indice_bloc = indice_drapeau / taille_bloc;	indice_bloc = indice_drapeau / taille_bloc;
indice_bit = indice_drapeau % taille_bloc;	indice_bit = indice_drapeau % taille_bloc;

masque = ~(((t_8_bits) 1) << (taille_bloc - indice_bit - 1));	masque = (t_8_bits) (~(((t_8_bits) 1) << (taille_bloc - indice_bit - 1)));

(*s_etat_processus).drapeaux_etat[indice_bloc] &= masque;	(*s_etat_processus).drapeaux_etat[indice_bloc] &= masque;
}	}
Line 119 test_cfsf(struct_processus *s_etat_proce	Line 119 test_cfsf(struct_processus *s_etat_proce
indice_bloc = indice_drapeau / taille_bloc;	indice_bloc = indice_drapeau / taille_bloc;
indice_bit = indice_drapeau % taille_bloc;	indice_bit = indice_drapeau % taille_bloc;

masque = ((t_8_bits) 1) << (taille_bloc - indice_bit - 1);	masque = (t_8_bits) (((t_8_bits) 1) << (taille_bloc - indice_bit - 1));

return((((*s_etat_processus).drapeaux_etat[indice_bloc] & masque) != 0)	return((((*s_etat_processus).drapeaux_etat[indice_bloc] & masque) != 0)
? d_vrai : d_faux);	? d_vrai : d_faux);

Removed from v.1.1.1.1
changed lines
	Added in v.1.65