Commit b2e2ef07 authored by simonpj's avatar simonpj
Browse files

[project @ 2001-11-20 16:24:32 by simonpj]

Avoid default-method warning
parent 9e2ad08f
......@@ -24,8 +24,8 @@ instance Monad (Parser s) where
Parser (\fut exp -> Fail exp [s])
instance MonadPlus (Parser s) where
mzero =
Parser (\fut exp -> Fail exp [])
mplus = error "urk"
mzero = Parser (\fut exp -> Fail exp [])
lookAhead :: Parser s s
lookAhead =
......
Markdown is supported
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