[flang][cuda] Conditional compilation line in derived type component definition

[clementval]

From the CUDA Fortran for Scientists and Engineers code example. https://github.com/NVIDIA/CUDA-Fortran-2ed/blob/db8dfa6d52ca807fb954a353e56b1c21c488823d/code/ch12/antialias.F90#L28

module m
  type environs
     integer :: nSpheres
     type(sphere), &
          !@cuf managed, &
          allocatable :: spheres(:)
  end type environs
end module

this leads to a bad character error:

error: bad character ('&') in Fortran token

[llvmbot]

@llvm/issue-subscribers-flang-frontend

Author: Valentin Clement (バレンタイン クレメン) (clementval)

From the CUDA Fortran for Scientists and Engineers code example. https://github.com/NVIDIA/CUDA-Fortran-2ed/blob/db8dfa6d52ca807fb954a353e56b1c21c488823d/code/ch12/antialias.F90#L28

module m
  type environs
     integer :: nSpheres
     type(sphere), &
          !@<!-- -->cuf managed, &amp;
          allocatable :: spheres(:)
  end type environs
end module

this leads to a bad character error:

error: bad character ('&') in Fortran token