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