diff options
| author | nijtmans <nijtmans> | 2010-12-01 09:58:51 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-12-01 09:58:51 (GMT) |
| commit | b6d1219a7a9fcdb49db66a4217f34bd79ba40bba (patch) | |
| tree | ff3e45f716f97fd6829df5f3c3f6ff70710f2771 /generic/tclStrToD.c | |
| parent | 79fc377e16fe1fb9074418c7fa5a4e06b9da28f4 (diff) | |
| download | tcl-b6d1219a7a9fcdb49db66a4217f34bd79ba40bba.zip tcl-b6d1219a7a9fcdb49db66a4217f34bd79ba40bba.tar.gz tcl-b6d1219a7a9fcdb49db66a4217f34bd79ba40bba.tar.bz2 | |
fix gcc 64-bit warnings: cast from pointer to integer of different size
fix gcc(-4.5.2) warning: 'static' is not at beginning of declaration
Diffstat (limited to 'generic/tclStrToD.c')
| -rwxr-xr-x | generic/tclStrToD.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c index 69be044..983aeec 100755 --- a/generic/tclStrToD.c +++ b/generic/tclStrToD.c @@ -14,7 +14,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclStrToD.c,v 1.48 2010/11/29 02:27:11 kennykb Exp $ + * RCS: @(#) $Id: tclStrToD.c,v 1.49 2010/12/01 09:58:51 nijtmans Exp $ * *---------------------------------------------------------------------- */ @@ -3093,7 +3093,7 @@ ShouldBankerRoundUpPowD(mp_int* b, /* 1 if the digit is odd, 0 if even */ { int i; - const static mp_digit topbit = (1<<(DIGIT_BIT-1)); + static const mp_digit topbit = (1<<(DIGIT_BIT-1)); if (b->used < sd || (b->dp[sd-1] & topbit) == 0) { return 0; } |