lop.c   [plain text]

lop (a)
{
  do
    a--;
  while (a >= -1);
}