rpl/src/rplexternals.h - diff

Return to rplexternals.h CVS log

Up to [local] / rpl / src

Diff for /rpl/src/rplexternals.h between versions 1.84 and 1.87

version 1.84, 2017/07/12 15:42:43	version 1.87, 2017/07/30 21:59:41
Line 105	Line 105
#define initializeObject(a, b) do { \	#define initializeObject(a, b) do { \
(a).descripteur_bibliotheque = (b).descripteur_bibliotheque; \	(a).descripteur_bibliotheque = (b).descripteur_bibliotheque; \
(a).extension_type = (b).extension_type; } while(0)	(a).extension_type = (b).extension_type; } while(0)
#define objectContainer(a) ((*a).objet)	#define objectContainer(type, a) ((type ) ((a).objet))
	#define objectOf(a) ((*a).objet)
#define ifIsExternal(a, b) if (((a).type == EXT) && ((a).extension_type == b))	#define ifIsExternal(a, b) if (((a).type == EXT) && ((a).extension_type == b))
#define elseIfIsExternal(a, b) } else if (((*a).type == EXT) && \	#define elseIfIsExternal(a, b) } else if (((*a).type == EXT) && \
((*a).extension_type == b))	((*a).extension_type == b))
Line 149	Line 150
({ __CATCH_SYSTEM_ERROR__; typeof(daisyChain) __daisyChain = daisyChain; \	({ __CATCH_SYSTEM_ERROR__; typeof(daisyChain) __daisyChain = daisyChain; \
if (__daisyChain == NULL) executionError("End of daisy chain"); \	if (__daisyChain == NULL) executionError("End of daisy chain"); \
(__daisyChain == NULL) ? NULL : (*__daisyChain).suivant; })	(__daisyChain == NULL) ? NULL : (*__daisyChain).suivant; })

	#define next suivant
	#define data donnee
	#define daisyChain struct_liste_chainee

#define null NULL	#define null NULL
#define nullify(ptr) __CATCH_SYSTEM_ERROR__; do { ptr = NULL; } while(0)	#define nullify(ptr) __CATCH_SYSTEM_ERROR__; do { ptr = NULL; } while(0)
Line 223	Line 228
unsigned char __taille_bloc; \	unsigned char __taille_bloc; \
unsigned char __type; \	unsigned char __type; \
t_8_bits __masque; \	t_8_bits __masque; \
	void s_etat_processus = (rpl_arguments).s_etat_processus; \
	DISABLE_SET_BUT_NOT_USED_WARNING(s_etat_processus); \
{ \	{ \
(*rpl_arguments).instruction_valide = 'Y'; \	(*rpl_arguments).instruction_valide = 'Y'; \
(*rpl_arguments).erreur = 0; \	(*rpl_arguments).erreur = 0; \

CVSweb interface <joel.bertrand@systella.fr>

Removed from v.1.84
changed lines
	Added in v.1.87