<table cellspacing="0" cellpadding="0" border="0" ><tr><td valign="top" style="font: inherit;"><div>Thanks, Albert.</div><div><br></div><div>The code is from this page, just below the definition of parse:</div><div><br></div><a href="http://hackage.haskell.org/packages/archive/parsec/latest/doc/html/Text-Parsec-Prim.html#v:parse">http://hackage.haskell.org/packages/archive/parsec/latest/doc/html/Text-Parsec-Prim.html#v:parse</a><div><br></div><div>Michael<br><br>--- On <b>Sun, 8/7/11, Albert Y. C. Lai <i><trebla@vex.net></i></b> wrote:<br><blockquote style="border-left: 2px solid rgb(16, 16, 255); margin-left: 5px; padding-left: 5px;"><br>From: Albert Y. C. Lai <trebla@vex.net><br>Subject: Re: [Haskell-cafe] Simple Parsec example<br>To: haskell-cafe@haskell.org<br>Date: Sunday, August 7, 2011, 8:00 PM<br><br><div class="plainMail">On 11-08-07 02:44 PM, michael rice wrote:<br>> What other imports must I add to get this to run. I can't seem
to get it<br>> right.<br>[...]<br>> import Text.ParserCombinators.Parsec.Prim<br>> <br>> main = case (parse numbers "" "11, 2, 43") of<br>> Left err -> print err<br>> Right xs -> print (sum xs)<br>> <br>> numbers = commaSep integer<br><br>The problem is deeper than imports.<br><br>import Text.Parsec.Prim(parse)<br>import Text.Parsec.Token(makeTokenParser,<br> GenTokenParser(TokenParser, commaSep, integer))<br>import Text.Parsec.Language(emptyDef)<br><br>main = case (parse numbers "" "11, 2, 43") of<br> Left err -> print err<br> Right xs -> print (sum xs)<br><br>numbers = c i where<br> TokenParser{commaSep=c, integer=i} = makeTokenParser emptyDef<br><br>_______________________________________________<br>Haskell-Cafe mailing list<br><a ymailto="mailto:Haskell-Cafe@haskell.org"
href="/mc/compose?to=Haskell-Cafe@haskell.org">Haskell-Cafe@haskell.org</a><br><a href="http://www.haskell.org/mailman/listinfo/haskell-cafe" target="_blank">http://www.haskell.org/mailman/listinfo/haskell-cafe</a><br></div></blockquote></div></td></tr></table>