(* -*- tuareg -*- *) let prefix = "lib_embedded_protocol_" let dirname = Filename.basename @@ Filename.dirname @@ Sys.getcwd () let predefined_version = None (* to be substituted in opam packages *) let version = match predefined_version with | Some version -> version | None -> let x = String.length prefix in let n = String.length dirname in if not (n >= x && String.sub dirname 0 x = prefix) then failwith "unexpected directory name" ; String.sub dirname x (n - x) let () = Format.kasprintf Jbuild_plugin.V1.send {| (jbuild_version 1) (rule ((targets (environment.ml)) (action (write-file ${@@} "include Tezos_node_updater.Tezos_protocol_environment.Make(struct let name = \"%s\" end)()")))) (rule ((targets (registerer.ml)) (deps (tezos_embedded_protocol_environment_%s.cmxa TEZOS_PROTOCOL)) (action (with-stdout-to ${@@} (chdir ${ROOT} (run ${bin:tezos-embedded-protocol-packer} ${path-no-dep:.} "%s")))))) (library ((name tezos_embedded_protocol_environment_%s) (public_name tezos-embedded-protocol-%s.environment) (library_flags (:standard -linkall)) (libraries (tezos-node-updater)) (modules (Environment)))) (library ((name tezos_embedded_raw_protocol_%s) (public_name tezos-embedded-protocol-%s.raw) (libraries (tezos_embedded_protocol_environment_%s)) (library_flags (:standard -linkall)) (flags (:standard -nopervasives -nostdlib -safe-string -w +a-4-6-7-9-29-32-40..42-44-45-48 -warn-error -a+8 -open Tezos_embedded_protocol_environment_%s__Environment -open Error_monad -open Hash -open Tezos_data)) (modules (:standard \ Environment Registerer)))) (library ((name tezos_embedded_protocol_%s) (public_name tezos-embedded-protocol-%s) (library_flags (:standard -linkall)) (libraries (tezos_embedded_raw_protocol_%s tezos-node-shell)) (modules (Registerer)))) |} version version version version version version version version version version version version