Use topkg-jbuilder as an external package

This commit is contained in:
Jeremie Dimino 2017-05-08 16:17:26 +01:00
parent 221baefb81
commit 09b8e04f1c
3 changed files with 5 additions and 65 deletions

5
jbuild
View File

@ -1,5 +0,0 @@
(jbuild_version 1)
(install
((section toplevel)
(files (topkg-jbuilder))))

View File

@ -1,7 +1,9 @@
#!/usr/bin/env ocaml
#use "./topkg-jbuilder"
#use "topfind"
#require "topkg-jbuilder"
open Topkg
let () =
Pkg.describe "jbuilder"
Topkg_jbuilder.describe ()
~readmes: [ Pkg.std_file "README.org" ]
~licenses:[ Pkg.std_file "LICENSE.txt" ]

View File

@ -1,57 +0,0 @@
(* -*- tuareg -*- *)
#use "topfind"
#require "topkg"
open Topkg
module Pkg = struct
include Pkg
let build
?(cmd=fun c os _files ->
let jbuilder = Conf.tool "jbuilder" os in
OS.Cmd.run @@ Cmd.(jbuilder % "build" % "-p" % Conf.pkg_name c))
?(clean=fun os ~build_dir ->
let rm = Conf.tool "rm" os in
let find = Conf.tool "find" os in
OS.Cmd.run @@ Cmd.(rm % "-rf" % build_dir) >>= fun () ->
OS.Cmd.run @@ Cmd.(find % "." % "-name" % ".merlin" % "-delete"))
=
Pkg.build ~cmd ~clean
let opam_files () =
Sys.readdir "."
|> Array.to_list
|> List.filter (String.is_suffix ~affix:".opam")
|> List.map (Pkg.opam_file ~lint_deps_excluding:None)
let describe
?delegate
?readmes
?licenses
?change_logs
?(metas=[])
?(opams=opam_files ())
?lint_files
?lint_custom
?distrib
?publish
?(build=build ())
name
=
describe
?delegate
?readmes
?licenses
?change_logs
~metas
~opams
?lint_files
?lint_custom
?distrib
?publish
~build
name
@@ fun c ->
Ok [ (*Pkg.test "jbuilder" ~auto:false ~args:Cmd.(empty % "runtest" % "-p" % Conf.pkg_name c)*) ]
end