version 1.40, 2012/10/07 21:57:48
|
version 1.77, 2025/04/15 10:17:51
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.11 |
RPL/2 (R) version 4.1.36 |
Copyright (C) 1989-2012 Dr. BERTRAND Joël |
Copyright (C) 1989-2025 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 119 creation_variable_statique(struct_proces
|
Line 119 creation_variable_statique(struct_proces
|
|
|
(*(*l_nouvel_element).variable) = (*s_variable); |
(*(*l_nouvel_element).variable) = (*s_variable); |
|
|
/* |
|
if (((*(*l_nouvel_element).variable).nom = malloc((strlen((*s_variable).nom) |
|
+ 1) * sizeof(unsigned char))) == NULL) |
|
{ |
|
(*s_etat_processus).erreur_systeme = d_es_allocation_memoire; |
|
return(d_erreur); |
|
} |
|
|
|
strcpy((*(*l_nouvel_element).variable).nom, (*s_variable).nom); |
|
*/ |
|
|
|
(*l_nouvel_element).suivant = (*s_etat_processus) |
(*l_nouvel_element).suivant = (*s_etat_processus) |
.l_liste_variables_statiques; |
.l_liste_variables_statiques; |
(*l_nouvel_element).precedent = NULL; |
(*l_nouvel_element).precedent = NULL; |
Line 389 retrait_variable_statique(struct_process
|
Line 378 retrait_variable_statique(struct_process
|
(*s_etat_processus).erreur_systeme = d_es_variable_introuvable; |
(*s_etat_processus).erreur_systeme = d_es_variable_introuvable; |
} |
} |
|
|
return erreur; |
return(erreur); |
} |
} |
|
|
|
|