diff options
author | Matthew Booth <mbooth@redhat.com> | 2012-01-09 10:16:34 +0000 |
---|---|---|
committer | Richard W.M. Jones <rjones@redhat.com> | 2012-01-10 15:40:00 +0000 |
commit | afc9f277733ae4f9b7599d50f4114b2d32725049 (patch) | |
tree | d26d4209bb8065f4eba7e0de855d5530b58cd590 /generator/generator_haskell.ml | |
parent | 8954afbf2931b3577d0508f7c7b6925220630ff0 (diff) | |
download | libguestfs-afc9f277733ae4f9b7599d50f4114b2d32725049.tar.gz libguestfs-afc9f277733ae4f9b7599d50f4114b2d32725049.tar.xz libguestfs-afc9f277733ae4f9b7599d50f4114b2d32725049.zip |
generator: Rename java_structs to camel_structs to better reflect their purpose
This map was originally included just for the java bindings, but is generally
useful to any binding which uses camel case by requirement or convention.
(cherry picked from commit e24af214fe8f9dccac39ed520b57ce7d458f9fd1)
Diffstat (limited to 'generator/generator_haskell.ml')
-rw-r--r-- | generator/generator_haskell.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generator/generator_haskell.ml b/generator/generator_haskell.ml index 29b260f2..a57cfd83 100644 --- a/generator/generator_haskell.ml +++ b/generator/generator_haskell.ml @@ -239,10 +239,10 @@ and generate_haskell_prototype ~handle ?(hs = false) (ret, args, optargs) = | RString _ -> pr "%s" string | RStringList _ -> pr "[%s]" string | RStruct (_, typ) -> - let name = java_name_of_struct typ in + let name = camel_name_of_struct typ in pr "%s" name | RStructList (_, typ) -> - let name = java_name_of_struct typ in + let name = camel_name_of_struct typ in pr "[%s]" name | RHashtable _ -> pr "Hashtable" | RBufferOut _ -> pr "%s" string |