2008/10/20 Jason Dagit <[EMAIL PROTECTED]>:
> So it looks like you made this changes:
> +ortryrunning :: IO ExitCode -> IO ExitCode -> IO ExitCode
> +a `ortryrunning` b = do ret <- try a
> +                        case ret of
> +                          (Right ExitSuccess) -> return ExitSuccess
> +                          _ -> b
>
> Just checking that I understand, this could also be:
> a `ortryrunning` b = try a >>= either (const b) return

Unfortunately that's not the same. We should return ExitSuccess only
when we got the ExitSuccess return code, not on any return code that
is not an exception.

Salvatore
_______________________________________________
darcs-users mailing list
[email protected]
http://lists.osuosl.org/mailman/listinfo/darcs-users

Reply via email to