| AugNoStdinc
| AugSaveNoop
| AugNoLoad
+ | AugNoModlAutoload
+ | AugEnableSpan
+ | AugNoErrClose
+ | AugTraceModuleLoading
type error_code =
| AugErrInternal
| AugErrCpDesc
| AugErrUnknown of int
+type transform_mode =
+ | Include
+ | Exclude
+
exception Error of error_code * string * string * string
type path = string
= "ocaml_augeas_load"
external set : t -> path -> value option -> unit
= "ocaml_augeas_set"
+external transform : t -> string -> string -> transform_mode -> unit
+ = "ocaml_augeas_transform"
+external source : t -> path -> path option
+ = "ocaml_augeas_source"
let () =
Callback.register_exception "Augeas.Error" (Error (AugErrInternal, "", "", ""))