version 1.28, 2011/08/09 11:31:31
|
version 1.29, 2011/09/01 12:14:56
|
Line 420 instruction_drop2(struct_processus *s_et
|
Line 420 instruction_drop2(struct_processus *s_et
|
{ |
{ |
struct_objet *s_objet; |
struct_objet *s_objet; |
|
|
logical1 erreur; |
|
|
|
(*s_etat_processus).erreur_execution = d_ex; |
(*s_etat_processus).erreur_execution = d_ex; |
|
|
if ((*s_etat_processus).affichage_arguments == 'Y') |
if ((*s_etat_processus).affichage_arguments == 'Y') |
Line 488 instruction_drop2(struct_processus *s_et
|
Line 486 instruction_drop2(struct_processus *s_et
|
} |
} |
} |
} |
|
|
if ((*s_etat_processus).hauteur_pile_operationnelle < 2) |
if (depilement(s_etat_processus, &((*s_etat_processus).l_base_pile), |
|
&s_objet) == d_erreur) |
{ |
{ |
(*s_etat_processus).erreur_execution = d_ex_manque_argument; |
(*s_etat_processus).erreur_execution = d_ex_manque_argument; |
return; |
return; |
} |
} |
|
|
erreur = depilement(s_etat_processus, &((*s_etat_processus).l_base_pile), |
|
&s_objet); |
|
liberation(s_etat_processus, s_objet); |
liberation(s_etat_processus, s_objet); |
|
|
erreur = depilement(s_etat_processus, &((*s_etat_processus).l_base_pile), |
if (depilement(s_etat_processus, &((*s_etat_processus).l_base_pile), |
&s_objet); |
&s_objet) == d_erreur) |
|
{ |
|
(*s_etat_processus).erreur_execution = d_ex_manque_argument; |
|
return; |
|
} |
|
|
liberation(s_etat_processus, s_objet); |
liberation(s_etat_processus, s_objet); |
|
|
return; |
return; |