lablqml 0.7 · OCaml Package

val ref_append : set:'a list ref -> 'a -> unit

type opt_item =

| OInstantiable
| OItemModel
| OItemModelVal of string option

module Options : sig ... end

val gen_meth : 
  ?minfo:TypeRepr.meth_info ->
  classname:string ->
  methname:string ->
  TypeRepr.Arg.non_cppobj TypeRepr.Arg.t list ->
  unit

val gen_signal : 
  classname:string ->
  signalname:string ->
  (Ppxlib.arg_label * TypeRepr.Arg.non_cppobj TypeRepr.Arg.t) list ->
  unit

val alloc_and_store : 
  Format.formatter ->
  classname:string ->
  obj:string ->
  where:string ->
  unit

val gen_prop : 
  classname:string ->
  propname:string ->
  TypeRepr.Arg.default TypeRepr.Arg.t ->
  unit

val only_open : classname:string -> unit

val print_header_preamble : classname:string -> unit

val print_source_preamble : classname:string -> unit

val get_header_ch : classname:string -> out_channel

val get_source_ch : classname:string -> out_channel

val get_header_ppf : classname:string -> Format.formatter

val get_source_ppf : classname:string -> Format.formatter

val get_smart_ppf : 
  (classname:'a -> out_channel) ->
  classname:'a ->
  Format.formatter * (string -> unit)

val open_files : options:Options.t -> classname:string -> unit

val close_files : ?caml_owner:bool -> options:Options.t -> unit -> unit

module Names : sig ... end

val itemmodel_members : 
  (string * TypeRepr.Arg.non_cppobj TypeRepr.Arg.t list * TypeRepr.meth_info)
    list

val itemmodel_externals : 
  classname:string ->
  (string * string * TypeRepr.Arg.any TypeRepr.Arg.t list) list

val gen_itemmodel_stuff : classname:string -> unit

type triplet

val cpp_value_of_ocaml : 
  ?options:opt_item list ->
  cppvar:string ->
  ocamlvar:string ->
  Format.formatter ->
  triplet ->
  [ `Default | `Model ] TypeRepr.Arg.t ->
  unit

val vars_triplet : string list -> triplet

val ocaml_value_of_cpp : 
  Format.formatter ->
  triplet ->
  ocamlvar:string ->
  cppvar:string ->
  [ `Default | `Model ] TypeRepr.Arg.t ->
  unit

val gen_stub_cpp : 
  ?options:opt_item list ->
  classname:string ->
  stubname:string ->
  methname:string ->
  Format.formatter ->
  (TypeRepr.Arg.non_cppobj TypeRepr.Arg.t * TypeRepr.arg_info) list ->
  unit

val gen_meth_cpp_generic : 
  ?minfo:TypeRepr.meth_info ->
  classname:string ->
  methname:string ->
  (make_cb_var:(int -> string) ->
    string ->
    string list ->
    args:(TypeRepr.Arg.non_cppobj TypeRepr.Arg.t * TypeRepr.arg_info) list ->
    triplet * string) ->
  Format.formatter ->
  (TypeRepr.Arg.non_cppobj TypeRepr.Arg.t * TypeRepr.arg_info) list ->
  unit

val gen_meth_header : 
  ?minfo:TypeRepr.meth_info ->
  methname:Ppxlib.label ->
  res:([ `Default | `Model ] TypeRepr.Arg.t * TypeRepr.arg_info) ->
  args:(TypeRepr.Arg.non_cppobj TypeRepr.Arg.t * TypeRepr.arg_info) list ->
  Format.formatter ->
  unit

val enter_blocking_section : Format.formatter -> unit

val leave_blocking_section : Format.formatter -> unit

package lablqml