4.3BSD/usr/contrib/spms/src/lib/libpdb/src/pbgetkey.c

Compare this file to the similar file:
Show the results in this format: 

/* $Header$ */

/*
 * Author: Peter J. Nicklin
 */

/*
 * pbgetkey() loads the next key field into key. Returns key or null
 * character if no more key fields.
 */

extern char *KP;			/* next key field */

char *
pbgetkey(key)
	char *key;			/* key string */
{
	char *pbcpykey();		/* copy key */
	char *pbskipkey();		/* skip to next key */

	key = pbcpykey(key, KP);
	KP = pbskipkey(KP);
	return(key);
}