blob: dcb0b7db3eb97dc7035b1f78a3c098683f62bba1 [file] [log] [blame]
! RUN: %flang_fc1 -fdebug-unparse %s 2>&1 | FileCheck %s
program main
use ISO_FORTRAN_ENV, only: compiler_options
implicit none
character (len = :), allocatable :: v
! CHECK: v="{{.*}}flang{{.*}} -fdebug-unparse {{.*}}"
v = compiler_options()
print *, v
deallocate(v)
close(1)
end program main