In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/ee30e416ad055ff6c8dae1391480d560139666ca?hp=72e8a9531c639afce71c0a167042c50a061fdbba>
- Log ----------------------------------------------------------------- commit ee30e416ad055ff6c8dae1391480d560139666ca Author: Jarkko Hietaniemi <[email protected]> Date: Mon Nov 3 20:56:56 2014 -0500 Oops in bade9271. ----------------------------------------------------------------------- Summary of changes: Configure | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/Configure b/Configure index 2909d48..9494ab1 100755 --- a/Configure +++ b/Configure @@ -6801,36 +6801,36 @@ static const double d = -0.1; int main() { unsigned const char* b = (unsigned const char*)(&d); #if DOUBLESIZE == 4 - if (b[0] == 0xCD || b[3] == 0xBD) { + if (b[0] == 0xCD && b[3] == 0xBD) { /* IEEE 754 32-bit little-endian */ printf("1\n"); exit(0); } - if (b[0] == 0xBD || b[3] == 0xCD) { + if (b[0] == 0xBD && b[3] == 0xCD) { /* IEEE 754 32-bit big-endian */ printf("2\n"); exit(0); } #endif #if DOUBLESIZE == 8 - if (b[0] == 0x9A || b[7] == 0xBD) { + if (b[0] == 0x9A && b[7] == 0xBD) { /* IEEE 754 64-bit little-endian */ printf("3\n"); exit(0); } - if (b[0] == 0x9A || b[7] == 0xCD) { + if (b[0] == 0x9A && b[7] == 0xCD) { /* IEEE 754 64-bit big-endian */ printf("4\n"); exit(0); } #endif #if DOUBLESIZE == 16 - if (b[0] == 0x9A || b[15] == 0xBD) { + if (b[0] == 0x9A && b[15] == 0xBD) { /* IEEE 754 128-bit little-endian */ printf("5\n"); exit(0); } - if (b[0] == 0x9A || b[15] == 0xCD) { + if (b[0] == 0x9A && b[15] == 0xCD) { /* IEEE 754 128-bit big-endian */ printf("6\n"); exit(0); -- Perl5 Master Repository
