Improve error reporting on init

[ocaml-augeas.git] / augeas.ml

diff --git a/augeas.ml b/augeas.ml
index 8d6ac6d..7601200 100644 (file)
--- a/augeas.ml
+++ b/augeas.ml
@@ -27,6 +27,10 @@ type flag =
   | AugNoStdinc
   | AugSaveNoop
   | AugNoLoad
+  | AugNoModlAutoload
+  | AugEnableSpan
+  | AugNoErrClose
+  | AugTraceModuleLoading
 
 type error_code =
   | AugErrInternal
@@ -78,6 +82,8 @@ 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, "", "", ""))