diff options
| author | Richard Biener <rguenther@suse.de> | 2014-04-08 12:57:07 +0000 |
|---|---|---|
| committer | Richard Biener <rguenth@gcc.gnu.org> | 2014-04-08 12:57:07 +0000 |
| commit | 3fa68ccbb6bb62d9e86aa7131d52e1eeb080c873 (patch) | |
| tree | 846910cd12a9cb649057a1f1752d5e69a70961d4 /gcc/tree-pretty-print.c | |
| parent | 9038ae48b816983065d8705f38b35144fdc4ddd7 (diff) | |
| download | gcc-3fa68ccbb6bb62d9e86aa7131d52e1eeb080c873.zip gcc-3fa68ccbb6bb62d9e86aa7131d52e1eeb080c873.tar.gz gcc-3fa68ccbb6bb62d9e86aa7131d52e1eeb080c873.tar.bz2 | |
re PR libfortran/60706 (FAIL: gfortran.dg/size_kind_2.f90 -O scan-tree-dump original "var2 = 42949673 00;")
2014-04-08 Richard Biener <rguenther@suse.de>
PR middle-end/60706
* tree-pretty-print.c (pp_double_int): For HWI32 hosts with
a 64bit widest int print double-int similar to on HWI64 hosts.
From-SVN: r209216
Diffstat (limited to 'gcc/tree-pretty-print.c')
| -rw-r--r-- | gcc/tree-pretty-print.c | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/tree-pretty-print.c b/gcc/tree-pretty-print.c index 77446c5..83d5ca6 100644 --- a/gcc/tree-pretty-print.c +++ b/gcc/tree-pretty-print.c @@ -3465,6 +3465,12 @@ pp_double_int (pretty_printer *pp, double_int d, bool uns) pp_wide_integer (pp, d.low); else if (d.fits_uhwi ()) pp_unsigned_wide_integer (pp, d.low); + else if (HOST_BITS_PER_DOUBLE_INT == HOST_BITS_PER_WIDEST_INT) + pp_scalar (pp, + uns + ? HOST_WIDEST_INT_PRINT_UNSIGNED : HOST_WIDEST_INT_PRINT_DEC, + (HOST_WIDEST_INT) ((((unsigned HOST_WIDEST_INT) d.high << 1) + << (HOST_BITS_PER_WIDE_INT - 1)) | d.low)); else { unsigned HOST_WIDE_INT low = d.low; |