1! Test -fcuda option 2! RUN: %flang_fc1 -cpp -x cuda -fdebug-unparse %s -o - | FileCheck %s 3! RUN: not %flang_fc1 -cpp %s -o - 2>&1 | FileCheck %s --check-prefix=ERROR 4program main 5#if _CUDA 6 integer :: var = _CUDA 7#endif 8 integer, device :: dvar 9end program 10 11! CHECK-LABEL: PROGRAM main 12! CHECK: INTEGER :: var = 1 13! CHECK: INTEGER, DEVICE :: dvar 14 15! ERROR: cuda-option.f90:{{.*}}:{{.*}}: error: expected end of statement 16