version 1.35, 2011/07/25 07:44:54
|
version 1.37, 2011/08/01 10:01:37
|
Line 3653 formateur_reel(struct_processus *s_etat_
|
Line 3653 formateur_reel(struct_processus *s_etat_
|
|
|
if (type == 'R') |
if (type == 'R') |
{ |
{ |
|
# ifdef FP_INFINITE |
|
if (isinf((*((real8 *) valeur_numerique)))) |
|
{ |
|
strcpy(chaine, "infinity"); |
|
return(chaine); |
|
} |
|
# endif |
|
|
|
if (isnan((*((real8 *) valeur_numerique)))) |
|
{ |
|
strcpy(chaine, "undef"); |
|
return(chaine); |
|
} |
|
|
tampon_reel = *((real8 *) valeur_numerique); |
tampon_reel = *((real8 *) valeur_numerique); |
|
|
if (tampon_reel > ((real8) 0)) |
if (tampon_reel > ((real8) 0)) |