http://www.libspark.org/browser/ocaml/abc2xml/abc.mlABC2XMLでは多相バリアントとpa_ooによる疑似多相レコードをひたすら使ってます。 let abcFile stream = {| minor_version = u16 stream; major_version = u16 stream; constant_pool = constant_pool …