Removed another trampoline.

This commit is contained in:
Cas Cremers 2018-10-19 15:18:17 -04:00
parent ad06600bd8
commit 26bf502428

View File

@ -258,23 +258,30 @@ unsigned int
hidelevelFlag (const System sys, const Term goalterm)
{
unsigned int flag;
Hiddenterm ht;
int getflag (unsigned int l, unsigned int lmin, unsigned int lprot,
unsigned int lknow)
flag = HLFLAG_BOTH;
for (ht = sys->hidden; ht != NULL; ht = ht->next)
{
// Determine new flag
flag = flag | hidelevelParamFlag (l, lmin, lprot, lknow);
unsigned int l;
// Test the goalterm for occurrences of this
l = termHidelevel (ht->term, goalterm);
if (l < INT_MAX)
{
flag =
flag | hidelevelParamFlag (l, ht->hideminimum, ht->hideprotocol,
ht->hideknowledge);
// Should we proceed?
if (flag == HLFLAG_NONE)
{
// abort iteration: it cannot get worse
return false;
}
return true;
}
flag = HLFLAG_BOTH;
iterate_interesting (sys, goalterm, getflag);
return flag;
}
}
}
return flag;
}