! { dg-do compile } ! PR 60751 ! Contributed by Walter Spector <w6ws@earthlink.net> program extracomma implicit none write (*,*), 1, 2, 3 ! { dg-warning "Legacy Extension: Comma before i/o item list" } end program