@@ -212,7 +212,8 @@ instance forall a. Serialize a => Serialize [a] where
212212 case size :: Size a of
213213 Size f -> foldl' f (acc + (Unbox.sizeOf (Proxy :: Proxy Int))) xs
214214
215− {-# INLINE deserialize #-}
215+ -- Inlining this causes large compilation times for tests
216+ {-# INLINABLE deserialize #-}
216217 deserialize off arr sz = do
217218 len <- Unbox.peekByteIndex off arr :: IO Int
218219 let off1 = off + Unbox.sizeOf (Proxy :: Proxy Int)
@@ -229,7 +230,8 @@ instance forall a. Serialize a => Serialize [a] where
229230 peekList (f . (x:)) o1 (i - 1)
230231 peekList id off1 len
231232
232− {-# INLINE serialize #-}
233+ -- Inlining this causes large compilation times for tests
234+ {-# INLINABLE serialize #-}
233235 serialize off arr val = do
234236 void $ serialize off arr (length val)
235237 let off1 = off + Unbox.sizeOf (Proxy :: Proxy Int)