--- rpl/src/instructions_n1.c 2013/02/27 17:11:43 1.44 +++ rpl/src/instructions_n1.c 2013/03/20 22:24:36 1.45 @@ -27,11 +27,11 @@ ================================================================================ Fonction 'neg' ================================================================================ - Entrées : + Entrées : -------------------------------------------------------------------------------- Sorties : -------------------------------------------------------------------------------- - Effets de bord : néant + Effets de bord : néant ================================================================================ */ @@ -48,8 +48,8 @@ instruction_neg(struct_processus *s_etat struct_objet *s_objet_argument; struct_objet *s_objet_resultat; - unsigned long i; - unsigned long j; + integer8 i; + integer8 j; (*s_etat_processus).erreur_execution = d_ex; @@ -641,11 +641,11 @@ instruction_neg(struct_processus *s_etat ================================================================================ Fonction 'not' ================================================================================ - Entrées : pointeur sur une struct_processus + Entrées : pointeur sur une struct_processus -------------------------------------------------------------------------------- Sorties : -------------------------------------------------------------------------------- - Effets de bord : néant + Effets de bord : néant ================================================================================ */ @@ -978,11 +978,11 @@ instruction_not(struct_processus *s_etat ================================================================================ Fonction '<>' ================================================================================ - Entrées : + Entrées : -------------------------------------------------------------------------------- Sorties : -------------------------------------------------------------------------------- - Effets de bord : néant + Effets de bord : néant ================================================================================ */ @@ -1003,9 +1003,9 @@ instruction_ne(struct_processus *s_etat_ logical1 difference; - unsigned long i; - unsigned long j; - unsigned long nombre_elements; + integer8 i; + integer8 j; + integer8 nombre_elements; (*s_etat_processus).erreur_execution = d_ex; @@ -2044,11 +2044,11 @@ instruction_ne(struct_processus *s_etat_ ================================================================================ Fonction 'next' ================================================================================ - Entrées : + Entrées : -------------------------------------------------------------------------------- Sorties : -------------------------------------------------------------------------------- - Effets de bord : néant + Effets de bord : néant ================================================================================ */ @@ -2462,11 +2462,11 @@ instruction_next(struct_processus *s_eta ================================================================================ Fonction 'nrand' ================================================================================ - Entrées : structure processus + Entrées : structure processus ------------------------------------------------------------------------------- Sorties : -------------------------------------------------------------------------------- - Effets de bord : néant + Effets de bord : néant ================================================================================ */