isl_mat_lin_to_aff: fix error handling
[platform/upstream/isl.git] / isl_list.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_list.h"
11 #include "isl_set.h"
12
13 struct isl_basic_set_list *isl_basic_set_list_alloc(struct isl_ctx *ctx, int n)
14 {
15         struct isl_basic_set_list *list;
16
17         isl_assert(ctx, n >= 0, return NULL);
18         list = isl_alloc(ctx, struct isl_basic_set_list,
19                          sizeof(struct isl_basic_set_list) +
20                          (n - 1) * sizeof(struct isl_basic_set *));
21         if (!list)
22                 return NULL;
23
24         list->ctx = ctx;
25         isl_ctx_ref(ctx);
26         list->ref = 1;
27         list->size = n;
28         list->n = 0;
29         return list;
30 }
31
32 struct isl_basic_set_list *isl_basic_set_list_add(
33         struct isl_basic_set_list *list,
34         struct isl_basic_set *bset)
35 {
36         if (!list || !bset)
37                 goto error;
38         isl_assert(list->ctx, list->n < list->size, goto error);
39         list->p[list->n] = bset;
40         list->n++;
41         return list;
42 error:
43         isl_basic_set_free(bset);
44         isl_basic_set_list_free(list);
45         return NULL;
46 }
47
48 void isl_basic_set_list_free(struct isl_basic_set_list *list)
49 {
50         int i;
51
52         if (!list)
53                 return;
54
55         if (--list->ref > 0)
56                 return;
57
58         isl_ctx_deref(list->ctx);
59         for (i = 0; i < list->n; ++i)
60                 isl_basic_set_free(list->p[i]);
61         free(list);
62 }