diff options
| author | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-11-24 10:56:19 +0100 |
|---|---|---|
| committer | Jasper Van der Jeugt <m@jaspervdj.be> | 2012-11-24 10:56:19 +0100 |
| commit | 0a6b2b259862b90ccca11281de89091e2e01cb4d (patch) | |
| tree | 9b4841724ad8d6d06df9682168c714cd3d3d7901 /tests/Hakyll/Core/Store/Tests.hs | |
| parent | bc192a127b8c57ccb45ff6c773f5917fdbf7ec85 (diff) | |
| download | hakyll-0a6b2b259862b90ccca11281de89091e2e01cb4d.tar.gz | |
Add snapshots
Diffstat (limited to 'tests/Hakyll/Core/Store/Tests.hs')
| -rw-r--r-- | tests/Hakyll/Core/Store/Tests.hs | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/tests/Hakyll/Core/Store/Tests.hs b/tests/Hakyll/Core/Store/Tests.hs index bd6cba2..11a1a63 100644 --- a/tests/Hakyll/Core/Store/Tests.hs +++ b/tests/Hakyll/Core/Store/Tests.hs @@ -61,7 +61,6 @@ wrongType = withTestStore $ \store -> do -- Store a string and try to fetch an int Store.set store ["foo", "bar"] ("qux" :: String) value <- Store.get store ["foo", "bar"] :: IO (Store.Result Int) - print value H.assert $ case value of Store.WrongType e t -> e == typeOf (undefined :: Int) && |