diff options
author | Richard W.M. Jones <rjones@redhat.com> | 2010-10-04 20:34:36 +0100 |
---|---|---|
committer | Richard W.M. Jones <rjones@redhat.com> | 2010-10-04 20:34:36 +0100 |
commit | 6fbbcdd64c1983efeadb846958865373df962078 (patch) | |
tree | 2773c78a62272973c57862b132f7a798ddb766d1 /generator | |
parent | 63bfcdbdd81b81e6a8e2157de36f9e1638801570 (diff) | |
download | libguestfs-6fbbcdd64c1983efeadb846958865373df962078.tar.gz libguestfs-6fbbcdd64c1983efeadb846958865373df962078.tar.xz libguestfs-6fbbcdd64c1983efeadb846958865373df962078.zip |
ocaml: Add g#ocaml_handle method.
Diffstat (limited to 'generator')
-rw-r--r-- | generator/generator_ocaml.ml | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/generator/generator_ocaml.ml b/generator/generator_ocaml.ml index 3bdba68f..6cb843aa 100644 --- a/generator/generator_ocaml.ml +++ b/generator/generator_ocaml.ml @@ -106,6 +106,8 @@ val clear_progress_callback : t -> unit object is garbage collected, or explicitly by calling the [g#close ()] method. + You can get the {!Guestfs.t} handle by calling [g#ocaml_handle]. + Note that methods that take no parameters (except the implicit handle) get an extra unit [()] parameter. This is so you can create a closure from the method easily. For example [g#get_verbose ()] @@ -115,6 +117,7 @@ class guestfs : unit -> object method close : unit -> unit method set_progress_callback : progress_cb -> unit method clear_progress_callback : unit -> unit + method ocaml_handle : t "; List.iter ( @@ -174,6 +177,7 @@ class guestfs () = method close () = close g method set_progress_callback = set_progress_callback g method clear_progress_callback () = clear_progress_callback g + method ocaml_handle = g "; List.iter ( |