src/libm/e_atan2.c
changeset 4874 8288636b861d
parent 4870 d275c95ddc05
child 6044 35448a5ea044
     1.1 --- a/src/libm/e_atan2.c	Sun Aug 29 16:51:48 2010 -0700
     1.2 +++ b/src/libm/e_atan2.c	Sun Aug 29 16:55:58 2010 -0700
     1.3 @@ -57,8 +57,8 @@
     1.4  	ix = hx&0x7fffffff;
     1.5  	EXTRACT_WORDS(hy,ly,y);
     1.6  	iy = hy&0x7fffffff;
     1.7 -	if(((ix|((lx|-lx)>>31))>0x7ff00000)||
     1.8 -	   ((iy|((ly|-ly)>>31))>0x7ff00000))	/* x or y is NaN */
     1.9 +	if(((ix|((lx|-(int32_t)lx)>>31))>0x7ff00000)||
    1.10 +	   ((iy|((ly|-(int32_t)ly)>>31))>0x7ff00000))	/* x or y is NaN */
    1.11  	   return x+y;
    1.12  	if(((hx-0x3ff00000)|lx)==0) return atan(y);   /* x=1.0 */
    1.13  	m = ((hy>>31)&1)|((hx>>30)&2);	/* 2*sign(x)+sign(y) */