guestfs_set_error_handler (g, print_error, NULL);
- guestfs_set_path (g, \"../appliance\");
-
filename = \"test1.img\";
fd = open (filename, O_WRONLY|O_CREAT|O_NOCTTY|O_NONBLOCK|O_TRUNC, 0666);
if (fd == -1) {
with Not_found ->
failwithf "%s: in test, command %s was not found" test_name name in
+ (* If the call has optional args, fold them all together. We cannot
+ * test partial optional args yet.
+ *)
+ let style =
+ let ret, args, optargs = style in
+ ret, args@optargs in
+
if List.length (snd style) <> List.length args then
failwithf "%s: in test, wrong number of args given to %s"
test_name name;