aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
Diffstat (limited to 'gcc')
-rw-r--r--gcc/fortran/ChangeLog6
-rw-r--r--gcc/fortran/parse.c1
2 files changed, 7 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index e76b07e..764f9e9 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,9 @@
+2006-05-07 Francois-Xavier Coudert <coudert@clipper.ens.fr>
+
+ PR fortran/27378
+ * parse.c (next_statement): Add check to avoid an ICE when
+ gfc_current_locus.lb is not set.
+
2006-05-07 Tobias Schlüter <tobias.schlueter@physik.uni-muenchen.de>
PR fortran/27457
diff --git a/gcc/fortran/parse.c b/gcc/fortran/parse.c
index 5fb9ce1..2b04904 100644
--- a/gcc/fortran/parse.c
+++ b/gcc/fortran/parse.c
@@ -624,6 +624,7 @@ next_statement (void)
if (gfc_at_eol ())
{
if (gfc_option.warn_line_truncation
+ && gfc_current_locus.lb
&& gfc_current_locus.lb->truncated)
gfc_warning_now ("Line truncated at %C");