X-Git-Url: http://lambda.jimpryor.net/git/gitweb.cgi?a=blobdiff_plain;f=coroutines_and_aborts.mdwn;h=4c3861f0d20aa7807c5905bf1aaf26f2b09d64b3;hb=0cd006d378ff7e001b4bc5203c97771eafd209da;hp=ff75eff71862d3169213feae032c3cea1d020929;hpb=e6a82e88a839c7b99ad70dbd4a5d3ccc6a177457;p=lambda.git diff --git a/coroutines_and_aborts.mdwn b/coroutines_and_aborts.mdwn index ff75eff7..4c3861f0 100644 --- a/coroutines_and_aborts.mdwn +++ b/coroutines_and_aborts.mdwn @@ -70,7 +70,7 @@ Here is how you can extract the components of a labeled record: match test with | {height = h; weight = w; char_tester = test} -> - (* go on to use h, w, and test ... *) + (* same as preceding *) Anyway, using record types, we might define the tree zipper interface like so: @@ -324,7 +324,7 @@ the effect is for the program to immediately stop. That's not exactly true. You ;; val foo : int -> int = # foo 1;; - - : int = 10 + - : int = 110 # foo 2;; - : int = 20 # foo 3;;