Îõ³h$7 3SÇ      !"#$%&'()*+,-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~€‚ƒ„…†‡ˆ‰Š‹ŒŽ‘ ’ “ ” • – — ˜ ™ š › œ  ž Ÿ   ¡ ¢ £ ¤ ¥ ¦ § ¨ © ª « ¬ ­ ® ¯ ° ± ² ³ ´ µ ¶ · ¸ ¹ º » ¼ ½ ¾ ¿ À Á Â Ã Ä Å Æ  Safe-Inferred >ÀÁÂÑÔÙà/:"exitcodeÉAn exit code status where failing with a value `0` cannot be represented.4Transformer for either a (non-zero exit code value (Ç) with error :: e) or a (value :: a).#exitcode6Construct a succeeding exit code with the given value.1exitsuccess "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.0exitfailure 'x' 99 :: ExitcodeT Identity Char ()$ExitcodeT (Identity (Left ('x',99)))&exitcode4Construct a failing exit code with the given status.ÅIf the given status is `0` then the exit code will succeed with unit.'exitcodeÉConstruct an exit code with the given status. Associate a value of type e2 with a failing exit code and a value of the type a with a success exit code.ÙIf the given status is `0` then the exit code will succeed with unit. >>> exitcodeValue xÈ 99 "abc" :: ExitcodeT Identity Char String ExitcodeT (Identity (Left (x,99))) >>> exitcodeValue xÎ 0 "abc" :: ExitcodeT Identity Char String ExitcodeT (Identity (Right "abc"))(exitcode-Construct an exit code with the given status.ÅIf the given status is `0` then the exit code will succeed with unit.(exitcodeValue0 99 :: ExitcodeT0 Identity#ExitcodeT (Identity (Left ((),99)))'exitcodeValue0 0 :: ExitcodeT0 IdentityExitcodeT (Identity (Right ())))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))3ExitcodeT (MaybeT (Identity (Just (Left ((),99)))))$view exitCode (Identity ExitSuccess)/ExitcodeT (MaybeT (Identity (Just (Right ()))))ÅControl.Lens.review exitCode (exitfailure () 99) :: Identity ExitCodeIdentity (ExitFailure 99)>Control.Lens.review exitCode exitsuccess0 :: Identity ExitCodeIdentity ExitSuccess,exitcode7Extract either the non-zero value or the success value.;runExitcodeT exitsuccess0 :: Identity (Either ((), Int) ())Identity (Right ())ÂrunExitcodeT (exitfailure () 99) :: Identity (Either ((), Int) ())Identity (Left ((),99))-exitcode%Extract either the non-zero value or È.2runExitcodeT0 exitsuccess0 :: Identity (Maybe Int)Identity Nothing9runExitcodeT0 (exitfailure () 99) :: Identity (Maybe Int)Identity (Just 99).exitcode7Extract either the non-zero value or the success value./runExitcode exitsuccess0 :: Either ((), Int) ()Right ()6runExitcode (exitfailure () 99) :: Either ((), Int) () Left ((),99)/exitcode%Extract either the non-zero value or È.&runExitcode0 exitsuccess0 :: Maybe IntNothing-runExitcode0 (exitfailure () 99) :: Maybe IntJust 990exitcodeIsomorphism to integer.'view _ExitcodeInt exitsuccess0 :: [Int][0],view _ExitcodeInt (exitfailure0 99) :: [Int][99]review _ExitcodeInt [0]ExitcodeT [Right ()]review _ExitcodeInt [99]ExitcodeT [Left ((),99)]1exitcodeSetter to integer.<> preview _ExitcodeInt' (exitsuccess0 :: ExitcodeT [] () ())Just 0=preview _ExitcodeInt' (exitfailure0 99 :: ExitcodeT [] () ())Just 99 (e + 1, n + 1)) (exitsuccess0 :: ExitcodeT Identity Int ())ExitcodeT (Identity (Right ()))çover _ExitFailure (\(e, n) -> (reverse e, n + 1)) (exitfailure "abc" 1 :: ExitcodeT Identity String ())%ExitcodeT (Identity (Left ("cba",2)))çover _ExitFailure (\(e, n) -> (reverse e, n - 1)) (exitfailure "abc" 1 :: ExitcodeT Identity String ())ExitcodeT (Identity (Right ()))3exitcode.A traversal over the associated failing value.Êover _ExitFailureError reverse exitsuccess0 :: ExitcodeT Identity [Int] ()ExitcodeT (Identity (Right ()))Õover _ExitFailureError reverse (exitfailure "abc" 99) :: ExitcodeT Identity String ()&ExitcodeT (Identity (Left ("cba",99)))Ôover _ExitFailureError reverse (exitfailure "abc" 0) :: ExitcodeT Identity String ()ExitcodeT (Identity (Right ()))Äpreview _ExitFailureError (exitfailure () 99 :: ExitcodeT0 Identity)Just ()?preview _ExitFailureError (exitsuccess0 :: ExitcodeT0 Identity)Nothing4exitcodeA prism to exit success.-over _ExitSuccess (\x -> x) (exitfailure0 99)#ExitcodeT (Identity (Left ((),99))),over _ExitSuccess (\x -> x) (exitfailure0 0)ExitcodeT (Identity (Right ())),over _ExitSuccess (\x -> x) (exitfailure0 0)ExitcodeT (Identity (Right ()))(preview _ExitSuccess (exitfailure () 99)Nothing!preview _ExitSuccess exitsuccess0Just ()ÆControl.Lens.review _ExitSuccess "abc" :: ExitcodeT Identity () String"ExitcodeT (Identity (Right "abc")):exitcode/Construct an exitcode with an associated value.0exitcode1 99 "abc" :: ExitcodeT1 Identity String&ExitcodeT (Identity (Left ("abc",99)))/exitcode1 0 "abc" :: ExitcodeT1 Identity String"ExitcodeT (Identity (Right "abc"));exitcode7Extract either the non-zero value or the success value.runExitcodeT1 exitsuccess0Right ()ÃrunExitcodeT1 (exitfailure () 99) :: Identity (Either ((), Int) ())Identity (Left ((),99))ËrunExitcodeT1 (exitcode1 0 "abc") :: Identity (Either (String, Int) String)Identity (Right "abc")ÌrunExitcodeT1 (exitcode1 99 "abc") :: Identity (Either (String, Int) String)Identity (Left ("abc",99))<exitcode7Extract either the non-zero value or the success value.runExitcode1 exitsuccess0Right () runExitcode1 (exitfailure () 99) Left ((),99) runExitcode1 (exitcode1 0 "abc") Right "abc"!runExitcode1 (exitcode1 99 "abc")Left ("abc",99)=exitcode0A lens to the value associated with an exitcode.#view _Exitcode1 (exitcode1 0 "abc")"abc"$view _Exitcode1 (exitcode1 99 "abc")"abc"-view _Exitcode1 (exitcodeValue "abc" 0 "def")"def".view _Exitcode1 (exitcodeValue "abc" 99 "def")"abc"+over _Exitcode1 reverse (exitcode1 0 "abc")"ExitcodeT (Identity (Right "cba")),over _Exitcode1 reverse (exitcode1 99 "abc")&ExitcodeT (Identity (Left ("cba",99)))5over _Exitcode1 reverse (exitcodeValue "abc" 0 "def")"ExitcodeT (Identity (Right "fed"))6over _Exitcode1 reverse (exitcodeValue "abc" 99 "def")&ExitcodeT (Identity (Left ("cba",99)))Cexitcode1throwError 99 :: ExitcodeT (Either Int) () StringExitcodeT (Left 99)ËcatchError exitsuccess0 (exitfailure 'x') :: ExitcodeT (Either Int) Char ()ExitcodeT (Right (Right ()))ÖcatchError (exitfailure 'x' 99) (\_ -> exitsuccess0) :: ExitcodeT (Either Int) Char ()!ExitcodeT (Right (Left ('x',99)))ÓcatchError (exitfailure 'x' 99) (exitfailure 'y') :: ExitcodeT (Either Int) Char ()!ExitcodeT (Right (Left ('x',99)))ÌcatchError exitsuccess0 (\_ -> exitsuccess0) :: ExitcodeT (Either Int) () ()ExitcodeT (Right (Right ()))Eexitcode5writer ('x', "abc") :: ExitcodeT ((,) String) () CharExitcodeT ("abc",Right 'x')=listen (exitfailure 'x' 99 :: ExitcodeT ((,) String) Char ())ExitcodeT ("",Left ('x',99))8listen (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) <$ (exitfailure 'x' 99 :: ExitcodeT ((,) String) Char ()))ExitcodeT ("",Left ('x',99))HexitcodeÇtraverse (\x -> x) [exitfailure 'x' 99] :: ExitcodeT Identity Char [()]$ExitcodeT (Identity (Left ('x',99)))Õtraverse (\x -> x) [exitfailure 'x' 99, exitsuccess0] :: ExitcodeT Identity Char [()]$ExitcodeT (Identity (Left ('x',99)))étraverse (\x -> x) [exitfailure 'x' 99, exitsuccess0, exitfailure 'y' 88] :: ExitcodeT Identity Char [()]$ExitcodeT (Identity (Left ('x',99)))Õtraverse (\x -> x) [exitsuccess0, exitfailure 'x' 88] :: ExitcodeT Identity Char [()]$ExitcodeT (Identity (Left ('x',88)))?traverse (\x -> x) [exitsuccess0] :: ExitcodeT Identity () [()]!ExitcodeT (Identity (Right [()]))PexitcodeÑduplicated (exitfailure () 0) :: ExitcodeT Identity () (ExitcodeT Identity () ())>ExitcodeT (Identity (Right (ExitcodeT (Identity (Right ())))))Òduplicated (exitfailure () 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")))))Qexitcode&mempty :: ExitcodeT Identity () StringExitcodeT (Identity (Right ""))RexitcodeÆexitsuccess "abc" <> exitsuccess "def" :: ExitcodeT Identity () String%ExitcodeT (Identity (Right "abcdef"))Îexitsuccess "abc" <> exitcodeValue () 99 "def" :: ExitcodeT Identity () String"ExitcodeT (Identity (Right "abc"))ÑexitcodeValue 'x' 99 "abc" <> exitsuccess "def" :: ExitcodeT Identity Char String"ExitcodeT (Identity (Right "def"))ÚexitcodeValue 'x' 99 "abc" <> exitcodeValue 'y' 88 "def" :: ExitcodeT Identity Char String$ExitcodeT (Identity (Left ('y',88)))SexitcodeÇexitsuccess "abc" exitsuccess "def" :: ExitcodeT Identity () String"ExitcodeT (Identity (Right "abc"))Ïexitsuccess "abc" exitcodeValue () 99 "def" :: ExitcodeT Identity () String"ExitcodeT (Identity (Right "abc"))ÒexitcodeValue 'x' 99 "abc" exitsuccess "def" :: ExitcodeT Identity Char String"ExitcodeT (Identity (Right "def"))ÛexitcodeValue 'x' 99 "abc" exitcodeValue 'y' 88 "def" :: ExitcodeT Identity Char String$ExitcodeT (Identity (Left ('y',88)))UexitcodeÓexitsuccess "abc" >>- \s -> exitsuccess (reverse s) :: ExitcodeT Identity () String"ExitcodeT (Identity (Right "cba"))Éexitsuccess "abc" >>- \_ -> exitfailure () 99 :: ExitcodeT Identity () ()#ExitcodeT (Identity (Left ((),99)))Ðexitfailure 'x' 99 >>- \_ -> exitsuccess "abc" :: ExitcodeT Identity Char String$ExitcodeT (Identity (Left ('x',99)))Íexitfailure 'x' 99 >>- \_ -> exitfailure 'y' 88 :: ExitcodeT Identity Char ()$ExitcodeT (Identity (Left ('x',99)))Élet loop = loop in exitfailure () 99 >>- loop :: ExitcodeT Identity () ()#ExitcodeT (Identity (Left ((),99)))! !"#$%&'()*+,-./0123456789:;<=!"! #$%&'()*56789:,-./;<+01234= Safe-Inferredà/¤YZ[\]^_`abcdef`abcdefYZ[\]^_ Safe-Inferred>/çjklmnomnojkl Safe-Inferred>0rstuturs Safe-Inferredà0Jxyz{z{xy Safe-Inferred>0y€‚ƒ„‚ƒ„€ Safe-Inferred0µ! ‡ˆ‰Š! ‡ˆ‰Š Safe-Inferred1%‹ŒŽŽ‹Œ  Safe-Inferredà1] ‘’“”•–— “”•–—‘’  Safe-Inferred>1ªš›œžŸžŸš›œ  Safe-Inferred1è#¢£¤®«±²°¨©¬­ª¯¦§³¥´µ¶·¸¹º»¼½¾¿ÀÁÂÃÄ#¤®«±²°¨©¬­ª¯¦§³¥´µ¶·¸¹º»¼½¾¿ÀÁ¢£ÃÄ  Safe-Inferred2š÷ Y_^]\Z[`fedcabjklmnorstuxyz{€‚ƒ„‡ˆ‰Š‹ŒŽ‘’“—–”•š›œžŸ¢£¤ÂÁÀ¿¾½¼»º¹¸·¶µ´¥³§¦¯ª­¬©¨°²±®«ÃÄÉ                  ! " #$ #% #& #' #( #) #* #+ #, #-./0123456789:;<=>?@ABCDEFGHIJKLMNOPQRSTUVWXYZ[\]^_`abcdefghijklmnopqrstuvwxyz{|}~€‚ƒ„…†‡ˆ‰Š‹ŒŽ‘’“”•–—˜™š›œžŸ ¡ ¢ £ ¤ ¥ ¦ § ¨ © ª « ¬ ­ ® ¯ ° ± ² ³ ´ µ ¶ · ¸ ¹ º » ¼ ½ ¾ ¿ À Á Â Ã Ä Å Æ Ç È É Ê Ë Ì Í Î Ï Ð Ñ Ò Ó Ô Õ Ö ×ØÙÚÛÜÝÞ'exitcode-0.1.0.6-ExR1EFhUjAKA61kFszBspAControl.Process.ProcessControl.ExitcodeControl.Process.CmdSpecControl.Process.FDControl.Process.GroupIDControl.Process.HandleControl.Process.PidControl.Process.ProcessHandleControl.Process.StdStreamControl.Process.UserIDControl.Process.CreateProcessControl.Process'process-1.6.14.0-1xWyi0dhdH7AWmQEhRfbLfSystem.ProcessterminateProcess getCurrentPidgetPidshowCommandForUserreadCreateProcess readProcess callCommand callProcess spawnProcesscleanupProcesswithCreateProcess createProcessshellprocPidSystem.Process.InternalsinterruptProcessGroupOf createPipeFd createPipecreateProcess_System.Process.Common CreateProcess RawCommand ShellCommandCmdSpecNoStream CreatePipe UseHandleInherit StdStream ProcessHandle Exitcode1 ExitcodeT1 Exitcode0 ExitcodeT0Exitcode ExitcodeT exitsuccess exitsuccess0 exitfailure exitfailure0 exitcodeValueexitcodeValue0 fromExitCode fromExitCode'exitCode runExitcodeT runExitcodeT0 runExitcode runExitcode0 _ExitcodeInt _ExitcodeInt' _ExitFailure_ExitFailureError _ExitSuccess liftExitcodeliftExitcodeErrorliftExitcodeError0 hoistExitcode embedExitcode exitcode1 runExitcodeT1 runExitcode1 _Exitcode1$fBitraversableExitcodeT$fBifoldableExitcodeT$fBifunctorExitcodeT$fMonadContExitcodeT$fMonadRWSrwsExitcodeT$fMonadErroreExitcodeT$fMonadStatesExitcodeT$fMonadWriterwExitcodeT$fMonadReaderrExitcodeT$fMonadIOExitcodeT$fTraversableExitcodeT$fFoldableExitcodeT$fShow1ExitcodeT$fShowExitcodeT$fOrd1ExitcodeT$fOrdExitcodeT$fEq1ExitcodeT $fEqExitcodeT$fExtendExitcodeT$fMonoidExitcodeT$fSemigroupExitcodeT$fAltExitcodeT$fMonadExitcodeT$fBindExitcodeT$fApplicativeExitcodeT$fApplyExitcodeT$fFunctorExitcodeT HasCmdSpeccmdSpec shellCommand rawCommand rawCommandExerawCommandArgumentListrawCommandArguments AsCmdSpec_CmdSpec _ShellCommand _RawCommand_RawCommandExe_RawCommandArgumentList_RawCommandArguments$fAsCmdSpecCmdSpec$fHasCmdSpecCreateProcess$fHasCmdSpecCmdSpecAsFD_FD_FDInt32HasFDfdfdInt32 $fHasFDCInt $fAsFDCInt AsGroupID_GroupID HasGroupIDgroupID$fHasGroupIDCGid$fAsGroupIDCGidAsHandle_Handle HasHandlehandle$fHasHandleHandle$fAsHandleStdStream$fAsHandleHandleAsPid_Pid _PidInt32HasPidpidpidInt32 $fHasPidCPid $fAsPidCPidreadCreateProcessWithExitCodereadProcessWithExitCodewaitForProcessgetProcessExitCodeAsProcessHandle_ProcessHandleHasProcessHandle processHandle$fHasProcessHandleProcessHandle$fAsProcessHandleProcessHandle HasStdStream stdStream AsStdStream _StdStream_Inherit _CreatePipe _NoStream$fAsStdStreamStdStream$fHasStdStreamStdStreamAsUserID_UserID _UserIDWord32 HasUserIDuserID userIDWord32$fHasUserIDCUid$fAsUserIDCUidAsCreateProcess_CreateProcessHasCreateProcesscreate_process child_group child_user close_fds create_groupcreate_new_consolecwd delegate_ctlcdetach_consoleenv new_sessionstd_errstd_instd_outuse_process_jobscwd'envList envElement envElementKeyenvElementValue close_fds' create_group'delegate_ctlc'detach_console'create_new_console' new_session' child_group' child_user' child_user''use_process_jobs'streamsstreams1$fHasCreateProcessCreateProcess$fAsCreateProcessCreateProcessghc-prim GHC.TypesIntbase GHC.MaybeNothing