xref: /aosp_15_r20/external/llvm/examples/OCaml-Kaleidoscope/Chapter5/bindings.c (revision 9880d6810fe72a1726cb53787c6711e909410d58)
1 #include <stdio.h>
2 
3 /* putchard - putchar that takes a double and returns 0. */
putchard(double X)4 extern double putchard(double X) {
5   putchar((char)X);
6   return 0;
7 }
8