jeltz
/
heptagon
1
0
Fork 0
Code Issues Pull Requests Releases Activity

Fixed code generation for constant arrays

This commit is contained in:
Cédric Pasteur 2011-09-14 09:08:28 +02:00
parent 3a9dc1c34d
commit 1c43a8b1ac
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
compiler/obc/c/c.ml
View File

@ -296,8 +296,8 @@ let pp_cdecl fmt cdecl = match cdecl with
fprintf fmt "@[<v>%a %a(@[<hov>%a@]);@ @]@\n"
pp_cty retty pp_string n pp_param_list args
| Cdecl_constant (n, cty, ce) ->
fprintf fmt "@[<v>static const %a %a = %a;@ @]@\n"
pp_cty cty pp_string n pp_cconst_expr ce
fprintf fmt "@[<v>static const %a = %a;@ @]@\n"
pp_vardecl (n, cty) pp_cconst_expr ce
let pp_cdef fmt cdef = match cdef with
| Cfundef cfd ->