Config.Stdmodule Blang = Blangmodule Dune = Dunemodule Dune_project = Dune_projectinclude module type of struct include Blang.O endinclude Blang.Constructorsval base : 'a -> 'a Blang.tval true_ : _ Blang.tval false_ : _ Blang.tval constant : bool -> _ Blang.tfunction true -> true_ | false -> false_
a ==> b is "a implies b". This is not => to avoid making it look like a comparison operator.
val backend : 'a -> [> `backend of 'a ] Blang.tval dune : 'a -> [> `dune of 'a ] Blang.tval dune_lang_version : 'a -> [> `dune_lang_version of 'a ] Blang.tval dune_project : 'a -> [> `dune_project of 'a ] Blang.tval equals : 'a -> [> `equals of 'a ] Blang.tval executable : 'a -> [> `executable of 'a ] Blang.tval flag :
Dune.Pps.Predicate.Flag.t ->
[> `flag of Dune.Pps.Predicate.Flag.t ] Blang.tval generate_opam_files : 'a -> [> `generate_opam_files of 'a ] Blang.tval greater_than_or_equal_to :
'a ->
[> `greater_than_or_equal_to of 'a ] Blang.tval has_field : 'a -> [> `has_field of 'a ] Blang.tval has_mode : 'a -> [> `has_mode of 'a ] Blang.tval has_modes : 'a -> [> `has_modes of 'a ] Blang.tval implicit_transitive_deps :
'a ->
[> `implicit_transitive_deps of 'a ] Blang.tval include_subdirs : 'a -> [> `include_subdirs of 'a ] Blang.tval instrumentation : 'a -> [> `instrumentation of 'a ] Blang.tval is_prefix : string -> [> `is_prefix of string ] Blang.tval is_present : [> `is_present ] Blang.tval is_suffix : string -> [> `is_suffix of string ] Blang.tval less_than_or_equal_to : 'a -> [> `less_than_or_equal_to of 'a ] Blang.tval library : 'a -> [> `library of 'a ] Blang.tval lint : 'a -> [> `lint of 'a ] Blang.tval modes : 'a -> [> `modes of 'a ] Blang.tval name : 'a -> [> `name of 'a ] Blang.tval no_preprocessing : [> `no_preprocessing ] Blang.tval path : 'a -> [> `path of 'a ] Blang.tval pp : Dune.Pp.Name.t -> [> `pp of Dune.Pp.Name.t ] Blang.tval pps : 'a -> [> `pps of 'a ] Blang.tval pp_with_flag :
Dune.Pps.Predicate.Pp_with_flag.t ->
[> `pp_with_flag of Dune.Pps.Predicate.Pp_with_flag.t ] Blang.tval preprocess : 'a -> [> `preprocess of 'a ] Blang.tval public_name : 'a -> [> `public_name of 'a ] Blang.tval stanza : 'a -> [> `stanza of 'a ] Blang.t