mirror of
https://github.com/typeable/file-embed.git
synced 2024-09-17 10:59:08 +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
|