Îõ³h$]Š)      !"#$%&'( Safe-Inferred>ÀÁÂÑàjexitcodeÉAn exit code status where failing with a value `0` cannot be represented.-Transformer for either a non-zero exit code ()) or a value :: a.exitcode6Construct a succeeding exit code with the given value..exitsuccess "abc" :: ExitcodeT Identity String"ExitcodeT (Identity (Right "abc"))exitcode+Construct a succeeding exit code with unit.#exitsuccess0 :: ExitcodeT0 IdentityExitcodeT (Identity (Right ()))exitcode4Construct a failing exit code with the given status.ÅIf the given status is `0` then the exit code will succeed with unit.&exitfailure0 99 :: ExitcodeT0 IdentityExitcodeT (Identity (Left 99))Èexitsuccess "abc" <> exitCodeValue 99 "def" :: ExitcodeT Identity String"ExitcodeT (Identity (Right "abc"))ÈexitCodeValue 99 "abc" <> exitsuccess "def" :: ExitcodeT Identity String"ExitcodeT (Identity (Right "def"))ÍexitCodeValue 99 "abc" <> exitCodeValue 88 "def" :: ExitcodeT Identity StringExitcodeT (Identity (Left 88))exitcode3exitCodeValue 99 "abc" :: ExitcodeT Identity StringExitcodeT (Identity (Left 99))2exitCodeValue 0 "abc" :: ExitcodeT Identity String"ExitcodeT (Identity (Right "abc"))exitcodeFrom base exitcode.#fromExitCode (Identity ExitSuccess)ExitcodeT (Identity (Right ()))(fromExitCode (Identity (ExitFailure 99))ExitcodeT (Identity (Left 99)) exitcodeFrom base exitcode.fromExitCode' ExitSuccessExitcodeT (Identity (Right ()))fromExitCode' (ExitFailure 99)ExitcodeT (Identity (Left 99))fromExitCode' (ExitFailure 0)ExitcodeT (Identity (Right ())) exitcodeËIsomorphism from base exitcode to underlying `Maybe (Either Int ())` where ) is non-zero.)view exitCode (Identity (ExitFailure 99)).ExitcodeT (MaybeT (Identity (Just (Left 99))))$view exitCode (Identity ExitSuccess)/ExitcodeT (MaybeT (Identity (Just (Right ()))))6review exitCode (exitfailure0 99) :: Identity ExitCodeIdentity (ExitFailure 99)1review exitCode exitsuccess0 :: Identity ExitCodeIdentity ExitSuccess exitcode7Extract either the non-zero value or the success value.4runExitcode exitsuccess0 :: Identity (Either Int ())Identity (Right ())9runExitcode (exitfailure0 99) :: Identity (Either Int ())Identity (Left 99) exitcodeA prism to exit failure.&preview _ExitFailure (exitfailure0 99)Just 99!preview _ExitFailure exitsuccess0Nothingreview _ExitFailure 99ExitcodeT (Identity (Left 99))review _ExitFailure 0ExitcodeT (Identity (Right ())) exitcodeA prism to exit success.&preview _ExitSuccess (exitfailure0 99)Nothing!preview _ExitSuccess exitsuccess0Just ()review _ExitSuccess "abc""ExitcodeT (Identity (Right "abc"))exitcode,hoist (\(Identity x) -> Just x) exitsuccess0ExitcodeT (Just (Right ()))1hoist (\(Identity x) -> Just x) (exitfailure0 99)ExitcodeT (Just (Left 99))exitcode.throwError 99 :: ExitcodeT (Either Int) StringExitcodeT (Left 99)ÁcatchError exitsuccess0 exitfailure0 :: ExitcodeT (Either Int) ()ExitcodeT (Right (Right ()))ÎcatchError (exitfailure0 99) (\_ -> exitsuccess0) :: ExitcodeT (Either Int) ()ExitcodeT (Right (Left 99))ÆcatchError (exitfailure0 99) exitfailure0 :: ExitcodeT (Either Int) ()ExitcodeT (Right (Left 99))ÉcatchError exitsuccess0 (\_ -> exitsuccess0) :: ExitcodeT (Either Int) ()ExitcodeT (Right (Right ()))exitcode2writer ('x', "abc") :: ExitcodeT ((,) String) CharExitcodeT ("abc",Right 'x')5listen (exitfailure0 99 :: ExitcodeT ((,) String) ())ExitcodeT ("",Left 99)5listen (exitsuccess 99 :: ExitcodeT ((,) String) Int)ExitcodeT ("",Right (99,""))'tell "abc" :: ExitcodeT ((,) String) ()ExitcodeT ("abc",Right ())Àpass (exitsuccess ('x', reverse)) :: ExitcodeT ((,) String) CharExitcodeT ("",Right 'x')Çpass (('x', reverse) <$ (exitfailure0 99 :: ExitcodeT ((,) String) ()))ExitcodeT ("",Left 99)exitcode8traverse id [exitfailure0 99] :: ExitcodeT Identity [()]ExitcodeT (Identity (Left 99))Ætraverse id [exitfailure0 99, exitsuccess0] :: ExitcodeT Identity [()]ExitcodeT (Identity (Left 99))×traverse id [exitfailure0 99, exitsuccess0, exitfailure0 88] :: ExitcodeT Identity [()]ExitcodeT (Identity (Left 99))Ætraverse id [exitsuccess0, exitfailure0 88] :: ExitcodeT Identity [()]ExitcodeT (Identity (Left 88))5traverse id [exitsuccess0] :: ExitcodeT Identity [()]!ExitcodeT (Identity (Right [()])) exitcodeÊduplicated (exitfailure0 99) :: ExitcodeT Identity (ExitcodeT Identity ())=ExitcodeT (Identity (Right (ExitcodeT (Identity (Left 99)))))Ðduplicated (exitsuccess "abc") :: ExitcodeT Identity (ExitcodeT Identity String)ÁExitcodeT (Identity (Right (ExitcodeT (Identity (Right "abc")))))!exitcode#mempty :: ExitcodeT Identity StringExitcodeT (Identity (Right ""))"exitcodeÃexitsuccess "abc" <> exitsuccess "def" :: ExitcodeT Identity String%ExitcodeT (Identity (Right "abcdef"))Èexitsuccess "abc" <> exitCodeValue 99 "def" :: ExitcodeT Identity String"ExitcodeT (Identity (Right "abc"))ÈexitCodeValue 99 "abc" <> exitsuccess "def" :: ExitcodeT Identity String"ExitcodeT (Identity (Right "def"))ÍexitCodeValue 99 "abc" <> exitCodeValue 88 "def" :: ExitcodeT Identity StringExitcodeT (Identity (Left 88))%exitcodeÐexitsuccess "abc" >>- \s -> exitsuccess (reverse s) :: ExitcodeT Identity String"ExitcodeT (Identity (Right "cba"))Äexitsuccess "abc" >>- \_ -> exitfailure0 99 :: ExitcodeT Identity ()ExitcodeT (Identity (Left 99))Èexitfailure0 99 >>- \_ -> exitsuccess "abc" :: ExitcodeT Identity StringExitcodeT (Identity (Left 99))Âexitfailure0 99 >>- \_ -> exitfailure0 88 :: ExitcodeT Identity ()ExitcodeT (Identity (Left 99))Älet loop = loop in exitfailure0 99 >>- loop :: ExitcodeT Identity ()ExitcodeT (Identity (Left 99))  *      !"#$%&'()*+,-.'exitcode-0.1.0.4-GnboboID44N8xuMe2pfO3bControl.Exitcode Exitcode0 ExitcodeT0Exitcode ExitcodeT exitsuccess exitsuccess0 exitfailure0 exitCodeValue fromExitCode fromExitCode'exitCode runExitcode _ExitFailure _ExitSuccess$fMMonadExitcodeT$fMFunctorTYPEExitcodeT$fMonadContExitcodeT$fMonadRWSrwsExitcodeT$fMonadErroreExitcodeT$fMonadStatesExitcodeT$fMonadWriterwExitcodeT$fMonadReaderrExitcodeT$fMonadTransExitcodeT$fMonadIOExitcodeT$fTraversableExitcodeT$fFoldableExitcodeT$fShow1ExitcodeT$fShowExitcodeT$fOrd1ExitcodeT$fOrdExitcodeT$fEq1ExitcodeT $fEqExitcodeT$fExtendExitcodeT$fMonoidExitcodeT$fSemigroupExitcodeT$fAltExitcodeT$fMonadExitcodeT$fBindExitcodeT$fApplicativeExitcodeT$fApplyExitcodeT$fFunctorExitcodeTghc-prim GHC.TypesInt