version 1.36, 2011/11/26 10:01:26
|
version 1.49, 2013/02/26 19:56:12
|
Line 1
|
Line 1
|
/* |
/* |
================================================================================ |
================================================================================ |
RPL/2 (R) version 4.1.5 |
RPL/2 (R) version 4.1.12 |
Copyright (C) 1989-2011 Dr. BERTRAND Joël |
Copyright (C) 1989-2013 Dr. BERTRAND Joël |
|
|
This file is part of RPL/2. |
This file is part of RPL/2. |
|
|
Line 1496 formateur_fichier(struct_processus *s_et
|
Line 1496 formateur_fichier(struct_processus *s_et
|
return(NULL); |
return(NULL); |
} |
} |
|
|
position_3 = strlen(format_chaine); |
position_3 = strlen(format_chaine) - 1; |
format_chaine[--position_3] = d_code_fin_chaine; |
|
|
if (format_chaine[position_3] != ')') |
|
{ |
|
free(chaine); |
|
free(format_chaine); |
|
|
|
(*s_etat_processus).erreur_execution = |
|
d_ex_erreur_format_fichier; |
|
return(NULL); |
|
} |
|
|
|
format_chaine[position_3] = d_code_fin_chaine; |
|
|
position_2 = position_1; |
position_2 = position_1; |
|
|
Line 6193 formateur_fichier_binaire_nombre(struct_
|
Line 6204 formateur_fichier_binaire_nombre(struct_
|
|
|
return(chaine); |
return(chaine); |
} |
} |
|
|
|
// vim: ts=4 |