{-#LANGUAGE TemplateHaskell#-}
module Metadata.Drasil.DrasilMetaCall (drasilMeta, DrasilMeta(..), watermark)where

import Metadata.Drasil.DrasilMeta (drasilMetaCfg, DrasilMeta(..))
import Data.Maybe (fromMaybe)


-- | Reads drasilMeta at compile-time
drasilMeta :: DrasilMeta
drasilMeta :: DrasilMeta
drasilMeta = $String
String -> DrasilMeta
DrasilMeta -> Maybe DrasilMeta
DrasilMeta -> Maybe DrasilMeta -> DrasilMeta
forall a. a -> Maybe a
forall a. a -> Maybe a -> a
forall a. HasCallStack => String -> a
fromMaybe :: forall a. a -> Maybe a -> a
error :: forall a. HasCallStack => String -> a
drasilMetaCfg

watermark :: String
watermark :: String
watermark = String
"Generated by Drasil " String -> String -> String
forall a. [a] -> [a] -> [a]
++ DrasilMeta -> String
version DrasilMeta
drasilMeta