From 7cfe0a70eda671ada6a46cd779ef9308f7e0fdb9 Mon Sep 17 00:00:00 2001 From: Pierre-Marie Pédrot Date: Mon, 8 Sep 2014 18:34:04 +0200 Subject: Removing the XML plugin. Left a README, just in case someone will discover the remnants of it decades from now. --- plugins/xml/cic2Xml.ml | 17 ----------------- 1 file changed, 17 deletions(-) delete mode 100644 plugins/xml/cic2Xml.ml (limited to 'plugins/xml/cic2Xml.ml') diff --git a/plugins/xml/cic2Xml.ml b/plugins/xml/cic2Xml.ml deleted file mode 100644 index 981503a663..0000000000 --- a/plugins/xml/cic2Xml.ml +++ /dev/null @@ -1,17 +0,0 @@ -let print_xml_term ch env sigma cic = - let ids_to_terms = Hashtbl.create 503 in - let constr_to_ids = Acic.CicHash.create 503 in - let ids_to_father_ids = Hashtbl.create 503 in - let ids_to_inner_sorts = Hashtbl.create 503 in - let ids_to_inner_types = Hashtbl.create 503 in - let seed = ref 0 in - let acic = - Cic2acic.acic_of_cic_context' true seed ids_to_terms constr_to_ids - ids_to_father_ids ids_to_inner_sorts ids_to_inner_types - env [] sigma (Unshare.unshare cic) None in - let xml = Acic2Xml.print_term ids_to_inner_sorts acic in - Xml.pp_ch xml ch -;; - -Tacinterp.declare_xml_printer print_xml_term -;; -- cgit v1.2.3