+
+t_map_error(_Cfg) ->
+ X = foo,
+ Y = bar,
+ XtoY = fun (foo) -> Y end,
+ {ok , X} = hope_result:map_error({ok , X}, XtoY),
+ {error, Y} = hope_result:map_error({error, X}, XtoY).
+
+t_tag_error(_Cfg) ->
+ X = foo,
+ Tag = bar,
+ {ok , X } = hope_result:tag_error({ok , X}, Tag),
+ {error, {Tag, X}} = hope_result:tag_error({error, X}, Tag).