Haskell-style monads with Rust syntax.
Rust requires >>=
to be self-modifying, so we use >>
instead of >>=
and consume
instead of return
(keyword).
For functors, you can use fmap(f, x)
or x.fmap(f)
, or you can pipe it: x | f | g | ...
.
At the moment, Haskell's monadic >>
seems unnecessary in an eager language like Rust, but I could easily be overlooking something!
Just write a monad! { ...
and you get all its superclasses like Functor
for free, plus common derives like Debug
, Clone
, Eq
, Ord
, Hash
, etc., and enum
s have all their members pub use
d:
```rust
use rsmonad::prelude::*;
monad! { enum Maybe { Just(A), Nothing, }
fn bind(self, f) {
match self {
Just(a) => f(a),
Nothing => Nothing,
}
}
fn consume(a) {
Just(a)
}
}
// And these just work:
// Monad asserteq(Just(4) >> |x| u8::checkedadd(x, 1).into(), Just(5)); asserteq(Nothing >> |x| u8::checkedadd(x, 1).into(), Nothing); asserteq(Just(255) >> |x| u8::checkedadd(x, 1).into(), Nothing);
// Functor asserteq!(Just(4) | u8::ispoweroftwo, Just(true)); asserteq!(Nothing | u8::ispoweroftwo, Nothing); ```
Catch panic
s without worrying about the details:
rust
fn afraid_of_circles(x: u8) -> BlastDoor<()> {
if x == 0 { panic!("aaaaaa!"); }
Phew(())
}
assert_eq!(
Phew(42) >> afraid_of_circles,
Phew(())
);
assert_eq!(
Phew(0) >> afraid_of_circles,
Kaboom,
);
The logic of Haskell lists with the speed of Rust vectors:
rust
// from the wonderful Haskell docs: https://en.wikibooks.org/wiki/Haskell/Understanding_monads/List
fn bunny(s: &str) -> List<&str> {
List(vec![s, s, s])
}
assert_eq!(
List::consume("bunny") >> bunny,
List(vec!["bunny", "bunny", "bunny"]),
);
assert_eq!(
List::consume("bunny") >> bunny >> bunny,
List(vec!["bunny", "bunny", "bunny", "bunny", "bunny", "bunny", "bunny", "bunny", "bunny"]),
);
And even the notoriously tricky join
-in-terms-of-bind
with no type annotations necessary:
rust
let li = List::consume(List::consume(0_u8)); // List<List<u8>>
let joined = li.join(); // --> List<u8>!
assert_eq!(joined, List::consume(0_u8));
Plus, we automatically derive QuickCheck::Arbitrary
and property-test the monad and functor laws.
Just run cargo test
and they'll run alongside all your other tests.
Right now, you can use >>
as sugar for bind
only when you have a concrete instance of Monad
like Maybe
but not a general <M: Monad<A>>
.
The latter still works but requires an explicit call to m.bind(f)
(or, if you don't use
the trait, Monad::<A>::bind(m, f)
).
This should be fixed with the Rust's non-lifetime binder feature when it rolls out.
#![no_std]
Disable default features:
```toml
[dependencies] rsmonad = { version = "*", default-features = false } ```