From 2d2a7f33f66f84a1dac043ec456191bc8cfc34db Mon Sep 17 00:00:00 2001
From: Sebastian Pop <seb@napoca.(none)>
Date: Mon, 9 Jun 2008 10:33:23 -0500
Subject: [PATCH] don't use ->Constraint

---
 include/cloog/domain.h  | 6 ++++--
 source/polylib/domain.c | 2 +-
 2 files changed, 5 insertions(+), 3 deletions(-)

diff --git a/include/cloog/domain.h b/include/cloog/domain.h
index afb5bbd..1b9c79d 100644
--- a/include/cloog/domain.h
+++ b/include/cloog/domain.h
@@ -158,8 +158,10 @@ static inline void cloog_polyhedron_cval_oppose (Polyhedron *p, int i, int j, in
   value_oppose (p->Constraint[i][j], k);
 }
 
-
-
+static inline void cloog_polyhedron_c_gcd (Polyhedron *p, int i, int j, int k, Value *gcd)
+{
+  Vector_Gcd(&(p->Constraint[i][1]), k, gcd);
+}
 /******************************************************************************
  *                              PolyLib interface                             *
  ******************************************************************************/
diff --git a/source/polylib/domain.c b/source/polylib/domain.c
index 680a559..b68298b 100644
--- a/source/polylib/domain.c
+++ b/source/polylib/domain.c
@@ -933,7 +933,7 @@ int cloog_domain_never_integral(CloogDomain * domain)
        * unknown vector (including iterators and parameters) or not. If not,
        * there is no integer point in the polyhedron and we return 1.
        */
-      Vector_Gcd(&(polyhedron->Constraint[i][1]),dimension-2,&gcd) ;
+      cloog_polyhedron_c_gcd (polyhedron, i, 1, dimension-2, &gcd) ;
       value_modulus(modulo,cloog_polyhedron_cval (polyhedron, i, dimension - 1), gcd) ;
       
       if (value_notzero_p(modulo))
-- 
2.11.4.GIT