Sign in
ara-mdk
/
platform
/
external
/
llvm
/
fdf168fbc415a4d2e3cfec36f328979f11a3186f
/
.
/
examples
/
OCaml-Kaleidoscope
/
Chapter4
/
bindings.c
blob: 053513bf0c0cd09c7a66768bad0cb4e11f254bc2 [
file
] [
log
] [
blame
]
#include
<stdio.h>
/* putchard - putchar that takes a double and returns 0. */
extern
double
putchard
(
double
X
)
{
putchar
((
char
)
X
);
return
0
;
}