blob: 9b2769a034be8c140d56f029213021607754e999 [file] [log] [blame]
c { dg-do compile }
PRINT 10, 2, 3
10 FORMAT (I1, X, I1) ! { dg-warning "Extension: X descriptor" "Extension: X descriptor" }
END