mirror of
https://github.com/typeable/file-embed.git
synced 2024-07-14 10:40:26 +03:00
16 lines
295 B
Haskell
16 lines
295 B
Haskell
{-# LANGUAGE TemplateHaskell #-}
|
|
|
|
import Data.FileEmbed
|
|
import qualified Data.ByteString as B
|
|
|
|
plainfile :: B.ByteString
|
|
plainfile = $(embedFile "sample/bar")
|
|
|
|
plaindir :: [(FilePath, B.ByteString)]
|
|
plaindir = $(embedDir "sample")
|
|
|
|
main :: IO ()
|
|
main = do
|
|
print plainfile
|
|
print plaindir
|