mirrors/libguestfs
1
0
Fork 0
mirror of https://github.com/libguestfs/libguestfs.git synced 2026-03-21 22:53:37 +00:00
Code Issues Packages Projects Releases Wiki Activity

generator: Remove unused parameter.

Browse Source 
generate_c_call_args optional decl parameter is never actually
used, so remove it.
This commit is contained in:
Richard W.M. Jones
2010-10-20 13:35:43 +01:00
parent dad3fcfefd
commit fcd75e021a
1 changed files with 6 additions and 7 deletions
Download Patch File Download Diff File Expand all files Collapse all files

13
generator/generator_c.ml
View File

@@ -100,7 +100,7 @@ let rec generate_prototype ?(extern = true) ?(static = false)
if newline then pr "\n"
(* Generate C call arguments, eg "(handle, foo, bar)" *)
and generate_c_call_args ?handle ?(decl = false) style =
and generate_c_call_args ?handle style =
pr "(";
let comma = ref false in
let next () =
@@ -121,12 +121,11 @@ and generate_c_call_args ?handle ?(decl = false) style =
pr "%s" (name_of_argt arg)
) (snd style);
(* For RBufferOut calls, add implicit &size parameter. *)
if not decl then (
match fst style with
| RBufferOut _ ->
next ();
pr "&size"
| _ -> ()
(match fst style with
| RBufferOut _ ->
next ();
pr "&size"
| _ -> ()
);
pr ")"