aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorSteven G. Kargl <kargl@gcc.gnu.org>2019-10-23 23:29:25 +0000
committerSteven G. Kargl <kargl@gcc.gnu.org>2019-10-23 23:29:25 +0000
commite288c49dd07f5d202c7577e65b7ae5ea861d5ee0 (patch)
treee3a58cb73a698a46ab4aa1ce1df3fca8267e4896 /gcc
parentca06b86c2fda0d21f44f047983528a9723cb6fea (diff)
downloadgcc-e288c49dd07f5d202c7577e65b7ae5ea861d5ee0.zip
gcc-e288c49dd07f5d202c7577e65b7ae5ea861d5ee0.tar.gz
gcc-e288c49dd07f5d202c7577e65b7ae5ea861d5ee0.tar.bz2
2019-10-23 Steven G. Kargl <kargl@gcc.gnu.org>
dump-parse-tree.c (show_expr): Add dumping of BT_BOZ constants. From-SVN: r277358
Diffstat (limited to 'gcc')
-rw-r--r--gcc/fortran/ChangeLog4
-rw-r--r--gcc/fortran/dump-parse-tree.c10
2 files changed, 14 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog
index 841aa66..5bb04d7 100644
--- a/gcc/fortran/ChangeLog
+++ b/gcc/fortran/ChangeLog
@@ -1,3 +1,7 @@
+2019-10-23 Steven G. Kargl <kargl@gcc.gnu.org>
+
+ dump-parse-tree.c (show_expr): Add dumping of BT_BOZ constants.
+
2019-10-22 Steven G. Kargl <kargl@gcc.gnu.org>
PR fortran/92174
diff --git a/gcc/fortran/dump-parse-tree.c b/gcc/fortran/dump-parse-tree.c
index 9d7b26f..9d7aad1 100644
--- a/gcc/fortran/dump-parse-tree.c
+++ b/gcc/fortran/dump-parse-tree.c
@@ -559,6 +559,16 @@ show_expr (gfc_expr *p)
fputc (')', dumpfile);
break;
+ case BT_BOZ:
+ if (p->boz.rdx == 2)
+ fputs ("b'", dumpfile);
+ else if (p->boz.rdx == 8)
+ fputs ("o'", dumpfile);
+ else
+ fputs ("z'", dumpfile);
+ fprintf (dumpfile, "%s'", p->boz.str);
+ break;
+
case BT_HOLLERITH:
fprintf (dumpfile, HOST_WIDE_INT_PRINT_DEC "H",
p->representation.length);