Copied another iterator to remove a trampoline.

This commit is contained in:
Cas Cremers 2018-10-14 20:51:19 +02:00
parent 2ad030f919
commit ec8ea5f95c

View File

@ -630,17 +630,19 @@ int
countBindingsDone ()
{
int count;
List bl;
int countDone (Binding b)
count = 0;
for (bl = sys->bindings; bl != NULL; bl = bl->next)
{
Binding b;
b = (Binding) bl->data;
if ((!b->blocked) && b->done)
{
count++;
}
return true;
}
count = 0;
iterate_bindings (countDone);
return count;
}