diff --git a/library/monads/state/State.scala b/library/monads/state/State.scala index f6a887356af542aaae811bee2af9caf676651b37..ece710774a3a707e3ea8740eeee7a6e4989b498a 100644 --- a/library/monads/state/State.scala +++ b/library/monads/state/State.scala @@ -135,12 +135,12 @@ object State { l match { case Nil() => unit(z) case x :: xs => - f(z, x) >>= ( z0 => foldLeftM(f, z0,xs) ) + f(z, x) >>= ( z0 => foldLeftM(f,z0,xs) ) } } //(b -> a -> m b) -> b -> t a -> m () - def foldLeftM_ [S, A, B](f: A => State[S, Unit], l: List[A]): State[S, Unit] = { + def foldLeftM_ [S, A](f: A => State[S, Unit], l: List[A]): State[S, Unit] = { l match { case Nil() => unit(()) case x :: xs => @@ -422,4 +422,4 @@ object ExampleStackEval { // evalM(e).exec(empty).head == eval(e) //}.holds -} \ No newline at end of file +}