@@ -108,6 +108,7 @@ testArray TestEnv{..} = TestCase $ do
108108
109109testHStore :: TestEnv -> Test
110110testHStore TestEnv{..} = TestCase $ do
111+ roundTrip []
111112 roundTrip [("foo","bar"),("bar","baz"),("baz","hello")]
112113 roundTrip [("fo\"o","bar"),("b\\ar","baz"),("baz","\"value\\with\"escapes")]
113114 where