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,18 +1110,24 @@ 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;
rd = sys->runs[run].start;
for (e = 0; e < sys->runs[run].step; e++)
{ {
if (evtype == ANYEVENT || rd->type == evtype) if (evtype == ANYEVENT || rd->type == evtype)
{ {
return callback (rd, e); if (!callback (rd, e))
{
return false;
}
}
rd = rd->next;
} }
return true; return true;
} }
return iterateEvents (sys, run, selectEvent);
}
// 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.
int int
iterateLocalToOther (const System sys, const int myrun, iterateLocalToOther (const System sys, const int myrun,