OSDN Git Service

Remove habc-xml, because it is deprecated
[happyabc/happyabc.git] / xml / main.ml
diff --git a/xml/main.ml b/xml/main.ml
deleted file mode 100644 (file)
index 5c3d389..0000000
+++ /dev/null
@@ -1,14 +0,0 @@
-open Base
-let _ =
-  let argv =
-    Array.to_list Sys.argv in
-    match argv with
-      _::xs ->
-       xs +> List.iter (print_endline       $
-                          Xml.to_string_fmt $
-                          Swfmill.to_xml    $
-                          Swflib.Abc.read $
-                          Swflib.BytesIn.of_channel  $
-                          open_in_bin)
-      | [] ->
-         failwith "must not happen"