Hello Martin, Monday, February 5, 2007, 2:47:33 AM, you wrote:
> main = do > minput <- getInput > case minput of > Nothing -> printError > Just input -> do > mresult <- processInput input > case mresult of > Nothing -> printError > Just result -> printResult result main = do getInput >>= maybe printError $ \input -> do ... -- Best regards, Bulat mailto:[EMAIL PROTECTED] _______________________________________________ Haskell-Cafe mailing list [email protected] http://www.haskell.org/mailman/listinfo/haskell-cafe
