cptr-int and cptr-obj can make typed cptr objects.

* eval.c (eval_init): Update registration of cptr-int and
cptr-obj with one optional argument.

* lib.c (cptr_int): New type symbol argument, defaulting
to nil. Also, don't bother defaulting the integer argument;
the function isn't registered for that being optional.
(cptr_obj): New type symbol argument, defaulting to nil.

* lib.h (cptr_int, cptr_obj): Declarations updated.

* txr.1: Documented cptr-int and cptr-obj function changes.
Added discussion of type tag to introductory paragraph.
Also added neglected documentation of the FFI cptr type,
both unparametrized and parametrized.

1 files changed, 2 insertions, 2 deletions

diff --git a/lib.h b/lib.h
index 24db79f1..ffe10c84 100644
--- a/lib.h
+++ b/lib.h
@@ -957,8 +957,8 @@ val cptr(mem_t *ptr);
 val cptr_typed(mem_t *handle, val type_sym, struct cobj_ops *ops);
 val cptrp(val obj);
 val cptr_type(val cptr);
-val cptr_int(val n);
-val cptr_obj(val obj);
+val cptr_int(val n, val type_sym);
+val cptr_obj(val obj, val type_sym);
 val cptr_zap(val cptr);
 val cptr_free(val cptr);
 mem_t *cptr_get(val cptr);