diff options
Diffstat (limited to 'gcc/testsuite/gcc.dg/format/c99-scanf-2.c')
| -rw-r--r-- | gcc/testsuite/gcc.dg/format/c99-scanf-2.c | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/gcc/testsuite/gcc.dg/format/c99-scanf-2.c b/gcc/testsuite/gcc.dg/format/c99-scanf-2.c new file mode 100644 index 0000000..a740a60 --- /dev/null +++ b/gcc/testsuite/gcc.dg/format/c99-scanf-2.c @@ -0,0 +1,28 @@ +/* Test for scanf formats. Formats using extensions to the standard + should be rejected in strict pedantic mode. +*/ +/* Origin: Joseph Myers <jsm28@cam.ac.uk> */ +/* { dg-do compile } */ +/* { dg-options "-std=iso9899:1999 -pedantic -Wformat" } */ + +typedef __WCHAR_TYPE__ wchar_t; + +extern int scanf (const char *, ...); + +void +foo (int *ip, long long int *llp, wchar_t *ls) +{ + /* The length modifiers q and L as applied to integer formats are + extensions. + */ + scanf ("%qd", llp); /* { dg-warning "C" "%q length" } */ + scanf ("%Ld", llp); /* { dg-warning "C" "%L length" } */ + /* The conversion specifiers C and S are X/Open extensions. */ + scanf ("%C", ls); /* { dg-warning "C" "scanf %C" } */ + scanf ("%S", ls); /* { dg-warning "C" "scanf %S" } */ + /* The use of operand number $ formats is an X/Open extension. */ + scanf ("%1$d", ip); /* { dg-warning "C" "scanf $ format" } */ + /* glibc also supports flags ' and I on scanf formats as an extension. */ + scanf ("%'d", ip); /* { dg-warning "C" "scanf ' flag" } */ + scanf ("%Id", ip); /* { dg-warning "C" "scanf I flag" } */ +} |