My agentic slop goes here. Not intended for anyone else!
anil.recoil.org
1(** [Syndic.W3C]: invoke and parse the result of the W3C validator. *)
2
3module Error : module type of Syndic_error
4
5type error
6type warning
7
8(** Distinguishes an error from a warning. *)
9type 'a kind
10
11val error : error kind
12val warning : warning kind
13
14type 'a t =
15 { kind: 'a kind (** Error or warning. *)
16 ; line: int
17 (** Within the source code of the validated document, refers to the
18 line where the error was detected. *)
19 ; column: int
20 (** Within the source code of the validated document, refers to the
21 line where the column was detected. *)
22 ; text: string (** The actual error message. *)
23 ; element: string
24 (** Element in the feed where the message was triggered. *)
25 ; parent: string (** In the feed, parent of the element. *)
26 ; value: string
27 (** If applicable the value of the element, attribute or content which
28 triggered the message. *) }
29
30val url : [< `Data of string | `Uri of Uri.t] -> Uri.t
31(** Generate url for the W3C Feed Validator API returning a SOAP 12 output.
32 Thus URL is supposed to be used with GET. *)
33
34val to_error : _ t -> Error.t
35
36val parse : Xmlm.input -> error t list * warning t list
37(** [parse i] takes [i] and returns a list of error, result of
38 {{:http://validator.w3.org/feed/docs/soap} W3C Feed Validator}. *)