summaryrefslogtreecommitdiff
path: root/gcc/fortran/dump-parse-tree.c
diff options
context:
space:
mode:
authorjanus <janus@138bc75d-0d04-0410-961f-82ee72b054a4>2013-12-29 17:20:50 +0000
committerjanus <janus@138bc75d-0d04-0410-961f-82ee72b054a4>2013-12-29 17:20:50 +0000
commit26f91b7f153357e230dd1ed3c9dd1282ca76104a (patch)
treeb0baf3e11e4fc5082a4e251017d306f41d84619b /gcc/fortran/dump-parse-tree.c
parentfc40508b6cc56389817d0059861f464984865f6a (diff)
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. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@206237 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/fortran/dump-parse-tree.c')
-rw-r--r--gcc/fortran/dump-parse-tree.c3
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/fortran/dump-parse-tree.c b/gcc/fortran/dump-parse-tree.c
index 14ff00412193..501a4ebb5668 100644
--- 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;