New umeth and umethod macro and function.

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

* struct.c (struct_init): Registered umethod intrinsic.
(umethod_fun): New static function.
(umethod): New function.

* txr.1: Documented.

1 files changed, 1 insertions, 0 deletions

diff --git a/struct.h b/struct.h
index 7e4009c3..612c47db 100644
--- a/struct.h
+++ b/struct.h
@@ -43,4 +43,5 @@ val structp(val obj);
 val struct_type(val strct);
 val method(val strct, val slotsym);
 val super_method(val strct, val slotsym);
+val umethod(val slot);
 void struct_init(void);