version 1.21, 2011/06/09 14:48:36
|
version 1.28, 2011/06/27 09:04:57
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.0.prerelease.0 |
RPL/2 (R) version 4.1.0 |
Copyright (C) 1989-2011 Dr. BERTRAND Joël |
Copyright (C) 1989-2011 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
Line 720 instruction_drws(struct_processus *s_eta
|
Line 720 instruction_drws(struct_processus *s_eta
|
* Aucune variable ds_sdat n'existe. |
* Aucune variable ds_sdat n'existe. |
*/ |
*/ |
|
|
(*s_etat_processus).erreur_execution = d_ex_absence_observations; |
if ((*s_etat_processus).erreur_execution == d_ex) |
(*s_etat_processus).erreur_systeme = d_es; |
{ |
|
(*s_etat_processus).erreur_execution = d_ex_absence_observations; |
|
} |
|
|
return; |
(*s_etat_processus).erreur_systeme = d_es; |
} |
|
|
|
if ((s_objet_statistique = (*(*s_etat_processus).pointeur_variable_courante) |
|
.objet) == NULL) |
|
{ |
|
(*s_etat_processus).erreur_execution = d_ex_variable_partagee; |
|
return; |
return; |
} |
} |
|
|