term :: Parser Int
term = do f <- factor
do symbol "*"
e <- expr
return (f * t) <--------------- replace t with e
+++ return f
I hope that helps,
Carter Schonwald
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://www.haskell.org//pipermail/haskell-cafe/attachments/20050315/e2b5ce37/attachment.htm