From 9c8a8fd762d9c199da1fe0cf9f9f8df24e8314dc Mon Sep 17 00:00:00 2001 From: Kaz Kylheku Date: Wed, 15 May 2019 06:28:38 -0700 Subject: oop: new function: struct-type-name. * struct.c (struct_init): Register struct-type-name intrinsic. (struct_type_name): New function. * struct.h (struct_type_name): Declared. * txr.1: Documented. --- struct.h | 1 + 1 file changed, 1 insertion(+) (limited to 'struct.h') diff --git a/struct.h b/struct.h index 481ca679..09bf6767 100644 --- a/struct.h +++ b/struct.h @@ -65,6 +65,7 @@ val static_slot_p(val type, val sym); val slots(val stype); val structp(val obj); val struct_type(val strct); +val struct_type_name(val stype); val method(val strct, val slotsym); val method_args(val strct, val slotsym, struct args *); val super_method(val strct, val slotsym); -- cgit v1.2.3