dump-parse-tree.c (show_expr): Also replace with dumpfile for showing values for forgotten case.

2017-05-25  Thomas Koenig  <tkoenig@gcc.gnu.org>

	* dump-parse-tree.c (show_expr):  Also replace
	with dumpfile for showing values for forgotten
	case.

From-SVN: r248456
This commit is contained in:
Thomas Koenig 2017-05-25 12:21:22 +00:00
parent cdfee50a5b
commit 8442a5fbf0
2 changed files with 7 additions and 1 deletions

View File

@ -1,3 +1,9 @@
2017-05-25 Thomas Koenig <tkoenig@gcc.gnu.org>
* dump-parse-tree.c (show_expr): Also replace
with dumpfile for showing values for forgotten
case.
2017-05-24 Thomas Koenig <tkoenig@gcc.gnu.org>
* dump-parse-tree.c (show_expr): Replace stdout

View File

@ -456,7 +456,7 @@ show_expr (gfc_expr *p)
fputc (' ', dumpfile);
mpfr_out_str (stdout, 10, 0, mpc_imagref (p->value.complex),
mpfr_out_str (dumpfile, 10, 0, mpc_imagref (p->value.complex),
GFC_RND_MODE);
if (p->ts.kind != gfc_default_complex_kind)
fprintf (dumpfile, "_%d", p->ts.kind);