diff options
Diffstat (limited to 'gcc/testsuite/gfortran.dg/g77/xformat.f')
| -rw-r--r-- | gcc/testsuite/gfortran.dg/g77/xformat.f | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/g77/xformat.f b/gcc/testsuite/gfortran.dg/g77/xformat.f new file mode 100644 index 000000000..9b2769a03 --- /dev/null +++ b/gcc/testsuite/gfortran.dg/g77/xformat.f @@ -0,0 +1,4 @@ +c { dg-do compile } + PRINT 10, 2, 3 +10 FORMAT (I1, X, I1) ! { dg-warning "Extension: X descriptor" "Extension: X descriptor" } + END |