[Ocamlnet-devel] unexpected nethtml parsing behavior

[Ashish A. <aga...@gm...>]

utop # let parse s =
  Netchannels.with_in_obj_channel
    (new Netchannels.input_string s)
    Nethtml.parse
;;
val parse : string -> Nethtml.document list = <fun>

utop # parse "<div><li></li></div>";;
- : Nethtml.document list = [Nethtml.Element ("div", [], []);
Nethtml.Element ("li", [], [])]


The list item isn't a child of the div. I appreciate the html is
ill-formed, but does Nethtml check for such things?