When a module file has been compiled with CUDA enabled, don't emit spurious errors about non-interoperable types when that module is read by a USE statement in a later non-CUDA compilation.
5 lines
83 B
Plaintext
5 lines
83 B
Plaintext
module usereal2
|
|
!REAL(2) is interoperable under CUDA
|
|
real(2), bind(c) :: x
|
|
end
|