12 lines · plain
1! Test -fcuda option for bbc2! RUN: bbc -fcuda -o - %s | FileCheck %s3 4! CHECK-NOT: Unknown command line argument5 6program main7#if _CUDA8 integer :: var = _CUDA9#endif10 integer, device :: dvar11end program12 1! Test -fcuda option for bbc2! RUN: bbc -fcuda -o - %s | FileCheck %s3 4! CHECK-NOT: Unknown command line argument5 6program main7#if _CUDA8 integer :: var = _CUDA9#endif10 integer, device :: dvar11end program12