add isl_point_get_dim

Signed-off-by: Sven Verdoolaege <skimo@kotnet.org>

diff --git a/doc/user.pod b/doc/user.pod
index 7018d10..3f0ac7f 100644 (file)
--- a/doc/user.pod
+++ b/doc/user.pod
@@ -486,6 +486,10 @@ specification of the original object.
        __isl_give isl_dim *isl_aff_get_dim(
                __isl_keep isl_aff *aff);
 
+       #include <isl/point.h>
+       __isl_give isl_dim *isl_point_get_dim(
+               __isl_keep isl_point *pnt);
+
 The names of the individual dimensions may be set or read off
 using the following functions.
 

diff --git a/include/isl/point.h b/include/isl/point.h
index dc8b88d..a5a7f93 100644 (file)
--- a/include/isl/point.h
+++ b/include/isl/point.h
@@ -12,6 +12,7 @@ struct isl_point;
 typedef struct isl_point isl_point;
 
 isl_ctx *isl_point_get_ctx(__isl_keep isl_point *pnt);
+__isl_give isl_dim *isl_point_get_dim(__isl_keep isl_point *pnt);
 
 __isl_give isl_point *isl_point_zero(__isl_take isl_dim *dim);
 __isl_give isl_point *isl_point_copy(__isl_keep isl_point *pnt);

diff --git a/isl_point.c b/isl_point.c
index f658ccb..e840162 100644 (file)
--- a/isl_point.c
+++ b/isl_point.c
@@ -11,6 +11,11 @@ isl_ctx *isl_point_get_ctx(__isl_keep isl_point *pnt)
        return pnt ? isl_dim_get_ctx(pnt->dim) : NULL;
 }
 
+__isl_give isl_dim *isl_point_get_dim(__isl_keep isl_point *pnt)
+{
+       return pnt ? isl_dim_copy(pnt->dim) : NULL;
+}
+
 __isl_give isl_point *isl_point_alloc(__isl_take isl_dim *dim,
        __isl_take isl_vec *vec)
 {