Bug fix Cgen
This commit is contained in:
parent
2ae809c971
commit
7d3b6a4679
1 changed files with 1 additions and 0 deletions
|
@ -737,6 +737,7 @@ let cfile_list_of_oprog_ty_decls name oprog =
|
|||
|
||||
let global_file_header name prog =
|
||||
let dependencies = S.elements (Obc_utils.Deps.deps_program prog) in
|
||||
let dependencies = List.map String.uncapitalize dependencies in
|
||||
|
||||
let (decls, defs) =
|
||||
List.split (List.map cdefs_and_cdecls_of_class_def prog.p_defs) in
|
||||
|
|
Loading…
Reference in a new issue