Eta-expand mrandomR to keep GHC 6.6.1 on birdy happy.
[match/match.git] / program / MonadStuff.hs
1 module MonadStuff (nop) where
2
3 -- Useful for "if this, then mutate that, else do nothing"
4 nop :: Monad m => m ()
5 nop = return ()