X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=src%2Fgenerator.ml;h=556b1a9fc6f0f8f49c8133596b9bb2b000c6c884;hp=2cf96ee01143ca18f0a4f3352c918eef1fd4e734;hb=d6a0adf00900b05b7e9e14a29caf86fb30dec6a9;hpb=a3d4d655ffdd335372051c14ca53e8664ff799eb

diff --git a/src/generator.ml b/src/generator.ml
index 2cf96ee..556b1a9 100755
--- a/src/generator.ml
+++ b/src/generator.ml
@@ -7629,6 +7629,8 @@ and generate_lang_bindtests call =
 		CallStringList ["1"]; CallBool false;
 		CallInt 0; CallString ""; CallString ""]
 
+  (* XXX Add here tests of the return and error functions. *)
+
 let output_to filename =
   let filename_new = filename ^ ".new" in
   chan := open_out filename_new;