diff options
author | Richard W.M. Jones <rjones@redhat.com> | 2010-11-03 22:11:22 +0000 |
---|---|---|
committer | Richard W.M. Jones <rjones@redhat.com> | 2010-11-03 22:12:05 +0000 |
commit | 19ea54b3f488755731ffc079519d6011dade9e5c (patch) | |
tree | c38a092bbb131035de90dcc9b98333484913f792 | |
parent | ece3b30e4957b2d1d02377a82afb132e8061804d (diff) | |
download | libguestfs-19ea54b3f488755731ffc079519d6011dade9e5c.tar.gz libguestfs-19ea54b3f488755731ffc079519d6011dade9e5c.tar.xz libguestfs-19ea54b3f488755731ffc079519d6011dade9e5c.zip |
docs: Indent *_va and *_argv functions correctly.
This fixes commit f661db2c393d1b7e4211c55682b7fac82a70e36d.
-rw-r--r-- | generator/generator_c.ml | 14 |
1 files changed, 7 insertions, 7 deletions
diff --git a/generator/generator_c.ml b/generator/generator_c.ml index ca14d142..13040f0b 100644 --- a/generator/generator_c.ml +++ b/generator/generator_c.ml @@ -84,9 +84,11 @@ let rec generate_prototype ?(extern = true) ?(static = false) let next () = if !comma then ( if single_line then pr ", " - else - pr ",\n%s%s" - indent (spaces (String.length prefix + String.length name + 2)) + else ( + let namelen = String.length prefix + String.length name + + String.length suffix + 2 in + pr ",\n%s%s" indent (spaces namelen) + ) ); comma := true in @@ -256,16 +258,14 @@ L</KEYS AND PASSPHRASES> for more information.\n\n"; (* Handling of optional argument variants. *) if optargs <> [] then ( pr "=head2 %s_va\n\n" name; - pr " "; - generate_prototype ~extern:false ~handle:"g" + generate_prototype ~extern:false ~indent:" " ~handle:"g" ~prefix:"guestfs_" ~suffix:"_va" ~optarg_proto:VA shortname style; pr "\n\n"; pr "This is the \"va_list variant\" of L</%s>.\n\n" name; pr "See L</CALLS WITH OPTIONAL ARGUMENTS>.\n\n"; pr "=head2 %s_argv\n\n" name; - pr " "; - generate_prototype ~extern:false ~handle:"g" + generate_prototype ~extern:false ~indent:" " ~handle:"g" ~prefix:"guestfs_" ~suffix:"_argv" ~optarg_proto:Argv shortname style; pr "\n\n"; |