1  static const char default_tupleseps[] = ", \t";
       2  
       3  
       4  fubar (tupleseps)
       5       const char *tupleseps;
       6  {
       7    char *kp, *sp;
       8    const char *septmp;
       9    const char *tseplist;
      10    tseplist = (tupleseps) ? tupleseps : default_tupleseps;
      11    while (kp)
      12      {
      13        if (*tseplist)
      14          septmp = tseplist;
      15        bar (*septmp);
      16        if (*tseplist)
      17          if (*kp)
      18            ;
      19      }
      20  }