Support latest QuickCheck

Author: HuwCampbell

optparse-applicative.cabal

@@ -154,7 +154,7 @@ test-suite tests
 
   build-depends:       base
                      , optparse-applicative
-                     , QuickCheck                      >= 2.8 && < 2.16
+                     , QuickCheck                      >= 2.8 && < 2.17
 
   if !impl(ghc >= 8)
     build-depends:     semigroups

src/Options/Applicative/Internal.hs

@@ -80,7 +80,7 @@ contextNames ns =
   in  reverse $ go <$> ns
 
 instance MonadP P where
-  enterContext name pinfo = P $ lift $ modify $ \(_, ctxs) -> (CmdStart, (Context name pinfo : ctxs))
+  enterContext name pinfo = P $ lift $ modify $ \(_, ctxs) -> (CmdStart, Context name pinfo : ctxs)
   exitContext = P $ lift $ modify $ fmap (drop 1)
   continueContext = P $ lift $ modify $ \(_, ctxs) -> (CmdCont, ctxs)
   getPrefs = P . lift . lift $ ask