File:  [Research Unix] / researchv10no / cmd / weather / getargs.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 17:21:35 2018 UTC (8 years, 1 month ago) by root
Branches: belllabs, MAIN
CVS tags: researchv10, HEAD
researchv10 Norman

# include "ctype.h"
getargs(s, arps)
	char *s, *arps[];
{
	int i, c;
i = 0;
while (isspace(*s))
	s++;
while (1)
	{
	arps[i++]=s;
	while ( isalnum(c= *s) ||
		(c==',' && !isspace(s[1])) ||
		c=='-' || c=='=' || c=='%')
			s++;
	if (*s==0) break;
	*s++ =0;
	while ((c= *s) && !isalnum(c) && c != '.' && c !='%' && c != '=' && c != '-') s++;
	if (*s==0)break;
	}
return(i);
}

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.