comparison src/floatfns.c @ 4828:f31c12360354

fix warnings
author Ben Wing <ben@xemacs.org>
date Sun, 27 Dec 2009 20:16:19 -0600
parents fcc7e89d5e68
children 6c0bb4d2c23a
comparison
equal deleted inserted replaced
4827:11daf37dae4d 4828:f31c12360354
1759 round_one_bigfloat_1 (bigfloat number) 1759 round_one_bigfloat_1 (bigfloat number)
1760 { 1760 {
1761 Lisp_Object res0; 1761 Lisp_Object res0;
1762 unsigned long prec = bigfloat_get_prec (number); 1762 unsigned long prec = bigfloat_get_prec (number);
1763 1763
1764 #if 0
1765 /* This causes the following GCC warning:
1766
1767 /xemacs/latest-fix/src/floatfns.c:1764: warning: dereferencing type-punned pointer will break strict-aliasing rules
1768
1769 and furthermore, it's a useless assert, since `number' is stored on
1770 the stack and so its address can never be the same as `scratch_bigfloat'
1771 or `scratch_bigfloat2', which are stored in the data segment.
1772
1773 -- ben */
1764 assert ((bigfloat *)(&number) != (bigfloat *)&scratch_bigfloat 1774 assert ((bigfloat *)(&number) != (bigfloat *)&scratch_bigfloat
1765 && (bigfloat *)(&number) != (bigfloat *)(&scratch_bigfloat2)); 1775 && (bigfloat *)(&number) != (bigfloat *)(&scratch_bigfloat2));
1776 #endif
1766 1777
1767 bigfloat_set_prec (scratch_bigfloat, prec); 1778 bigfloat_set_prec (scratch_bigfloat, prec);
1768 bigfloat_set_prec (scratch_bigfloat2, prec); 1779 bigfloat_set_prec (scratch_bigfloat2, prec);
1769 1780
1770 bigfloat_set_double (scratch_bigfloat, 0.5); 1781 bigfloat_set_double (scratch_bigfloat, 0.5);