ack/lang/cem/libcc.ansi/core/string/strtok.c

/*
 * (c) copyright 1987 by the Vrije Universiteit, Amsterdam, The Netherlands.
 * See the copyright notice in the ACK home directory, in the file "Copyright".
 */
/* $Id$ */

#include <string.h>

char* strtok(register char* string, const char* separators)
{
	register char *s1, *s2;
	static char* savestring;

	if (string == NULL)
	{
		string = savestring;
		if (string == NULL)
			return (char*)NULL;
	}

	s1 = string + strspn(string, separators);
	if (*s1 == '\0')
	{
		savestring = NULL;
		return (char*)NULL;
	}

	s2 = strpbrk(s1, separators);
	if (s2 != NULL)
		*s2++ = '\0';
	savestring = s2;
	return s1;
}