+(* Not much documentation exists for the WWW::Mechanize::Link class. As far
+ * as I can see, the only documented method is #url to return the URL. XXX
+ *)
+and www_mechanize_link sv =
+
+object (self)
+
+ method sv = sv
+
+ method url =
+ let sv = call_method sv "url" [] in
+ string_of_sv sv
+
+end
+