rem: do {
add: for (;;) {
context: static void fields_sort (void){   static const char prompt[] =      "Select sort field via field letter, type any other key to return";   char phoney[PFLAGSSIZ];   char c, *p;   int i, x;   strcpy(phoney, NUL_FIELDS);   x = i = Curwin->sortindx;   putp(Cap_clr_scr);   putp(Cap_curs_huge);   do {      p  = phoney + i;      *p = toupper(*p);      display_fields(phoney, SORT_xtra);      show_special(fmtmk(SORT_fields         , Cap_home, *p, Curwin->grpname, prompt));      chin(0, &c, 1);      i = toupper(c) - 'A';      if (i < 0 || i >= MAXTBL(Fieldstab)) break;      *p = tolower(*p);      x = i;   } while (1);   if ((p = strchr(Curwin->fieldscur, x + 'a')))      *p = x + 'A';   Curwin->sortindx = x;   putp(Cap_curs_norm);}