From 101ab9ca8c3e026592f648de202f8f2b62644474 Mon Sep 17 00:00:00 2001 From: Alex AUVOLAT Date: Sun, 25 May 2014 01:35:30 +0200 Subject: Compatibility --- src/example.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'src/example.ml') diff --git a/src/example.ml b/src/example.ml index 7b6f23e..2aade1f 100644 --- a/src/example.ml +++ b/src/example.ml @@ -76,7 +76,7 @@ module Example (K : Kahn.S) = struct let main2 : int K.process = (delay K.new_channel()) >>= (fun (qi, qo) -> - (fib_rec 50 7 qo) >>= + (fib_rec 53 7 qo) >>= (fun () -> K.get qi)) end -- cgit v1.2.3