From f6d86efd904c373d29263bd7298332ea03ac2ff2 Mon Sep 17 00:00:00 2001
From: Sven Verdoolaege <skimo@kotnet.org>
Date: Fri, 24 Jun 2011 13:21:16 +0200
Subject: [PATCH] add isl_aff_set_dim_name

Signed-off-by: Sven Verdoolaege <skimo@kotnet.org>
---
 doc/user.pod      |  3 +++
 include/isl/aff.h |  3 +++
 isl_aff.c         | 13 +++++++++++++
 3 files changed, 19 insertions(+)

diff --git a/doc/user.pod b/doc/user.pod
index 8060791..2ffad9a 100644
--- a/doc/user.pod
+++ b/doc/user.pod
@@ -2210,6 +2210,9 @@ The expression can be inspected using
 It can be modified using
 
 	#include <isl/aff.h>
+	__isl_give isl_aff *isl_aff_set_dim_name(
+		__isl_take isl_aff *aff, enum isl_dim_type type,
+		unsigned pos, const char *s);
 	__isl_give isl_aff *isl_aff_set_constant(
 		__isl_take isl_aff *aff, isl_int v);
 	__isl_give isl_aff *isl_aff_set_constant_si(
diff --git a/include/isl/aff.h b/include/isl/aff.h
index 64d16d8..d7d1f86 100644
--- a/include/isl/aff.h
+++ b/include/isl/aff.h
@@ -42,6 +42,9 @@ __isl_give isl_aff *isl_aff_add_constant_si(__isl_take isl_aff *aff, int v);
 __isl_give isl_aff *isl_aff_add_coefficient_si(__isl_take isl_aff *aff,
 	enum isl_dim_type type, int pos, int v);
 
+__isl_give isl_aff *isl_aff_set_dim_name(__isl_take isl_aff *aff,
+	enum isl_dim_type type, unsigned pos, const char *s);
+
 int isl_aff_plain_is_equal(__isl_keep isl_aff *aff1, __isl_keep isl_aff *aff2);
 int isl_aff_plain_is_zero(__isl_keep isl_aff *aff);
 
diff --git a/isl_aff.c b/isl_aff.c
index d0fe73a..5cd56b9 100644
--- a/isl_aff.c
+++ b/isl_aff.c
@@ -626,3 +626,16 @@ __isl_give isl_aff *isl_aff_scale_down_ui(__isl_take isl_aff *aff, unsigned f)
 
 	return aff;
 }
+
+__isl_give isl_aff *isl_aff_set_dim_name(__isl_take isl_aff *aff,
+	enum isl_dim_type type, unsigned pos, const char *s)
+{
+	aff = isl_aff_cow(aff);
+	if (!aff)
+		return NULL;
+	aff->ls = isl_local_space_set_dim_name(aff->ls, type, pos, s);
+	if (!aff->ls)
+		return isl_aff_free(aff);
+
+	return aff;
+}
-- 
2.7.4