summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.dg/debug/dwarf2/dwarf-dfp.c
blob: ddb602250cef5d153461641a55cd87eaa1ecf459 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
/* Verify the DWARF encoding of C99 decimal floating point types.  */

/* { dg-do compile */
/* { dg-require-effective-target dfp } */
/* { dg-options "-O0 -gdwarf-2 -dA" } */
/* { dg-final { scan-assembler "0x10.*DW_AT_encoding" } } */
/* { dg-final { scan-assembler "0x4.*DW_AT_byte_size" } } */
/* { dg-final { scan-assembler "0x8.*DW_AT_byte_size" } } */
/* { dg-final { scan-assembler "0x10.*DW_AT_byte_size" } } */

void foo ()
{
  _Decimal32 f = 1.5df;
  _Decimal64 d = 1.5dd;
  _Decimal128 l = 1.5dl;
}