diff --git a/hbs2-storage-simple/test/Main.hs b/hbs2-storage-simple/test/Main.hs
index edfa0127..0a45420d 100644
--- a/hbs2-storage-simple/test/Main.hs
+++ b/hbs2-storage-simple/test/Main.hs
@@ -10,8 +10,11 @@ import HBS2.Storage
 main :: IO ()
 main =
   defaultMain $
-    testGroup "root" [ testCase "testSimpleStorageRandomReadWrite" testSimpleStorageRandomReadWrite
-                     ]
+    testGroup "root"
+      [
+        testCase "testSimpleStorageRandomReadWrite" testSimpleStorageRandomReadWrite
+      , testCase "testSimpleStorageNoKeys" testSimpleStorageNoKeys
+      ]