diff options
| author | Tom Tromey <tromey@adacore.com> | 2019-09-19 08:14:57 +0000 |
|---|---|---|
| committer | Pierre-Marie de Rodat <pmderodat@gcc.gnu.org> | 2019-09-19 08:14:57 +0000 |
| commit | 4736041b5aa5681c44cbb9c183b11bbb781492fc (patch) | |
| tree | 6457e5e7f50b252680c6f30eb9964ea84d219248 /gcc/ada/gcc-interface/misc.c | |
| parent | 0c27222c60b26cd21588576f140abd04f1d8a853 (diff) | |
| download | gcc-4736041b5aa5681c44cbb9c183b11bbb781492fc.zip gcc-4736041b5aa5681c44cbb9c183b11bbb781492fc.tar.gz gcc-4736041b5aa5681c44cbb9c183b11bbb781492fc.tar.bz2 | |
[Ada] Emit DW_AT_GNU_bias with -fgnat-encodings=gdb
Emit DW_AT_GNU_bias with -fgnat-encodings=gdb. gdb implements this,
but not the encoded variant.
2019-09-19 Tom Tromey <tromey@adacore.com>
gcc/ada/
* gcc-interface/misc.c (gnat_get_type_bias): Return the bias
when -fgnat-encodings=gdb.
gcc/testsuite/
* gnat.dg/bias1.adb: New testcase.
From-SVN: r275958
Diffstat (limited to 'gcc/ada/gcc-interface/misc.c')
| -rw-r--r-- | gcc/ada/gcc-interface/misc.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/gcc-interface/misc.c b/gcc/ada/gcc-interface/misc.c index a576b7e..4abd4d5 100644 --- a/gcc/ada/gcc-interface/misc.c +++ b/gcc/ada/gcc-interface/misc.c @@ -1111,7 +1111,7 @@ gnat_get_type_bias (const_tree gnu_type) { if (TREE_CODE (gnu_type) == INTEGER_TYPE && TYPE_BIASED_REPRESENTATION_P (gnu_type) - && gnat_encodings == DWARF_GNAT_ENCODINGS_MINIMAL) + && gnat_encodings != DWARF_GNAT_ENCODINGS_ALL) return TYPE_RM_MIN_VALUE (gnu_type); return NULL_TREE; |