Return to cpys2sc.c CVS log

Up to [Research Unix] / researchv10no / cmd / spitbol

researchv10 Norman

/*
	cpys2sc( cp,scptr,maxlen ) copies a c style string to a spitbol
	scblk.
*/

#include "spitblks.h"

cpys2sc( cp,endchr,scptr,maxlen )

char	*cp;
char	endchr;
struct	scblk	*scptr;
int	maxlen;

{
	int	cnt = 0, j;
	char	chr;

	while (( cnt < maxlen ) && ( ( chr = cp[cnt] ) != endchr )) {
		scptr -> str[cnt++] = chr;
	}

	scptr -> len = cnt;
}

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