M (yaml.Yaml

include sig ... end

val foreign : string -> ('a -> 'b) G.fn -> ('a -> 'b) G.result

module C : sig ... end

val version : (unit -> string G.return) G.result

val get_version : 
  (int Ctypes_static.ptr ->
    int Ctypes_static.ptr ->
    int Ctypes_static.ptr ->
    unit G.return)
    G.result

val token_delete : 
  (Yaml_bindings.T.Token.t Ctypes.structure Ctypes_static.ptr ->
    unit G.return)
    G.result

val parser_init : 
  (Yaml_bindings.T.Parser.t Ctypes.structure Ctypes_static.ptr ->
    int G.return)
    G.result

val parser_delete : 
  (Yaml_bindings.T.Parser.t Ctypes.structure Ctypes_static.ptr ->
    unit G.return)
    G.result

val parser_set_input_string : 
  (Yaml_bindings.T.Parser.t Ctypes.structure Ctypes_static.ptr ->
    char Ctypes_static.ptr ->
    Unsigned.size_t ->
    unit G.return)
    G.result

val parser_parse : 
  (Yaml_bindings.T.Parser.t Ctypes.structure Ctypes_static.ptr ->
    Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    int G.return)
    G.result

val emitter_init : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    int G.return)
    G.result

val emitter_delete : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    unit G.return)
    G.result

val emitter_set_output_string : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    char Ctypes_static.ptr ->
    Unsigned.size_t ->
    Unsigned.size_t Ctypes_static.ptr ->
    unit G.return)
    G.result

val emitter_set_encoding : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    Yaml_bindings_types.Encoding.t ->
    unit G.return)
    G.result

val emitter_set_canonical : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    bool ->
    unit G.return)
    G.result

val emitter_set_indent : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    int ->
    unit G.return)
    G.result

val emitter_set_width : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    int ->
    unit G.return)
    G.result

val emitter_set_unicode : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    bool ->
    unit G.return)
    G.result

val emitter_flush : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    int G.return)
    G.result

val emitter_emit : 
  (Yaml_bindings.T.Emitter.t Ctypes.structure Ctypes_static.ptr ->
    Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    int G.return)
    G.result

val stream_start_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    Yaml_bindings_types.Encoding.t ->
    int G.return)
    G.result

val stream_end_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    int G.return)
    G.result

val document_start_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    Yaml_bindings.T.Version_directive.t Ctypes.structure Ctypes_static.ptr ->
    Yaml_bindings.T.Tag_directive.t Ctypes.structure Ctypes_static.ptr ->
    Yaml_bindings.T.Tag_directive.t Ctypes.structure Ctypes_static.ptr ->
    bool ->
    int G.return)
    G.result

val document_end_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    bool ->
    int G.return)
    G.result

val alias_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    string ->
    int G.return)
    G.result

val scalar_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    string option ->
    string option ->
    string ->
    int ->
    bool ->
    bool ->
    Yaml_bindings_types.Scalar_style.t ->
    int G.return)
    G.result

val sequence_start_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    string option ->
    string option ->
    bool ->
    Yaml_bindings_types.Sequence_style.t ->
    int G.return)
    G.result

val sequence_end_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    int G.return)
    G.result

val mapping_start_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    string option ->
    string option ->
    bool ->
    Yaml_bindings_types.Mapping_style.t ->
    int G.return)
    G.result

val mapping_end_event_init : 
  (Yaml_bindings.T.Event.t Ctypes.structure Ctypes_static.ptr ->
    int G.return)
    G.result