Commits

Sebastien Mondet committed 6b10de4

build: update generated files

Comments (0)

Files changed (2)

 Installation Instructions
 =========================
 
-Build & Install
----------------
+Build
+-----
 
-This library does not have dependencies:
+This package does not have dependencies, just do:
 
-     ocaml please.ml build
+    ocaml please.ml build
 
-Finally, you can install it with `ocamlfind`:
+Install
+-------
 
-     ocaml please.ml install
+You can install the library with `ocamlfind`:
 
-You may want to control the destination with the variable
-`OCAMLFIND_DESTDIR`.
+    ocaml please.ml install
+
+You may want to control the destination with the variable `OCAMLFIND_DESTDIR`.
 
 Uninstall
 ---------
 
+You can uninstall the library (also `ocamlfind`):
+
     ocaml please.ml uninstall
 
         ])
 
 
+let uninstall () =
+    chain [
+      "ocamlfind remove sosa"
+    ]
+
+
 let merlinize () =
     chain [
       "echo 'S .' > .merlin";
 
 let name = "sosa"
 
-let () =
-  match args with
-  | _ :: "build" :: [] ->
-    say "Building.";
-    build ();
-    say "Done."
-  | _ :: "build_doc" :: [] ->
-    say "Building the documentation.";
-    build_doc ()
-  | _ :: "install" :: [] ->
-    say "Installing";
-    install ();
-  | _ :: "uninstall" :: [] ->
-    chain [
-      sprintf "ocamlfind remove %s" name
-    ]
-  | _ :: "merlinize" :: [] -> merlinize ()
-  | _ :: "clean" :: []
-  | _ :: "C" :: [] ->
-    cmdf "rm -fr _build"
-  | _ :: "help" :: [] ->
-    say "usage: ocaml %s [build|build_doc|install|uninstall|clean|merlinize]" Sys.argv.(0);
-  | _ ->
-    say "usage: ocaml %s [build|build_doc|install|uninstall|clean|merlinize]" Sys.argv.(0);
-    exit 1
-    
+let () = begin
+match args with
+| _ :: "build" :: [] ->(
+say "Building";
+build ();
+say "Done."
+)
+| _ :: "build_doc" :: [] ->(
+say "Building Documentation";
+build_doc ();
+say "Done."
+)
+| _ :: "install" :: [] ->(
+say "Installing";
+install ();
+say "Done."
+)
+| _ :: "uninstall" :: [] ->(
+say "Uninstalling";
+uninstall ();
+say "Done."
+)
+| _ :: "merlinize" :: [] ->(
+say "Updating `.merlin` file";
+merlinize ();
+say "Done."
+)
+| _ :: "clean" :: [] ->(
+say "Cleaning";
+cmdf "rm -fr _build";
+say "Done."
+)
+| _ ->(
+say "usage: ocaml %s [build|install|uninstall|clean|build_doc|melinize]" Sys.argv.(0)
+)
+
+end