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
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
(** {x This is bad markup} *)
val a : int
(** {9 Bad hading level} *)
val b : int
(* {4 Heading} this should be on it's own line *)
val c : int
(** {ul {limust be followed by whitespace}} *)
val d : int
(** {limust in a ul} *)
val e : int
(** {vmust be followed by whitespace v} *)
val f : int
(** {v must be preceded by whitespacev} *)
val g : int
(** @ stray *)
val h : int
(** Expect something on the same line: *)
val i : int
(** @before *)
val j : int
(** @param *)
val k : int
(** @raise *)
val l1 : int
(** @raises *)
val l2 : int
(** @see *)
val m : int
(** @UnknownTag *)
val n : int
(** } unpaired *)
val o : int
(** ] unpaired *)
val p : int
(** This comment has bad
} markup on the second line. *)
val r : int
(** {x bad markup} in a standalone comment. *)
|
