No change, just make the layout consistent with similar functions above. --- generator/C.ml | 45 +++++++++++++++++++++++---------------------- 1 file changed, 23 insertions(+), 22 deletions(-)
diff --git a/generator/C.ml b/generator/C.ml index b2d46f985a..f4d24b650d 100644 --- a/generator/C.ml +++ b/generator/C.ml @@ -83,28 +83,29 @@ let | RUInt64 -> "uint64_t" | RFlags _ -> "uint32_t" -let rec name_of_arg = function -| Bool n -> [n] -| BytesIn (n, len) -> [n; len] -| BytesOut (n, len) -> [n; len] -| BytesPersistIn (n, len) -> [n; len] -| BytesPersistOut (n, len) -> [n; len] -| Closure { cbname } -> - [ sprintf "%s_callback" cbname; sprintf "%s_user_data" cbname ] -| Enum (n, _) -> [n] -| Fd n -> [n] -| Flags (n, _) -> [n] -| Int n -> [n] -| Int64 n -> [n] -| Path n -> [n] -| SizeT n -> [n] -| SockAddrAndLen (n, len) -> [n; len] -| String n -> [n] -| StringList n -> [n] -| UInt n -> [n] -| UInt32 n -> [n] -| UInt64 n -> [n] -| UIntPtr n -> [n] +let rec name_of_arg = + function + | Bool n -> [n] + | BytesIn (n, len) -> [n; len] + | BytesOut (n, len) -> [n; len] + | BytesPersistIn (n, len) -> [n; len] + | BytesPersistOut (n, len) -> [n; len] + | Closure { cbname } -> + [ sprintf "%s_callback" cbname; sprintf "%s_user_data" cbname ] + | Enum (n, _) -> [n] + | Fd n -> [n] + | Flags (n, _) -> [n] + | Int n -> [n] + | Int64 n -> [n] + | Path n -> [n] + | SizeT n -> [n] + | SockAddrAndLen (n, len) -> [n; len] + | String n -> [n] + | StringList n -> [n] + | UInt n -> [n] + | UInt32 n -> [n] + | UInt64 n -> [n] + | UIntPtr n -> [n] let rec print_arg_list ?(wrap = false) ?maxcol ?handle ?types ?(parens = true) ?closure_style args optargs = -- 2.37.0.rc2 _______________________________________________ Libguestfs mailing list Libguestfs@redhat.com https://listman.redhat.com/mailman/listinfo/libguestfs