openapi3-code-generator-0.2.0.0: src/OpenAPI/Generate/Internal/Embed.hs

module OpenAPI.Generate.Internal.Embed where

import Language.Haskell.TH
import Language.Haskell.TH.Syntax

embedFile :: FilePath -> Q Exp
embedFile fp = LitE . StringL <$> (qAddDependentFile fp >> runIO (readFile fp))