isl_piplib.c

   1 /*
   2  * Copyright 2008-2009 Katholieke Universiteit Leuven
   3  *
   4  * Use of this software is governed by the GNU LGPLv2.1 license
   5  *
   6  * Written by Sven Verdoolaege, K.U.Leuven, Departement
   7  * Computerwetenschappen, Celestijnenlaan 200A, B-3001 Leuven, Belgium
   8  */
   9
  10 #include "isl_piplib.h"
  11
  12 void isl_seq_cpy_to_pip(Entier *dst, isl_int *src, unsigned len)
  13 {
  14         int i;
  15
  16         for (i = 0; i < len; ++i)
  17                 entier_assign(dst[i], src[i]);
  18 }
  19
  20 void isl_seq_cpy_from_pip(isl_int *dst, Entier *src, unsigned len)
  21 {
  22         int i;
  23
  24         for (i = 0; i < len; ++i)
  25                 entier_assign(dst[i], src[i]);
  26 }