week9 tweak

Signed-off-by: Jim Pryor <profjim@jimpryor.net>

diff --git a/week9.mdwn b/week9.mdwn
index f5beebb..b2fbb3a 100644 (file)
--- a/week9.mdwn
+++ b/week9.mdwn
@@ -350,7 +350,7 @@ Let's consider how to interpet our new syntactic forms `newref`, `deref`, and `s
                        ...
                        | Setref (expr1, expr2) ->
                                let (Index n, s') = eval expr1 g s
                        ...
                        | Setref (expr1, expr2) ->
                                let (Index n, s') = eval expr1 g s

-                               (* note that s' may be different from s, if expr itself contained any mutation operations *)
+                               (* note that s' may be different from s, if expr1 itself contained any mutation operations *)

                                in let (new_value, s'') = eval expr2 g s'
                                (* now we create a list which is just like s'' except it has new_value in index n *)
                                in let rec replace_nth lst m =
                                in let (new_value, s'') = eval expr2 g s'
                                (* now we create a list which is just like s'' except it has new_value in index n *)
                                in let rec replace_nth lst m =