Source

ocaml-core / base / core / extended / lib / extended_memo.ml

The branch 'bash' does not exist.
Full commit
1
2
3
4
5
6
7
8
9
open Core.Std

let general_rec g =
  let fref = ref (fun _ -> assert false) in
  let f = Memo.general (fun x -> g !fref x) in
  fref := f;
  f
;;