The R Project SVN R

Rev

Rev 2276 | Rev 5458 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2276 Rev 5108
Line 58... Line 58...
58 
    }
 58 
    }
59 
    else if (a == 0 || b == 0) {
 59 
    else if (a == 0 || b == 0) {
60 
	return ML_POSINF;
 60 
	return ML_POSINF;
61 
    }
 61 
    }
62 
#ifdef IEEE_754
 62 
#ifdef IEEE_754
63 
    else if (!FINITE(a) || !FINITE(b)) {
 63 
    else if (!R_FINITE(a) || !R_FINITE(b)) {
64 
	return 0;
 64 
	return 0;
65 
    }
 65 
    }
66 
#endif
 66 
#endif
67 
 
 67 
 
68 
    if (a + b < xmax)
 68 
    if (a + b < xmax)