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

Bug correction in names of C functions for converting constructors to string.

Browse source
This commit is contained in:
Nicolas Berthier 2014-10-31 15:38:02 +01:00
parent 2d00f0a91c
commit d4fe017864
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
compiler/obc/c/cmain.ml
View file

@ -127,7 +127,7 @@ let main_def_of_class_def cd =
| Types.Tid id when id = Initial.pfloat -> None
| Types.Tid id when id = Initial.pint -> None
| Types.Tid id when id = Initial.pbool -> None
| Tid { name = n } -> Some n
| Tid tn -> Some (cname_of_qn tn)
in
let cprint_string s = Csexpr (Cfun_call ("printf", [Cconst (Cstrlit s)])) in