New function: allocate-struct.

* struct.c (struct_init): allocate-struct intrinsic
registered.
(allocate_struct): New static function.

* txr.1: Documented.

1 files changed, 24 insertions, 0 deletions

diff --git a/txr.1 b/txr.1
index 031837c2..d42ff4ea 100644
--- a/txr.1
+++ b/txr.1
@@ -25126,6 +25126,30 @@ The following equivalences hold:
   <-->  (make-struct a nil v0 v1 v2 ...)
 .brev
 
+.coNP Function @ allocate-struct
+.synb
+.mets (allocate-struct << type )
+.syne
+.desc
+The
+.code allocate-struct
+provides a low-level allocator for structure objects.
+
+The
+.meta type
+argument must either be a
+.code struct-type
+object, or else a symbol which is the name of a structure.
+
+The
+.code allocate-struct
+creates and returns a new instance of
+.meta type
+all of whose instance slots take on the value
+.codn nil .
+No initializations are performed. The struct type's
+registered initialization functions are not invoked.
+
 .coNP Function @ copy-struct
 .synb
 .mets (copy-struct << struct-obj )