! { dg-do run }
! { dg-options "-ffixed-form" }
      PROGRAM A3
!234567890
!$    PRINT *, "Compiled by an OpenMP-compliant implementation."
      END PROGRAM A3