In Pascal, you could do

    repeat
        ...
    until c = 0;

which might be even clearer for this use case.