diff -r 47f86885d481 -r e85600529ca5 app8.scala --- a/app8.scala Sun Dec 23 00:38:56 2012 +0000 +++ /dev/null Thu Jan 01 00:00:00 1970 +0000 @@ -1,23 +0,0 @@ -class SeqParser[I, T, S](p: => Parser[I, T], - q: => Parser[I, S]) - extends Parser[I, (T, S)] { - def parse(sb: I) = - for ((head1, tail1) <- p.parse(sb); - (head2, tail2) <- q.parse(tail1)) - yield ((head1, head2), tail2) -} - -class AltParser[I, T](p: => Parser[I, T], - q: => Parser[I, T]) - extends Parser[I, T] { - def parse(sb: I) = p.parse(sb) ++ q.parse(sb) -} - -class FunParser[I, T, S](p: => Parser[I, T], f: T => S) - extends Parser[I, S] { - def parse(sb: I) = - for ((head, tail) <- p.parse(sb)) - yield (f(head), tail) -} - -