2007-08-09 Tobias Burnus <burnus@net-b.de>

	PR fortran/33001
	* arith.c (arith_error): Point in the error message
	to -fno-range-check.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127321 138bc75d-0d04-0410-961f-82ee72b054a4

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 00692f9..894f3d9 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2007-08-09  Tobias Burnus  <burnus@net-b.de>
+
+       PR fortran/33001
+       * arith.c (arith_error): Point in the error message
+       to -fno-range-check.
+
 2007-08-09  Francois-Xavier Coudert  <fxcoudert@gcc.gnu.org>
 
        PR fortran/32902

diff --git a/gcc/fortran/arith.c b/gcc/fortran/arith.c
index 1f6fa32..f95f5e7 100644 (file)
--- a/gcc/fortran/arith.c
+++ b/gcc/fortran/arith.c
@@ -1981,7 +1981,8 @@ arith_error (arith rc, gfc_typespec *from, gfc_typespec *to, locus *where)
                 gfc_typename (from), gfc_typename (to), where);
       break;
     case ARITH_OVERFLOW:
-      gfc_error ("Arithmetic overflow converting %s to %s at %L",
+      gfc_error ("Arithmetic overflow converting %s to %s at %L. This check "
+                "can be disabled with the option -fno-range-check",
                 gfc_typename (from), gfc_typename (to), where);
       break;
     case ARITH_UNDERFLOW: