#include <os2.h>
#include <stdlib.h>
#include <string.h>

#pragma alloc_text(MISC8,skip_delim,to_delim)

char *skip_delim(char *a, register char *delim)
{

  register char *p = a;

  if (p && delim) {
    while (*p) {
      if (strchr(delim, *p))
	p++;
      else
	break;
    }
  }
  return p;
}

char *to_delim(char *a, register char *delim)
{

  register char *p = a;

  if (p && delim) {
    while (*p) {
      if (strchr(delim, *p))
	break;
      p++;
    }
  }
  return p;
}