mirror of
https://review.haiku-os.org/buildtools
synced 2024-11-23 15:29:11 +01:00
23 lines
582 B
C
23 lines
582 B
C
#define xCAT(A,B) A ## B
|
|
#define CAT(A,B) xCAT(A,B)
|
|
#undef EL
|
|
#define EL CAT(isl_,BASE)
|
|
#undef PW_BASE
|
|
#define PW_BASE CAT(pw_,BASE)
|
|
#undef PW
|
|
#define PW CAT(isl_,PW_BASE)
|
|
#undef UNION_BASE
|
|
#define UNION_BASE CAT(union_,PW_BASE)
|
|
#undef UNION
|
|
#define UNION CAT(isl_,UNION_BASE)
|
|
#define xFN(TYPE,NAME) TYPE ## _ ## NAME
|
|
#define FN(TYPE,NAME) xFN(TYPE,NAME)
|
|
|
|
/* Create a union piecewise expression
|
|
* with the given base expression on a universe domain.
|
|
*/
|
|
__isl_give UNION *FN(FN(UNION,from),BASE)(__isl_take EL *el)
|
|
{
|
|
return FN(FN(UNION,from),PW_BASE)(FN(FN(PW,from),BASE)(el));
|
|
}
|