hslua-aeson: stop cheating in the test suite
Create objects that used to crash the tests.
@@ -135,7 +135,7 @@ luaNumberToScientific :: Lua.Number -> Scientific
luaNumberToScientific = fromFloatDigits . (realToFrac :: Lua.Number -> Double)
instance Arbitrary Aeson.Value where
- arbitrary = arbitraryValue 5
+ arbitrary = arbitraryValue 9
#if MIN_VERSION_aeson(2,0,0)
instance Arbitrary Key where
