479           const char *pat;  in oktotouch()  local
482           pat = suffixlist;  in oktotouch()
483           if (pat == 0)  in oktotouch()
485           if (*pat == '*')  in oktotouch()
487           while (*pat++ != '.')  in oktotouch()
489           --pat;              /* point to the period */  in oktotouch()
497           for (src++, pat++, osrc = src;  in oktotouch()
498               *src != '\0' && *pat != '\0'; src = osrc, pat++) {  in oktotouch()
500                           && *pat != '\0'                   /* not off end of pattern */  in oktotouch()
501                           && *pat != '.'                    /* not off end of sub pattern */  in oktotouch()
502                           && *pat != '*'                    /* not wild card */  in oktotouch()
503                           && *src == *pat;                  /* and equal... */  in oktotouch()
504                           src++, pat++)  in oktotouch()
507                         && (*pat == '\0' || *pat == '.' || *pat == '*'))  in oktotouch()
509                     if (*src != '\0' && *pat == '*')  in oktotouch()
511                     while (*pat != '\0' && *pat != '.')  in oktotouch()
512                               pat++;  in oktotouch()
513                     if (*pat == '\0')  in oktotouch()