1/* Test for printf formats.  C99 "long long" formats should be accepted with
2   -Wno-long-long.
3*/
4/* Origin: Joseph Myers <jsm28@cam.ac.uk> */
5/* { dg-do compile } */
6/* { dg-options "-std=iso9899:1990 -pedantic -Wformat -Wno-long-long" } */
7
8#include "format.h"
9
10void
11foo (long long ll, unsigned long long ull, long long *lln,
12     long long *llp, unsigned long long *ullp)
13{
14  /* Test for accepting standard "long long" formats.  */
15  printf ("%lld%lli%llo%llu%llx%llX%lln", ll, ll, ull, ull, ull, ull, lln);
16  scanf ("%lld%lli%llo%llu%llx%llX%lln", llp, llp,
17	 ullp, ullp, ullp, ullp, lln);
18  /* Use of "q" and "L" should still be warned about.  */
19  printf ("%qd", ll); /* { dg-warning "C" "printf %qd" } */
20  printf ("%qi", ll); /* { dg-warning "C" "printf %qi" } */
21  printf ("%qo", ull); /* { dg-warning "C" "printf %qo" } */
22  printf ("%qu", ull); /* { dg-warning "C" "printf %qu" } */
23  printf ("%qx", ull); /* { dg-warning "C" "printf %qx" } */
24  printf ("%qX", ull); /* { dg-warning "C" "printf %qX" } */
25  printf ("%qn", lln); /* { dg-warning "C" "printf %qn" } */
26  printf ("%Ld", ll); /* { dg-warning "C" "printf %Ld" } */
27  printf ("%Li", ll); /* { dg-warning "C" "printf %Li" } */
28  printf ("%Lo", ull); /* { dg-warning "C" "printf %oL" } */
29  printf ("%Lu", ull); /* { dg-warning "C" "printf %Lu" } */
30  printf ("%Lx", ull); /* { dg-warning "C" "printf %Lx" } */
31  printf ("%LX", ull); /* { dg-warning "C" "printf %LX" } */
32  scanf ("%qd", llp); /* { dg-warning "C" "scanf %qd" } */
33  scanf ("%qi", llp); /* { dg-warning "C" "scanf %qi" } */
34  scanf ("%qo", ullp); /* { dg-warning "C" "scanf %qo" } */
35  scanf ("%qu", ullp); /* { dg-warning "C" "scanf %qu" } */
36  scanf ("%qx", ullp); /* { dg-warning "C" "scanf %qx" } */
37  scanf ("%qX", ullp); /* { dg-warning "C" "scanf %qX" } */
38  scanf ("%qn", lln); /* { dg-warning "C" "scanf %qn" } */
39  scanf ("%Ld", llp); /* { dg-warning "C" "scanf %Ld" } */
40  scanf ("%Li", llp); /* { dg-warning "C" "scanf %Li" } */
41  scanf ("%Lo", ullp); /* { dg-warning "C" "scanf %oL" } */
42  scanf ("%Lu", ullp); /* { dg-warning "C" "scanf %Lu" } */
43  scanf ("%Lx", ullp); /* { dg-warning "C" "scanf %Lx" } */
44  scanf ("%LX", ullp); /* { dg-warning "C" "scanf %LX" } */
45}
46