Merge pull request #197 from AndreasPK/master

Mark many in Alternative instance as INLINEABLE

Author: bgamari

src/Data/Binary/Get/Internal.hs

@@ -282,7 +282,7 @@ instance Alternative Get where
     case v of
       Nothing -> pure []
       Just x -> (:) x <$> many p
-  {-# INLINE many #-}
+  {-# INLINEABLE many #-} -- many will never inline because it's recursive, so mark it INLINEABLE instead.
 
 -- | Run a decoder and keep track of all the input it consumes.
 -- Once it's finished, return the final decoder (always 'Done' or 'Fail'),