Skip to content
Snippets Groups Projects
Commit a53c580f authored by Ben Gamari's avatar Ben Gamari :turtle:
Browse files

Fix happy benchmark for MonadFail proposal

parent c9fe4e92
No related branches found
No related tags found
Pipeline #13699 passed
Stage: test
Hide whitespace changes
Inline Side-by-side
Showing
with 2 additions and 0 deletions
gc/happy/ParseMonad.lhs
+ 2
− 0
View file @ a53c580f
......@@ -30,4 +30,6 @@ The parser monad.
> m >>= k = P $ \s l -> case runP m s l of
> OkP a -> runP (k a) s l
> FailP s -> FailP s
> instance MonadFail P where
> fail s = P $ \ _ _ -> FailP s
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment