diff --git a/src/lisp/e_cosh.c b/src/lisp/e_cosh.c
index f022ec040930efe67b6894b6c129ff07eabb3536..28b6c3c4f6f7dde35fe652694fd03d42d6f054b1 100644
--- a/src/lisp/e_cosh.c
+++ b/src/lisp/e_cosh.c
@@ -78,7 +78,11 @@ static double one = 1.0, half=0.5, huge = 1.0e300;
 	if (ix < 0x40862E42)  return half*__ieee754_exp(fabs(x));
 
     /* |x| in [log(maxdouble), overflowthresold] */
+#if 0
 	lx = *( (((*(unsigned*)&one)>>29)) + (unsigned*)&x);
+#else
+        lx = ux.i[LOWORD];
+#endif
 	if (ix<0x408633CE || 
 	      ((ix==0x408633ce)&&(lx<=(unsigned)0x8fb9f87d))) {
 	    w = __ieee754_exp(half*fabs(x));
diff --git a/src/lisp/e_sinh.c b/src/lisp/e_sinh.c
index 84447418a8eba593e6809df9f53f3dac42aa61de..76b3418d09cfffb37521521a0fe97b464716cc84 100644
--- a/src/lisp/e_sinh.c
+++ b/src/lisp/e_sinh.c
@@ -72,7 +72,11 @@ static double one = 1.0, shuge = 1.0e307;
 	if (ix < 0x40862E42)  return h*__ieee754_exp(fabs(x));
 
     /* |x| in [log(maxdouble), overflowthresold] */
+#if 0
 	lx = *( (((*(unsigned*)&one)>>29)) + (unsigned*)&x);
+#else
+        lx = ux.i[LOWORD];
+#endif
 	if (ix<0x408633CE || ((ix==0x408633ce)&&(lx<=(unsigned)0x8fb9f87d))) {
 	    w = __ieee754_exp(0.5*fabs(x));
 	    t = h*w;