--- rpl/src/rplexternals.h 2017/07/10 14:47:59 1.83 +++ rpl/src/rplexternals.h 2017/07/30 21:59:41 1.87 @@ -105,7 +105,8 @@ #define initializeObject(a, b) do { \ (*a).descripteur_bibliotheque = (*b).descripteur_bibliotheque; \ (*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 elseIfIsExternal(a, b) } else if (((*a).type == EXT) && \ ((*a).extension_type == b)) @@ -149,6 +150,10 @@ ({ __CATCH_SYSTEM_ERROR__; typeof(daisyChain) __daisyChain = daisyChain; \ if (__daisyChain == NULL) executionError("End of daisy chain"); \ (__daisyChain == NULL) ? NULL : (*__daisyChain).suivant; }) + +#define next suivant +#define data donnee +#define daisyChain struct_liste_chainee #define null NULL #define nullify(ptr) __CATCH_SYSTEM_ERROR__; do { ptr = NULL; } while(0) @@ -223,6 +228,8 @@ unsigned char __taille_bloc; \ unsigned char __type; \ 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).erreur = 0; \ @@ -364,8 +371,7 @@ #define endSubroutine END } #define notice(s, ...) __CATCH_SYSTEM_ERROR__; \ - do { if (affichage_rplso == d_vrai) \ - { ufprintf(s, __VA_ARGS__); fflush(s); } } while(0) + do { ufprintf(s, __VA_ARGS__); fflush(s); } while(0) #define logger(...) __CATCH_SYSTEM_ERROR__; \ do { syslog(LOG_NOTICE, __VA_ARGS__); } while(0)