method scan_class_pre c = self#gen_if_tag c.cl_name (fst (Odoc_html.Naming.html_files c.cl_name)) c.cl_info; true