git.annexia.org
/
wrappi.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Add structs.
[wrappi.git]
/
generator-lib
/
wrappi_accumulator.ml
diff --git
a/generator-lib/wrappi_accumulator.ml
b/generator-lib/wrappi_accumulator.ml
index
3713d35
..
237bb0b
100644
(file)
--- a/
generator-lib/wrappi_accumulator.ml
+++ b/
generator-lib/wrappi_accumulator.ml
@@
-117,7
+117,11
@@
let get_api () =
fun sd ->
let fields = sd.sd_fields in
let fields =
fun sd ->
let fields = sd.sd_fields in
let fields =
- Array.map (resolve_typedefs "enum" sd.sd_name sd.sd_loc) fields in
+ Array.map (
+ fun (name, t) ->
+ let t = resolve_typedefs "enum" sd.sd_name sd.sd_loc t in
+ (name, t)
+ ) fields in
{ sd with sd_fields = fields }
) sds in
{ sd with sd_fields = fields }
) sds in
@@
-125,7
+129,11
@@
let get_api () =
fun un ->
let fields = un.un_fields in
let fields =
fun un ->
let fields = un.un_fields in
let fields =
- Array.map (resolve_typedefs "union" un.un_name un.un_loc) fields in
+ Array.map (
+ fun (name, t) ->
+ let t = resolve_typedefs "union" un.un_name un.un_loc t in
+ (name, t)
+ ) fields in
{ un with un_fields = fields }
) uns in
{ un with un_fields = fields }
) uns in