add isl_seq_addmul

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

diff --git a/include/isl/seq.h b/include/isl/seq.h
index 0035eb8..eda8818 100644 (file)
--- a/include/isl/seq.h
+++ b/include/isl/seq.h
@@ -24,6 +24,7 @@ void isl_seq_clr(isl_int *p, unsigned len);
 void isl_seq_set(isl_int *p, isl_int v, unsigned len);
 void isl_seq_neg(isl_int *dat, isl_int *src, unsigned len);
 void isl_seq_cpy(isl_int *dst, isl_int *src, unsigned len);
+void isl_seq_addmul(isl_int *dst, isl_int f, isl_int *src, unsigned len);
 void isl_seq_submul(isl_int *dst, isl_int f, isl_int *src, unsigned len);
 void isl_seq_swp_or_cpy(isl_int *dst, isl_int *src, unsigned len);
 void isl_seq_scale(isl_int *dst, isl_int *src, isl_int f, unsigned len);

diff --git a/isl_seq.c b/isl_seq.c
index 757e729..dd80c19 100644 (file)
--- a/isl_seq.c
+++ b/isl_seq.c
@@ -45,6 +45,13 @@ void isl_seq_submul(isl_int *dst, isl_int f, isl_int *src, unsigned len)
                isl_int_submul(dst[i], f, src[i]);
 }
 
+void isl_seq_addmul(isl_int *dst, isl_int f, isl_int *src, unsigned len)
+{
+       int i;
+       for (i = 0; i < len; ++i)
+               isl_int_addmul(dst[i], f, src[i]);
+}
+
 void isl_seq_swp_or_cpy(isl_int *dst, isl_int *src, unsigned len)
 {
        int i;