From 64214dabd303be6b1134238ee99d05be78e83ff8 Mon Sep 17 00:00:00 2001 From: manu Date: Thu, 22 Mar 2007 23:04:24 +0000 Subject: 2007-03-22 Manuel Lopez-Ibanez PR other/23572 * c-lex.c (interpret_float): On overflow, emit pedantic warning if infinities not supported, otherwise emit warning if -Woverflow. On underflow, emit warning if -Woverflow. * real.c (real_from_string): Return -1 if underflow, +1 if overflow and 0 otherwise. * real.h (real_from_string): Update declaration testsuite/ * gcc.dg/float-range-4.c: New. * gcc.dg/float-range-1.c: Update. Test for a warning. * gcc.dg/float-range-3.c: New. * gcc.dg/float-range-5.c: New. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@123137 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/testsuite/gcc.dg/float-range-5.c | 39 ++++++++++++++++++++++++++++++++++++ 1 file changed, 39 insertions(+) create mode 100644 gcc/testsuite/gcc.dg/float-range-5.c (limited to 'gcc/testsuite/gcc.dg/float-range-5.c') diff --git a/gcc/testsuite/gcc.dg/float-range-5.c b/gcc/testsuite/gcc.dg/float-range-5.c new file mode 100644 index 00000000000..a19bd5fa3ad --- /dev/null +++ b/gcc/testsuite/gcc.dg/float-range-5.c @@ -0,0 +1,39 @@ +/* PR 23572 : warnings for out of range floating-point constants + Test that they are NOT pedantic warnings. */ +/* { dg-compile } */ +/* { dg-options "-pedantic-errors -std=c99" } */ +#include + +void overflow(void) +{ + float f1 = 3.5E+38f; /* { dg-warning "warning: floating constant exceeds range" } */ + float f2 = -3.5E+38f; /* { dg-warning "warning: floating constant exceeds range" } */ + float f3 = FP_INFINITE; + float f4 = -FP_INFINITE; + + double d1 = 1.9E+308; /* { dg-warning "warning: floating constant exceeds range" } */ + double d2 = -1.9E+308; /* { dg-warning "warning: floating constant exceeds range" } */ + double d3 = FP_INFINITE; + double d4 = -FP_INFINITE; +} + +void underflow(void) +{ + float f11 = 3.3E-10000000000000000000f; /* { dg-warning "warning: floating constant truncated to zero" } */ + float f22 = -3.3E-10000000000000000000f; /* { dg-warning "warning: floating constant truncated to zero" } */ + float f1 = 3.3E-46f; /* { dg-warning "warning: floating constant truncated to zero" } */ + float f2 = -3.3E-46f; /* { dg-warning "warning: floating constant truncated to zero" } */ + float f3 = 0; + float f4 = -0; + float f5 = 0.0; + float f6 = -0.0; + + double d11 = 3.3E-10000000000000000000; /* { dg-warning "warning: floating constant truncated to zero" } */ + double d22 = -3.3E-10000000000000000000; /* { dg-warning "warning: floating constant truncated to zero" } */ + double d1 = 1.4E-325; /* { dg-warning "warning: floating constant truncated to zero" } */ + double d2 = -1.4E-325; /* { dg-warning "warning: floating constant truncated to zero" } */ + double d3 = 0; + double d4 = -0; + double d5 = 0.0; + double d6 = -0.0; +} -- cgit v1.2.1