Down to 20.

This commit is contained in:
Cas Cremers 2018-10-19 16:06:08 -04:00
parent 38d57ed91d
commit 15c64c8a55

View File

@ -1110,16 +1110,22 @@ int
iterateEventsType (const System sys, const int run, const int evtype, iterateEventsType (const System sys, const int run, const int evtype,
int (*callback) (Roledef rd, int ev)) int (*callback) (Roledef rd, int ev))
{ {
int selectEvent (Roledef rd, int e) int e;
{ Roledef rd;
if (evtype == ANYEVENT || rd->type == evtype)
{
return callback (rd, e);
}
return true;
}
return iterateEvents (sys, run, selectEvent); rd = sys->runs[run].start;
for (e = 0; e < sys->runs[run].step; e++)
{
if (evtype == ANYEVENT || rd->type == evtype)
{
if (!callback (rd, e))
{
return false;
}
}
rd = rd->next;
}
return true;
} }
// Iterate over all 'others': local variables of a run that are instantiated and contain some term of another run. // Iterate over all 'others': local variables of a run that are instantiated and contain some term of another run.