1! { dg-do compile } 2! { dg-options "-Wall" } 3 4! This long comment line should not trigger a line-truncation warning with -Wall even for free-form 132 character line limit (blah blah) 5 6 PROGRAM foo 7 WRITE (*,*) "Test" ! Neither this comment which exceeds the 132 character limit with some random words, too (blah blah) 8 WRITE (*,*) "This exactly 132 character long soruce line not, too. How can people fill 132 characters without sensless stuff" 9 END 10 11