2008/5/2 Galchin, Vasili <[EMAIL PROTECTED]>:
>
> data Bozo =
>     Bozo {
>       id :: Int
>     }
>
> bonzo :: Maybe Bozo -> IO ()
> bonzo   maybe_bozo = do
>    if maybe_bozo == (Just (Bozo  x))
>       then
>          return ()
>       else
>          return ()

bonzo maybe_bozo =
    case maybe_bozo of
        Just (Bozo x) -> return ()
        _             -> return ()

Or equivalently:

bonzo (Just (Bozo x)) = return ()
bonzo _               = return ()

You should watch out for your use of id as a field name, since id is a
builtin function and you will get ambiguity errors.

Luke
_______________________________________________
Haskell-Cafe mailing list
Haskell-Cafe@haskell.org
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to