gcc/testsuite/gfortran.dg/line_length_10.f90

! { dg-do compile }
! { dg-options "-Wno-line-truncation" }
!
! By default, for free-form source code: Error out
! But due to the explicit -Wno-line-truncation, compile w/o warning
!
      print *, 1                                                                                                                                          + 2
      end