blob: d815b4ccc09e8de706bd73b50f75537b3da25070 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
(* TEST
plugins="odoc_test.ml"
* ocamldoc
flags="-I ${ocamlsrcdir}/ocamldoc"
*)
(** Testing display of inline record.
@test_types_display
*)
module A = struct
type a = A of {lbl:int}
end
module type E = sig
exception E of {lbl:int}
end
module E_bis= struct
exception E of {lbl:int}
end
|
