On Wed, Oct 28, 2009 at 06:07:49PM +0100, S. Doaitse Swierstra wrote:
> pToken []     = pSucceed []
> pToken (x:xs) = (:) <$> pSym x <*> pToken xs
> 
> pKeyword_Float = pToken "Float"

pToken = traverse pSym
_______________________________________________
Haskell-Cafe mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/haskell-cafe

Reply via email to