isl_union_neg.c

   1 /*
   2  * Copyright 2010      INRIA Saclay
   3  *
   4  * Use of this software is governed by the MIT license
   5  *
   6  * Written by Sven Verdoolaege, INRIA Saclay - Ile-de-France,
   7  * Parc Club Orsay Universite, ZAC des vignes, 4 rue Jacques Monod,
   8  * 91893 Orsay, France
   9  */
  10
  11 #include <isl_union_macro.h>
  12
  13 /* Replace *entry by its opposite.
  14  *
  15  * Return isl_stat_ok on success and isl_stat_error on error.
  16  */
  17 static isl_stat FN(UNION,neg_entry)(void **entry, void *user)
  18 {
  19         PW **pw = (PW **) entry;
  20
  21         *pw = FN(PW,neg)(*pw);
  22
  23         return *pw ? isl_stat_ok : isl_stat_error;
  24 }
  25
  26 /* Return the opposite of "u".
  27  */
  28 __isl_give UNION *FN(UNION,neg)(__isl_take UNION *u)
  29 {
  30         u = FN(UNION,cow)(u);
  31         if (!u)
  32                 return NULL;
  33
  34         if (isl_hash_table_foreach(u->space->ctx, &u->table,
  35                                    &FN(UNION,neg_entry), NULL) < 0)
  36                 return FN(UNION,free)(u);
  37
  38         return u;
  39 }