toto.ml 238 Bytes
Newer Older
1
2
3
4
5
6
7
8
9
10
11
12
(* Example taken from Gabriel Scherer's post about Overriding submodules
   on Gagallium blog.
   http://gallium.inria.fr/blog/overriding-submodules/
*)

let x = 1
module Tata = struct
  let y = 2
end
module Titi = struct
  let z = 3
end