From: burnus <burnus@138bc75d-0d04-0410-961f-82ee72b054a4>
Date: Mon, 23 Apr 2007 08:37:19 +0000 (+0000)
Subject: 2007-04-23  Tobias Burnus  <burnus@net-b.de>
X-Git-Tag: upstream/4.9.2~49054
X-Git-Url: http://review.tizen.org/git/?a=commitdiff_plain;h=f8c24a13fb2699bb92000a1eed9ccca634e02347;p=platform%2Fupstream%2Flinaro-gcc.git

2007-04-23  Tobias Burnus  <burnus@net-b.de>

        * primary.c (match_integer_constant): Mention -fno-range-check
        in the error message.



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

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 95afac6..1a6d9f8 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,8 @@
+2007-04-23  Tobias Burnus  <burnus@net-b.de>
+
+	* primary.c (match_integer_constant): Mention -fno-range-check
+	in the error message.
+
 2007-04-21  Jerry DeLisle  <jvdelisle@gcc.gnu.org>
 
 	PR fortran/31495
diff --git a/gcc/fortran/primary.c b/gcc/fortran/primary.c
index 41c7507..902279c 100644
--- a/gcc/fortran/primary.c
+++ b/gcc/fortran/primary.c
@@ -216,7 +216,8 @@ match_integer_constant (gfc_expr **result, int signflag)
 
   if (gfc_range_check (e) != ARITH_OK)
     {
-      gfc_error ("Integer too big for its kind at %C");
+      gfc_error ("Integer too big for its kind at %C. This check can be "
+		 "disabled with the option -fno-range-check");
 
       gfc_free_expr (e);
       return MATCH_ERROR;