Mercurial > hg > CbC > CbC_llvm
annotate examples/OCaml-Kaleidoscope/Chapter7/bindings.c @ 148:63bd29f05246
merged
| author | Shinji KONO <kono@ie.u-ryukyu.ac.jp> |
|---|---|
| date | Wed, 14 Aug 2019 19:46:37 +0900 |
| parents | 95c75e76d11b |
| children |
| rev | line source |
|---|---|
| 0 | 1 #include <stdio.h> |
| 2 | |
| 3 /* putchard - putchar that takes a double and returns 0. */ | |
| 4 extern double putchard(double X) { | |
| 5 putchar((char)X); | |
| 6 return 0; | |
| 7 } | |
| 8 | |
| 9 /* printd - printf that takes a double prints it as "%f\n", returning 0. */ | |
| 10 extern double printd(double X) { | |
| 11 printf("%f\n", X); | |
| 12 return 0; | |
| 13 } |