From 4b8dcea66a976279b56693e8a060c1de87414225 Mon Sep 17 00:00:00 2001
From: Chris Allen <cma@bitemyapp.com>
Date: Sat, 5 May 2018 17:20:11 -0500
Subject: [PATCH] Resized arbitrary instance for UpdatableIndexSetting\'

---
 tests/V5/Test/Generators.hs | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/tests/V5/Test/Generators.hs b/tests/V5/Test/Generators.hs
index 1f80b76..facf42d 100644
--- a/tests/V5/Test/Generators.hs
+++ b/tests/V5/Test/Generators.hs
@@ -462,9 +462,6 @@ makeArbitrary ''Analysis
 instance Arbitrary Analysis where arbitrary = arbitraryAnalysis
 makeArbitrary ''Tokenizer
 instance Arbitrary Tokenizer where arbitrary = arbitraryTokenizer
-makeArbitrary ''UpdatableIndexSetting
-instance Arbitrary UpdatableIndexSetting where
-  arbitrary = arbitraryUpdatableIndexSetting
 makeArbitrary ''Compression
 instance Arbitrary Compression where arbitrary = arbitraryCompression
 makeArbitrary ''Bytes
@@ -534,6 +531,10 @@ instance Arbitrary FactorMissingFieldValue where arbitrary = arbitraryFactorMiss
 makeArbitrary ''FactorModifier
 instance Arbitrary FactorModifier where arbitrary = arbitraryFactorModifier
 
+makeArbitrary ''UpdatableIndexSetting
+instance Arbitrary UpdatableIndexSetting where
+  arbitrary = resize 10 arbitraryUpdatableIndexSetting
+
 newtype UpdatableIndexSetting' =
   UpdatableIndexSetting' UpdatableIndexSetting
   deriving (Show, Eq, ToJSON, FromJSON, ApproxEq, Typeable)