version 1.80, 2015/01/05 13:12:31
|
version 1.83, 2015/02/19 11:01:19
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.19 |
RPL/2 (R) version 4.1.21 |
Copyright (C) 1989-2015 Dr. BERTRAND Joël |
Copyright (C) 1989-2015 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
Line 1541 formateur_fichier(struct_processus *s_et
|
Line 1541 formateur_fichier(struct_processus *s_et
|
} |
} |
else |
else |
{ |
{ |
if ((format_chaine = conversion_majuscule((unsigned char *) |
if ((format_chaine = conversion_majuscule( |
|
s_etat_processus, (unsigned char *) |
(*(*l_element_courant_format).donnee).objet)) |
(*(*l_element_courant_format).donnee).objet)) |
== NULL) |
== NULL) |
{ |
{ |
Line 1943 formateur_fichier(struct_processus *s_et
|
Line 1944 formateur_fichier(struct_processus *s_et
|
else |
else |
{ |
{ |
if ((format_chaine = conversion_majuscule( |
if ((format_chaine = conversion_majuscule( |
|
s_etat_processus, |
(unsigned char *) (*(*((struct_tableau *) |
(unsigned char *) (*(*((struct_tableau *) |
(*s_format).objet)).elements[i]).objet)) |
(*s_format).objet)).elements[i]).objet)) |
== NULL) |
== NULL) |
Line 3767 formateur_fichier(struct_processus *s_et
|
Line 3769 formateur_fichier(struct_processus *s_et
|
} |
} |
else |
else |
{ |
{ |
if ((format_chaine = conversion_majuscule((unsigned char *) |
if ((format_chaine = conversion_majuscule( |
|
s_etat_processus, (unsigned char *) |
(*(*l_element_courant_format).donnee).objet)) |
(*(*l_element_courant_format).donnee).objet)) |
== NULL) |
== NULL) |
{ |
{ |