fail_image_1.f08\coarray\gfortran.dg\testsuite\gcc - riscv-gnu-toolchain/gcc.git - Unnamed repository; edit this file 'description' to name the repository.

index : riscv-gnu-toolchain/gcc.git

Unnamed repository; edit this file 'description' to name the repository.

root

about summary refs log tree commit diff

path: root/gcc/testsuite/gfortran.dg/coarray/fail_image_1.f08

blob: b1e1bbb221dd91fddffa5d0ba42c31685531e315 (plain)

! { dg-do compile }

program fail_image_statement_1
  implicit none

  fail image ! OK
  fail image (1)  ! { dg-error "Syntax error in FAIL IMAGE statement at \\(1\\)" }

end program fail_image_statement_1