9edcf7a28e
If DEFAULT_SYSROOT is not specfied when building flang, then the -isysroot flag is needed to link binaries against system libraries on Darwin. It's also needed when linking against a non-default sysroot.
9 lines
243 B
Fortran
9 lines
243 B
Fortran
! RUN: %flang_fc1 -E -fopenacc %s 2>&1 | FileCheck %s
|
|
!CHECK: subroutine r4(x) Z real :: x Z !$acc routine Z print *, x Z end
|
|
#define SUB(s, t) subroutine s(x) Z\
|
|
t :: x Z\
|
|
!$acc routine Z\
|
|
print *, x Z\
|
|
end subroutine s
|
|
SUB(r4, real)
|