re PR fortran/59612 ([F03] iso_fortran_env segfaults with -fdump-fortran-original)

2013-12-29  Janus Weil  <janus@gcc.gnu.org>

	PR fortran/59612
	* dump-parse-tree.c (show_typespec): Check for charlen.
	* invoke.texi: Fix documentation of -fdump-fortran-optimized and
	-fdump-parse-tree.

From-SVN: r206237

diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 2a1e1972e70f2fcefa2ce0abba52a3635e8ac42d..60922b8645015df219a617b8be2c71e0ca5e971f 100644 (file)
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,10 @@
+2013-12-29  Janus Weil  <janus@gcc.gnu.org>
+
+       PR fortran/59612
+       * dump-parse-tree.c (show_typespec): Check for charlen.
+       * invoke.texi: Fix documentation of -fdump-fortran-optimized and
+       -fdump-parse-tree.
+
 2013-12-18  Janus Weil  <janus@gcc.gnu.org>
 
        PR fortran/59493

diff --git a/gcc/fortran/dump-parse-tree.c b/gcc/fortran/dump-parse-tree.c
index 14ff00412193962d2be11b3a1493ccb5b27131b6..501a4ebb56681e98a4ef1e21cb470a0edac010f7 100644 (file)
--- a/gcc/fortran/dump-parse-tree.c
+++ b/gcc/fortran/dump-parse-tree.c
@@ -110,7 +110,8 @@ show_typespec (gfc_typespec *ts)
       break;
 
     case BT_CHARACTER:
-      show_expr (ts->u.cl->length);
+      if (ts->u.cl)
+       show_expr (ts->u.cl->length);
       fprintf(dumpfile, " %d", ts->kind);
       break;
 

diff --git a/gcc/fortran/invoke.texi b/gcc/fortran/invoke.texi
index 6a5c8a14471197d6cb984bfbab6d0448d9c0d9f7..535f34c6f53d0d8f7054c3d45f5b204ec1626edc 100644 (file)
--- a/gcc/fortran/invoke.texi
+++ b/gcc/fortran/invoke.texi
@@ -989,11 +989,12 @@ Output the internal parse tree after translating the source program
 into internal representation.  Only really useful for debugging the
 GNU Fortran compiler itself.
 
-@item -fdump-optimized-tree
+@item -fdump-fortran-optimized
 @opindex @code{fdump-fortran-optimized}
 Output the parse tree after front-end optimization.  Only really
 useful for debugging the GNU Fortran compiler itself.
 
+@item -fdump-parse-tree
 @opindex @code{fdump-parse-tree}
 Output the internal parse tree after translating the source program
 into internal representation.  Only really useful for debugging the