futhark-0.16.1: src/Futhark/CodeGen/ImpGen/CUDA.hs

module Futhark.CodeGen.ImpGen.CUDA
  ( compileProg
  , Warnings
  ) where

import Data.Bifunctor (second)

import Futhark.IR.KernelsMem
import Futhark.CodeGen.ImpCode.OpenCL
import Futhark.CodeGen.ImpGen.Kernels
import Futhark.CodeGen.ImpGen.Kernels.ToOpenCL
import Futhark.MonadFreshNames

compileProg :: MonadFreshNames m => Prog KernelsMem -> m (Warnings, Program)
compileProg prog = second kernelsToCUDA <$> compileProgCUDA prog