[Bug fortran/59612] iso_fortran_env segfaults with -fdump-fortran-original

[janus at gcc dot gnu.org]

http://gcc.gnu.org/bugzilla/show_bug.cgi?id=59612

janus at gcc dot gnu.org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
           Keywords|                            |ice-on-valid-code
             Status|UNCONFIRMED                 |NEW
   Last reconfirmed|                            |2013-12-28
                 CC|                            |janus at gcc dot gnu.org
     Ever confirmed|0                           |1

--- Comment #1 from janus at gcc dot gnu.org ---
Straightforward patch:

Index: gcc/fortran/dump-parse-tree.c
===================================================================
--- gcc/fortran/dump-parse-tree.c    (revision 206176)
+++ gcc/fortran/dump-parse-tree.c    (working copy)
@@ -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;