git.iko.soy/typeable/file-embed
on master help sign in
Add embedStringFile test
c421af7Oleg Grenrus
test/main.hs+2
compare with master
unifiedsplit
@@ -12,3 +12,5 @@ main = do
12 [ ("foo", "foo\r\n")
12 [ ("foo", "foo\r\n")
13 , ("bar" </> "baz", "baz\r\n")
13 , ("bar" </> "baz", "baz\r\n")
14 ]
14 ]
15+ let str = $(embedStringFile "test/sample/foo") :: String
16+ str @?= "foo\r\n"