git.iko.soy/typeable/file-embed
on master help sign in
Add embedStringFile test
commitc421af7ffbb5cd2efdaffe9652b862aa8e7db805 authorOleg Grenrus <oleg.grenrus@iki.fi> dateThu 13 Aug 2015, 23:55 (11 years ago) parent40285aa
1 file changed+2
compare with master
unifiedsplit
test/main.hs+2
test/main.hs+2
@@ -12,3 +12,5 @@ main = do
1212 [ ("foo", "foo\r\n")
1313 , ("bar" </> "baz", "baz\r\n")
1414 ]
15+ let str = $(embedStringFile "test/sample/foo") :: String
16+ str @?= "foo\r\n"