exitFailureP ::
  Prism' Exit.ExitCode Int
exitFailureP =
  prism'
    Exit.ExitFailure
    (\x -> case x of
             Exit.ExitFailure y ->
               Just y
             Exit.ExitSuccess ->
               Nothing)
exitFailureP ::
  Prism' Exit.ExitCode Int
exitFailureP =
  prism'
    Exit.ExitFailure
    (\x -> case x of
             Exit.ExitFailure y ->
               Just y
             Exit.ExitSuccess ->
               Nothing)
exitFailureP =
  prism'
    Exit.ExitFailure
    (\x -> case x of
             Exit.ExitFailure y ->
               Just y
             Exit.ExitSuccess ->
               Nothing)