1  /* Test for printf formats: rejection of DFP formats in pedantic mode.  */
       2  /* { dg-do compile } */
       3  /* { dg-require-effective-target dfp } */
       4  /* { dg-options "-std=gnu11 -pedantic -Wformat" } */
       5  
       6  #include "format.h"
       7  
       8  void
       9  foo (_Decimal32 d32, _Decimal64 d64, _Decimal128 d128) /* { dg-warning "ISO C" } */
      10  {
      11    printf ("%Ha", d32); /* { dg-warning "C" } */
      12    printf ("%HA", d32); /* { dg-warning "C" } */
      13    printf ("%He", d32); /* { dg-warning "C" } */
      14    printf ("%HE", d32); /* { dg-warning "C" } */
      15    printf ("%Hf", d32); /* { dg-warning "C" } */
      16    printf ("%HF", d32); /* { dg-warning "C" } */
      17    printf ("%Hg", d32); /* { dg-warning "C" } */
      18    printf ("%HG", d32); /* { dg-warning "C" } */
      19    printf ("%Da", d64); /* { dg-warning "C" } */
      20    printf ("%DA", d64); /* { dg-warning "C" } */
      21    printf ("%De", d64); /* { dg-warning "C" } */
      22    printf ("%DE", d64); /* { dg-warning "C" } */
      23    printf ("%Df", d64); /* { dg-warning "C" } */
      24    printf ("%DF", d64); /* { dg-warning "C" } */
      25    printf ("%Dg", d64); /* { dg-warning "C" } */
      26    printf ("%DG", d64); /* { dg-warning "C" } */
      27    printf ("%DDa", d128); /* { dg-warning "C" } */
      28    printf ("%DDA", d128); /* { dg-warning "C" } */
      29    printf ("%DDe", d128); /* { dg-warning "C" } */
      30    printf ("%DDE", d128); /* { dg-warning "C" } */
      31    printf ("%DDf", d128); /* { dg-warning "C" } */
      32    printf ("%DDF", d128); /* { dg-warning "C" } */
      33    printf ("%DDg", d128); /* { dg-warning "C" } */
      34    printf ("%DDG", d128); /* { dg-warning "C" } */
      35  }