summaryrefslogtreecommitdiff
path: root/docs/examples/monads/stateInterpreter.scala
diff options
context:
space:
mode:
Diffstat (limited to 'docs/examples/monads/stateInterpreter.scala')
-rw-r--r--docs/examples/monads/stateInterpreter.scala4
1 files changed, 2 insertions, 2 deletions
diff --git a/docs/examples/monads/stateInterpreter.scala b/docs/examples/monads/stateInterpreter.scala
index 35568fb314..97f3335dab 100644
--- a/docs/examples/monads/stateInterpreter.scala
+++ b/docs/examples/monads/stateInterpreter.scala
@@ -7,7 +7,7 @@ object stateInterpreter {
val tickS = new M(s => Pair((), s + 1));
case class M[A](in: State => Pair[A, State]) {
- def bind[B](k: A => M[B]) = M[B]{ s0 =>
+ def bind[B](k: A => M[B]) = M[B]{ s0 =>
val Pair(a, s1) = this in s0; k(a) in s1
}
def map[B](f: A => B): M[B] = bind(x => unitM(f(x)));
@@ -72,7 +72,7 @@ object stateInterpreter {
yield c
}
- def test(t: Term): String =
+ def test(t: Term): String =
showM(interp(t, List()));
val term0 = App(Lam("x", Add(Var("x"), Var("x"))), Add(Con(10), Con(11)));