From 3cad8dfa357c5733c94e2a301da9184f3eb50e78 Mon Sep 17 00:00:00 2001
From: Kaz Kylheku <kaz@kylheku.com>
Date: Sat, 14 Nov 2015 20:54:00 -0800
Subject: New uslot function and usl macro.

* struct.c (struct_init): Register uslot intrinsic function.
(uslot_fun): New static function.
(uslot): New function.

* struct.h (uslot): Declared.

* share/txr/stdlib/struct.tl (usl): New macro.

* lisplib.c (struct_set_entries): Add usl macro.

* txr.1: Documented uslot and usl.
---
 struct.h | 1 +
 1 file changed, 1 insertion(+)

(limited to 'struct.h')

diff --git a/struct.h b/struct.h
index 88f5a1c6..d5545bf4 100644
--- a/struct.h
+++ b/struct.h
@@ -47,5 +47,6 @@ val structp(val obj);
 val struct_type(val strct);
 val method(val strct, val slotsym);
 val super_method(val strct, val slotsym);
+val uslot(val slot);
 val umethod(val slot);
 void struct_init(void);
-- 
cgit v1.2.3