[git] CMU Common Lisp branch master updated. snapshot-2014-06-90-g2ecd185

Raymond Toy rtoy at common-lisp.net
Mon Aug 4 05:21:37 UTC 2014

This is an automated email from the git hooks/post-receive script. It was
generated because a ref change was pushed to the repository containing
the project "CMU Common Lisp".

The branch, master has been updated
       via  2ecd18513a756d7583191cabb48d87037be365d1 (commit)
      from  e334b681182e7a354db0e66caa41abe1e1bbcec5 (commit)

Those revisions listed above that are new to this repository have
not appeared on any other notification email; so we list those
revisions in full, below.

- Log -----------------------------------------------------------------
commit 2ecd18513a756d7583191cabb48d87037be365d1
Author: Raymond Toy <toy.raymond at gmail.com>
Date:   Sun Aug 3 22:21:30 2014 -0700

    Fix aliasing issue noted by gcc 4.4.1 on Linux.
    Remove the variables i0 and i1 since they weren't used anywhere
    anyway.  They weren't used in the original code either.

diff --git a/src/lisp/e_pow.c b/src/lisp/e_pow.c
index 914d7d9..c0f0075 100644
--- a/src/lisp/e_pow.c
+++ b/src/lisp/e_pow.c
@@ -101,14 +101,13 @@ ivln2_l  =  1.92596299112661746887e-08; /* 0x3E54AE0B, 0xF85DDF44 =1/ln2 tail*/
 	double z,ax,z_h,z_l,p_h,p_l;
 	double y1,t1,t2,r,s,t,u,v,w;
-	int i0,i1,i,j,k,yisint,n;
+        int ,i,j,k,yisint,n;
 	int hx,hy,ix,iy;
 	unsigned lx,ly;
 	union { int i[2]; double d; } ux;
 	union { int i[2]; double d; } uy;
 	union { int i[2]; double d; } utmp;
-	i0 = ((*(int*)&one)>>29)^1; i1=1-i0;
 	ux.d = x;
 	hx = ux.i[HIWORD]; lx = ux.i[LOWORD];
 	uy.d = y;


Summary of changes:
 src/lisp/e_pow.c |    3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

CMU Common Lisp

More information about the cmucl-cvs mailing list