add isl_aff_mod_val

[platform/upstream/isl.git] / basis_reduction_templ.c

diff --git a/basis_reduction_templ.c b/basis_reduction_templ.c
index 375549d..7f4b28f 100644 (file)
--- a/basis_reduction_templ.c
+++ b/basis_reduction_templ.c
@@ -2,7 +2,7 @@
  * Copyright 2006-2007 Universiteit Leiden
  * Copyright 2008-2009 Katholieke Universiteit Leuven
  *
- * Use of this software is governed by the GNU LGPLv2.1 license
+ * Use of this software is governed by the MIT license
  *
  * Written by Sven Verdoolaege, Leiden Institute of Advanced Computer Science,
  * Universiteit Leiden, Niels Bohrweg 1, 2333 CA Leiden, The Netherlands
@@ -11,6 +11,9 @@
  */
 
 #include <stdlib.h>
+#include <isl_ctx_private.h>
+#include <isl_map_private.h>
+#include <isl_options_private.h>
 #include "isl_basis_reduction.h"
 
 static void save_alpha(GBR_LP *lp, int first, int n, GBR_type *alpha)
@@ -22,7 +25,7 @@ static void save_alpha(GBR_LP *lp, int first, int n, GBR_type *alpha)
 }
 
 /* Compute a reduced basis for the set represented by the tableau "tab".
- * tab->basis, must be initialized by the calling function to an affine
+ * tab->basis, which must be initialized by the calling function to an affine
  * unimodular basis, is updated to reflect the reduced basis.
  * The first tab->n_zero rows of the basis (ignoring the constant row)
  * are assumed to correspond to equalities and are left untouched.
@@ -326,7 +329,7 @@ struct isl_mat *isl_basic_set_reduced_basis(struct isl_basic_set *bset)
                isl_die(bset->ctx, isl_error_invalid,
                        "no parameters allowed", return NULL);
 
-       tab = isl_tab_from_basic_set(bset);
+       tab = isl_tab_from_basic_set(bset, 0);
        if (!tab)
                return NULL;
 
@@ -335,7 +338,7 @@ struct isl_mat *isl_basic_set_reduced_basis(struct isl_basic_set *bset)
        else {
                isl_mat *eq;
                unsigned nvar = isl_basic_set_total_dim(bset);
-               eq = isl_mat_sub_alloc(bset->ctx, bset->eq, 0, bset->n_eq,
+               eq = isl_mat_sub_alloc6(bset->ctx, bset->eq, 0, bset->n_eq,
                                        1, nvar);
                eq = isl_mat_left_hermite(eq, 0, NULL, &tab->basis);
                tab->basis = isl_mat_lin_to_aff(tab->basis);