Changed messageOfException function to return empty String when message
is null.
Added possibleMessageOfException to return Maybe String
gitlab #749
Change-Id: Ia67cbef6bbc67c7c0c6fc15a69bd11d46f76e431
showThrowable :: Throwable -> String
@private
@JavaName getMessage
showThrowable :: Throwable -> String
@private
@JavaName getMessage
- getMessageThrowable :: Throwable -> String
+ getMessageThrowable :: Throwable -> Maybe String
@private
@JavaName getCause
getCauseThrowable :: Throwable -> Maybe Throwable
@private
@JavaName getCause
getCauseThrowable :: Throwable -> Maybe Throwable
toThrowable :: e -> Throwable
messageOfException :: Throwable e => e -> String
toThrowable :: e -> Throwable
messageOfException :: Throwable e => e -> String
-messageOfException = getMessageThrowable . toThrowable
+messageOfException e = match getMessageThrowable $ toThrowable e with
+ Just m -> m
+ Nothing -> ""
+
+possibleMessageOfException :: Throwable e => e -> Maybe String
+possibleMessageOfException e = getMessageThrowable $ toThrowable e
causeOfException :: Throwable e => e -> Maybe Throwable
causeOfException = getCauseThrowable . toThrowable
causeOfException :: Throwable e => e -> Maybe Throwable
causeOfException = getCauseThrowable . toThrowable