hbs2/hbs2-storage-simple/test/Main.hs

24 lines
694 B
Haskell

module Main where
import Test.Tasty
import Test.Tasty.HUnit
import TestSimpleStorage
import TestCompactStorage
main :: IO ()
main =
defaultMain do
testGroup "root"
[
testCase "testSimpleStorageRandomReadWrite" testSimpleStorageRandomReadWrite
, testCase "testSimpleStorageNoKeys" testSimpleStorageNoKeys
, testCase "testSimpleStorageRefs" testSimpleStorageRefs
, testCase "testSimpleStorageBundles" testSimpleStorageBundles
, testCase "testSimpleStorageSymmEncryption" testSimpleStorageSymmEncryption
, testCase "testCompactStorage" testCompactStorageBasic
, testCase "testCompactStorageNoDupes" testCompactStorageNoDupes
]