oops

jaked · May 5, 2010 · 7d252ab · 7d252ab
1 parent e22f18a
commit 7d252ab
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 4 deletions.
diff --git a/src/froc/froc.mli b/src/froc/froc.mli
@@ -460,8 +460,8 @@ val memo :
      The unit argument makes it possible to memoize a recursive
      function, using the following idiom: {[
        let m = memo () in (* creates the memo table *)
-       let rec f x = ... memo f y in
-       let f x = memo f x
+       let rec f x = ... m f y in
+       let f x = m f x
      ]}
 
      The default hash function is not appropriate for behaviors and

diff --git a/src/froc/froc_sa.mli b/src/froc/froc_sa.mli
@@ -175,8 +175,8 @@ val memo :
      The unit argument makes it possible to memoize a recursive
      function, using the following idiom: {[
      let m = memo () in (* creates the memo table *)
-       let rec f x = ... memo f y in
-       let f x = memo f x
+       let rec f x = ... m f y in
+       let f x = m f x
      ]}
 
      The default hash function is not appropriate for changeables