summaryrefslogtreecommitdiffstats
path: root/ffi.h
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2017-08-16 06:44:13 -0700
committerKaz Kylheku <kaz@kylheku.com>2017-08-16 06:44:13 -0700
commit45e2d317b52cf5eec1212c175a39a97222ee9e3b (patch)
treefa644cb1ee01c03c75c7eda7754301f1e3cb25c2 /ffi.h
parentf7833712f1ff318e19cb8c041f1dcef5e9488350 (diff)
downloadtxr-45e2d317b52cf5eec1212c175a39a97222ee9e3b.tar.gz
txr-45e2d317b52cf5eec1212c175a39a97222ee9e3b.tar.bz2
txr-45e2d317b52cf5eec1212c175a39a97222ee9e3b.zip
ffi: new FFI type I/O functions.
* ffi.c (put_obj, get_obj, fill_obj): New functions. (ffi_init): put-obj, get-obj, fill-obj intrinsics registered. * ffi.h (put_obj, get_obj, fill_obj): Declared. * txr.1: Documented.
Diffstat (limited to 'ffi.h')
-rw-r--r--ffi.h3
1 files changed, 3 insertions, 0 deletions
diff --git a/ffi.h b/ffi.h
index 93ac5639..3f59186b 100644
--- a/ffi.h
+++ b/ffi.h
@@ -134,4 +134,7 @@ val union_in(val uni, val memb, val memb_obj);
val union_out(val uni, val memb, val memb_obj);
val make_zstruct(val type, struct args *args);
val zero_fill(val type, val obj);
+val put_obj(val obj, val type, val stream);
+val get_obj(val type, val stream);
+val fill_obj(val obj, val type, val stream);
void ffi_init(void);