mirror of
https://review.haiku-os.org/buildtools
synced 2024-11-23 07:18:49 +01:00
38 lines
1.0 KiB
C
38 lines
1.0 KiB
C
/*
|
|
* Copyright 2012,2014 Ecole Normale Superieure
|
|
*
|
|
* Use of this software is governed by the MIT license
|
|
*
|
|
* Written by Sven Verdoolaege,
|
|
* Ecole Normale Superieure, 45 rue d'Ulm, 75230 Paris, France
|
|
*/
|
|
|
|
#include <isl/space.h>
|
|
|
|
#include <isl_multi_macro.h>
|
|
|
|
/* Create a multiple expression with a single output/set dimension
|
|
* equal to "el".
|
|
* For most multiple expression types, the base type has a single
|
|
* output/set dimension and the space of the result is therefore
|
|
* the same as the space of the input.
|
|
* In the case of isl_multi_union_pw_aff, however, the base type
|
|
* lives in a parameter space and we therefore need to add
|
|
* a single set dimension.
|
|
*/
|
|
__isl_give MULTI(BASE) *FN(FN(MULTI(BASE),from),BASE)(__isl_take EL *el)
|
|
{
|
|
isl_space *space;
|
|
MULTI(BASE) *multi;
|
|
|
|
space = FN(EL,get_space(el));
|
|
if (isl_space_is_params(space)) {
|
|
space = isl_space_set_from_params(space);
|
|
space = isl_space_add_dims(space, isl_dim_set, 1);
|
|
}
|
|
multi = FN(MULTI(BASE),alloc)(space);
|
|
multi = FN(FN(MULTI(BASE),set),BASE)(multi, 0, el);
|
|
|
|
return multi;
|
|
}
|