| 1 | /* |
|---|
| 2 | * Copyright 2010 INRIA Saclay |
|---|
| 3 | * |
|---|
| 4 | * Use of this software is governed by the MIT license |
|---|
| 5 | * |
|---|
| 6 | * Written by Sven Verdoolaege, |
|---|
| 7 | * INRIA Saclay - Ile-de-France, Parc Club Orsay Universite, |
|---|
| 8 | * ZAC des vignes, 4 rue Jacques Monod, 91893 Orsay, France |
|---|
| 9 | */ |
|---|
| 10 | |
|---|
| 11 | #define xFN(TYPE,NAME) TYPE ## _ ## NAME |
|---|
| 12 | #define FN(TYPE,NAME) xFN(TYPE,NAME) |
|---|
| 13 | |
|---|
| 14 | #ifndef PEEK_SPACE |
|---|
| 15 | #define PEEK_SPACE peek_space |
|---|
| 16 | #endif |
|---|
| 17 | |
|---|
| 18 | /* Do "obj1" and "obj2" have the same space? |
|---|
| 19 | */ |
|---|
| 20 | isl_bool FN(TYPE_PAIR,has_equal_space)(__isl_keep TYPE1 *obj1, |
|---|
| 21 | __isl_keep TYPE2 *obj2) |
|---|
| 22 | { |
|---|
| 23 | isl_space *space1, *space2; |
|---|
| 24 | |
|---|
| 25 | space1 = FN(TYPE1,PEEK_SPACE)(multi: obj1); |
|---|
| 26 | space2 = FN(TYPE2,PEEK_SPACE)(multi: obj2); |
|---|
| 27 | return isl_space_is_equal(space1, space2); |
|---|
| 28 | } |
|---|
| 29 | |
|---|
