Source

ocamlspot / tests / included_value.ml

1
2
3
4
5
6
module (* M => *) M (* <= M *) = struct
  let (* M.bar => *) bar (* <= M.bar *) = 42
end

include M (* ? M *)
let _ = bar (* ? M.bar *)