int
saf_is_self_stored_topo_relation(SAF_ParMode pmode, /* The parallel mode. */
SAF_Rel *rel, /* The handle of the topological relation which is to be examined. */
hbool_t *Presult /* [OUT] A pointer to caller supplied memory which is to receive the
* result of the test: true if the relation is self stored or false if
* it is stored on a decomposition. Note that it is permitted for the
* caller to pass a value of NULL for this parameter. */
)
{
SAF_ENTER(saf_is_self_stored_topo_relation, SAF_PRECONDITION_ERROR);
SAF_REQUIRE(_saf_valid_pmode(pmode), SAF_LOW_CHK_COST, SAF_PRECONDITION_ERROR,
_saf_errmsg("PMODE must be valid"));
if (!_saf_is_participating_proc(pmode)) SAF_RETURN(-1);
if (Presult)
*Presult = _saf_is_self_decomp(SS_REL_P(rel,sub_decomp_cat));
SAF_LEAVE(SAF_SUCCESS);
}