memccpy.s

来自「这是一个同样来自贝尔实验室的和UNIX有着渊源的操作系统, 其简洁的设计和实现易」· S 代码 · 共 24 行

	TEXT	memccpy(SB), $0
#define	BDNZ	BC	16,0,
MOVW R3, s1+0(FP)
	MOVW	n+12(FP), R7
	MOVW	s2+4(FP), R4
	MOVBZ	c+11(FP), R5
	CMP	R7, $0
	BEQ	nf
	MOVW	R7, CTR
	SUB	$1, R3
	SUB	$1, R4
l1:
	MOVBZU	1(R4), R6
	CMP	R6, R5
	MOVBZU	R6, 1(R3)
	BEQ	eq
	BDNZ	l1
nf:
	MOVW	$0, R3
	RETURN
eq:
	MOVW	R4, R3
	RETURN