Haskell中的<*语法
我得到以下代码
newtype Parser a = Parser { parse :: String -> Maybe (a,String) }
instance Applicative Parser where
pure a = Parser $ \s -> Just (a,s)
f <*> a = Parser $ \s ->
case parse f s of
Just (g,s') -> parse (fmap g a) s'
Nothi...