open Xml type place = P of string let ps_to_xml (ps) = map (function (P p) -> p) ps;; とすると This pattern matches values of type place but is here used to match values of type Xml.xml と冷たく怒られる。なんでXML???
引用をストックしました
引用するにはまずログインしてください
引用をストックできませんでした。再度お試しください
限定公開記事のため引用できません。