Fixing up enums

1 files changed, 3 insertions, 0 deletions

diff --git a/nextlang.h b/nextlang.h
index 010939e0..f59ae272 100644
--- a/nextlang.h
+++ b/nextlang.h
@@ -40,6 +40,9 @@ CORD as_cord(void *x, bool use_color, const char *fmt, ...);
                          default: "???")
 #define $heap(x) (__typeof(x)*)memcpy(GC_MALLOC(sizeof(x)), (__typeof(x)[1]){x}, sizeof(x))
 #define $stack(x) (__typeof(x)*)((__typeof(x)[1]){x})
+#define $tagged(obj_expr, type_name, tag_name) ({ __typeof(obj_expr) $obj = obj_expr; \
+                                                $obj.$tag == $tag$##type_name##$##tag_name ? &$obj.tag_name : NULL; })
+
 
 #define not(x) _Generic(x, bool: (bool)!(x), default: ~(x))
 #define and(x, y) _Generic(x, bool: (bool)((x) && (y)), default: ((x) & (y)))