{-# LANGUAGE TemplateHaskell #-}
module PreludeCu where

import Control.Monad.IO.Class (liftIO)
import Language.Haskell.TH (Exp(LitE), Lit(StringL))


prelude :: String
prelude = $(LitE . StringL <$> liftIO (readFile "prelude.cu"))