method
links =
let
svs = call_method_array sv
"links"
[]
in
List
.map (
new
www_mechanize_link) svs