/**********************************************************************
 * colon-separated field module
 *
 * $Author: lwvanels $
 * $Source: /afs/athena.mit.edu/astaff/project/olhdev/src/libmenu/RCS/colons.c,v $
 * $Header: /afs/athena.mit.edu/astaff/project/olhdev/src/libmenu/RCS/colons.c,v 1.3 91/02/28 14:32:03 lwvanels Exp $
 *
 * Copyright (c) 1990, Massachusetts Institute of Technology
 **********************************************************************/

#ifndef lint
#ifndef SABER
static char rcsid_colons_c[] = "$Header: /afs/athena.mit.edu/astaff/project/olhdev/src/libmenu/RCS/colons.c,v 1.3 91/02/28 14:32:03 lwvanels Exp $";
#endif
#endif

int
break_colons(s, array)
     char s[];
     char *array[];
{
  char *p;
  int i;

  p = s;
  for(i=0; *p != '\0'; i++) {
    array[i] = p;
    while(*p != ':' && *p != '\0') p++;
    if (*p) *p++ = '\0';
  }
  return(i);
}