X-Git-Url: https://oss.titaniummirror.com/gitweb/?p=nesc.git;a=blobdiff_plain;f=src%2FAST_utils.c;fp=src%2FAST_utils.c;h=d26212ff65a95ca5ea64b9c69d64fadb01a74946;hp=320c3fb3216c3f438de2d98e30975ac368f112a5;hb=afe799e7802f38d1f55e1bd2044451ba164743b1;hpb=38be457fa32d3ab0721ec1fc9e5086b745e17468

diff --git a/src/AST_utils.c b/src/AST_utils.c
index 320c3fb..d26212f 100644
--- a/src/AST_utils.c
+++ b/src/AST_utils.c
@@ -371,3 +371,15 @@ bool is_attr_name(const char *arg, const char *name)
   l = strlen(name);
   return !strncmp(arg + 2, name, l) && !strcmp(arg + 2 + l, "__");
 }
+
+type_element interesting_element(type_element elems)
+{
+  type_element elem;
+
+  scan_type_element (elem, elems)
+    if (is_tag_ref(elem))
+      return elem;
+
+  return NULL;
+}
+