From 7082f1e62e03b4601ba2184f8f384295dc4effe5 Mon Sep 17 00:00:00 2001
From: Sven Verdoolaege <skimo@kotnet.org>
Date: Tue, 9 Jul 2013 11:48:36 +0200
Subject: [PATCH] add isl_multi_*_get_tuple_id

Signed-off-by: Sven Verdoolaege <skimo@kotnet.org>
---
 doc/user.pod        | 9 +++++++++
 include/isl/multi.h | 3 +++
 isl_multi_templ.c   | 8 ++++++++
 3 files changed, 20 insertions(+)

diff --git a/doc/user.pod b/doc/user.pod
index 3fdee4f6..74ae1248 100644
--- a/doc/user.pod
+++ b/doc/user.pod
@@ -3306,6 +3306,9 @@ They can be inspected using
 		enum isl_dim_type type);
 	int isl_multi_val_has_tuple_id(__isl_keep isl_multi_val *mv,
 		enum isl_dim_type type);
+	__isl_give isl_id *isl_multi_val_get_tuple_id(
+		__isl_keep isl_multi_val *mv,
+		enum isl_dim_type type);
 
 They can be modified using
 
@@ -4060,9 +4063,15 @@ The expression can be inspected using
 	int isl_multi_pw_aff_has_tuple_id(
 		__isl_keep isl_multi_pw_aff *mpa,
 		enum isl_dim_type type);
+	__isl_give isl_id *isl_multi_aff_get_tuple_id(
+		__isl_keep isl_multi_aff *ma,
+		enum isl_dim_type type);
 	__isl_give isl_id *isl_pw_multi_aff_get_tuple_id(
 		__isl_keep isl_pw_multi_aff *pma,
 		enum isl_dim_type type);
+	__isl_give isl_id *isl_multi_pw_aff_get_tuple_id(
+		__isl_keep isl_multi_pw_aff *mpa,
+		enum isl_dim_type type);
 
 	int isl_pw_multi_aff_foreach_piece(
 		__isl_keep isl_pw_multi_aff *pma,
diff --git a/include/isl/multi.h b/include/isl/multi.h
index f04af035..698b22d1 100644
--- a/include/isl/multi.h
+++ b/include/isl/multi.h
@@ -3,6 +3,7 @@
 
 #include <isl/space.h>
 #include <isl/list.h>
+#include <isl/set_type.h>
 
 #if defined(__cplusplus)
 extern "C" {
@@ -31,6 +32,8 @@ const char *isl_multi_##BASE##_get_tuple_name(				\
 	__isl_keep isl_multi_##BASE *multi, enum isl_dim_type type);	\
 int isl_multi_##BASE##_has_tuple_id(__isl_keep isl_multi_##BASE *multi,	\
 	enum isl_dim_type type);					\
+__isl_give isl_id *isl_multi_##BASE##_get_tuple_id(			\
+	__isl_keep isl_multi_##BASE *multi, enum isl_dim_type type);	\
 __isl_give isl_multi_##BASE *isl_multi_##BASE##_set_tuple_name(		\
 	__isl_take isl_multi_##BASE *multi,				\
 	enum isl_dim_type type, const char *s);				\
diff --git a/isl_multi_templ.c b/isl_multi_templ.c
index 9e6bc7da..476aad4e 100644
--- a/isl_multi_templ.c
+++ b/isl_multi_templ.c
@@ -210,6 +210,14 @@ int FN(MULTI(BASE),has_tuple_id)(__isl_keep MULTI(BASE) *multi,
 	return multi ? isl_space_has_tuple_id(multi->space, type) : -1;
 }
 
+/* Return the id of the specified tuple.
+ */
+__isl_give isl_id *FN(MULTI(BASE),get_tuple_id)(__isl_keep MULTI(BASE) *multi,
+	enum isl_dim_type type)
+{
+	return multi ? isl_space_get_tuple_id(multi->space, type) : NULL;
+}
+
 __isl_give EL *FN(FN(MULTI(BASE),get),BASE)(__isl_keep MULTI(BASE) *multi,
 	int pos)
 {
-- 
2.11.4.GIT