diff options
| author | Thomas Koenig <tkoenig@gcc.gnu.org> | 2016-08-15 19:34:48 +0000 |
|---|---|---|
| committer | Thomas Koenig <tkoenig@gcc.gnu.org> | 2016-08-15 19:34:48 +0000 |
| commit | 874be74ab3d68a57e7938900e9e1364b8101ade9 (patch) | |
| tree | 3c481404c83e4b220d69a381d2e69ff563ed0afe /gcc/fortran/dump-parse-tree.c | |
| parent | 432baa029c933e11934dddfd7ec355dcbdb4ea67 (diff) | |
| download | gcc-874be74ab3d68a57e7938900e9e1364b8101ade9.zip gcc-874be74ab3d68a57e7938900e9e1364b8101ade9.tar.gz gcc-874be74ab3d68a57e7938900e9e1364b8101ade9.tar.bz2 | |
frontend-passes.c (create_var): Set ts.deferred for deferred-length character variables.
2016-08-15 Thomas Koenig <tkoenig@gcc.gnu.org>
* frontend-passes.c (create_var): Set ts.deferred for
deferred-length character variables.
* dump-parse-tree.c (show_typespec): Also dump
is_c_interop, is_iso_c and deferred flags.
From-SVN: r239488
Diffstat (limited to 'gcc/fortran/dump-parse-tree.c')
| -rw-r--r-- | gcc/fortran/dump-parse-tree.c | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/fortran/dump-parse-tree.c b/gcc/fortran/dump-parse-tree.c index f507434..8c24074 100644 --- a/gcc/fortran/dump-parse-tree.c +++ b/gcc/fortran/dump-parse-tree.c @@ -120,6 +120,14 @@ show_typespec (gfc_typespec *ts) fprintf (dumpfile, "%d", ts->kind); break; } + if (ts->is_c_interop) + fputs (" C_INTEROP", dumpfile); + + if (ts->is_iso_c) + fputs (" ISO_C", dumpfile); + + if (ts->deferred) + fputs (" DEFERRED", dumpfile); fputc (')', dumpfile); } |