! { dg-do compile }! { dg-options "-Wall" }! This long comment line should not trigger a line-truncation warning with -WallPROGRAM fooWRITE(*,*)"Test"! Neither this comment which exceeds the 72 character limit, tooWRITE(*,*)"This exactly 72 character long soruce line not, too."END