From 4995c17cc9f1334296ae9d146c1e74323973bebf Mon Sep 17 00:00:00 2001 From: Sven Verdoolaege Date: Tue, 28 Jun 2011 23:51:00 +0200 Subject: [PATCH] add isl_basic_set_set_tuple_name Signed-off-by: Sven Verdoolaege --- doc/user.pod | 4 +++- include/isl/set.h | 2 ++ isl_map.c | 6 ++++++ 3 files changed, 11 insertions(+), 1 deletion(-) diff --git a/doc/user.pod b/doc/user.pod index e75f48fa..0c3d38d9 100644 --- a/doc/user.pod +++ b/doc/user.pod @@ -1219,10 +1219,12 @@ and should be a permutation of C, C, C, C and C. The names of the domain and range spaces of a set or relation can be -read off using the following functions. +read off or set using the following functions. const char *isl_basic_set_get_tuple_name( __isl_keep isl_basic_set *bset); + __isl_give isl_basic_set *isl_basic_set_set_tuple_name( + __isl_take isl_basic_set *set, const char *s); const char *isl_set_get_tuple_name( __isl_keep isl_set *set); const char *isl_basic_map_get_tuple_name( diff --git a/include/isl/set.h b/include/isl/set.h index 2dc97d46..864e8471 100644 --- a/include/isl/set.h +++ b/include/isl/set.h @@ -45,6 +45,8 @@ __isl_give isl_local_space *isl_basic_set_get_local_space( const char *isl_basic_set_get_tuple_name(__isl_keep isl_basic_set *bset); const char *isl_set_get_tuple_name(__isl_keep isl_set *set); +__isl_give isl_basic_set *isl_basic_set_set_tuple_name( + __isl_take isl_basic_set *set, const char *s); __isl_give isl_set *isl_set_set_tuple_name(__isl_take isl_set *set, const char *s); const char *isl_basic_set_get_dim_name(__isl_keep isl_basic_set *bset, diff --git a/isl_map.c b/isl_map.c index fc2be4a1..afc284d2 100644 --- a/isl_map.c +++ b/isl_map.c @@ -349,6 +349,12 @@ error: return NULL; } +__isl_give isl_basic_set *isl_basic_set_set_tuple_name( + __isl_take isl_basic_set *bset, const char *s) +{ + return isl_basic_map_set_tuple_name(bset, isl_dim_set, s); +} + const char *isl_basic_map_get_tuple_name(__isl_keep isl_basic_map *bmap, enum isl_dim_type type) { -- 2.11.4.GIT