X-Git-Url: http://git.annexia.org/?p=libguestfs.git;a=blobdiff_plain;f=generator%2Fgenerator_checks.ml;h=98649e26712a497e91c8a5534bc4be4e0cb8bd1f;hp=f30a28684c28e51b4ada64813d0bd551bd15f66a;hb=7e4bf29fdf3067f3e83cd818a79ee522ae28e7ef;hpb=04d8209077d2227eb1d42695ba71147f78987050 diff --git a/generator/generator_checks.ml b/generator/generator_checks.ml index f30a286..98649e2 100644 --- a/generator/generator_checks.ml +++ b/generator/generator_checks.ml @@ -49,7 +49,7 @@ let () = if String.contains name '-' then failwithf "function name %s should not contain '-', use '_' instead." name - ) all_functions; + ) (all_functions @ fish_commands); (* Check function parameter/return names. *) List.iter ( @@ -120,14 +120,14 @@ let () = let c = shortdesc.[String.length shortdesc-1] in if c = '\n' || c = '.' then failwithf "short description of %s should not end with . or \\n." name - ) all_functions; + ) (all_functions @ fish_commands); (* Check long descriptions. *) List.iter ( fun (name, _, _, _, _, _, longdesc) -> if longdesc.[String.length longdesc-1] = '\n' then failwithf "long description of %s should not end with \\n." name - ) all_functions; + ) (all_functions @ fish_commands); (* Check proc_nrs. *) List.iter (