polyparse.scala

gistfile1.scala

scala> val pair = for {
     | _ <- token(char('{'))
     | id <- token(ident)
     | _ <- token(char(':'))
     | v <- integer
     | _ <- token(char('}'))
     | } yield id -> v
obj: scalaz.parse.huttonmeijer.Parser[(List[Char], Int)] = scalaz.parse.huttonmeijer.Parser$$anon$2@234e7730

scala> pair("{ foo : 17 }".toList)
res3: List[((List[Char], Int), scalaz.parse.huttonmeijer.package.Tokens)] = List(((List(f, o, o),17),List()))