66 lines · 1.2 KB · Assembly
RawDownload
#define	BDNZ	BC	16,0,#define	BDNE	BC	0,2, /* *	mpvecadd(mpdigit *a, int alen, mpdigit *b, int blen, mpdigit *sum) * *		sum[0:alen] = a[0:alen-1] - b[0:blen-1] * *	prereq: alen >= blen, sum has room for alen+1 digits * *		R1 == a	(first arg passed in R1) *		R3 == carry *		R4 == alen *		R5 == b *		R6 == blen *		R7 == sum *		R2 == temporary *		R8 == temporary *		R9 == temporary */TEXT	mpvecsub(SB),$-4 	MOVW	alen+4(FP), R4	MOVW	b+8(FP), R5	MOVW	blen+12(FP), R6	MOVW	sum+16(FP), R7	SUBU	R6, R4		/* calculate counter for second loop (alen > blen) */	MOVW	R0, R3 	/* if blen == 0, don't need to subtract it */	BEQ	R6,_sub1 	/* sum[0:blen-1],carry = a[0:blen-1] - b[0:blen-1] */_subloop1:	MOVW	0(R1), R8	ADDU	$4, R1	MOVW	0(R5), R9	ADDU	$4, R5	SUBU	R3, R8, R2	SGTU	R2, R8, R3	SUBU	R9, R2, R8	SGTU	R8, R2, R9	ADDU	R9, R3	MOVW	R8, 0(R7)	ADDU	$4, R7	SUBU	$1, R6	BNE	R6, _subloop1 _sub1:	/* if alen == blen, we're done */	BEQ	R4, _subend 	/* sum[blen:alen-1],carry = a[blen:alen-1] + 0 + carry */_subloop2:	MOVW	0(R1), R8	ADDU	$4, R1	SUBU	R3, R8, R2	SGTU	R2, R8, R3	MOVW	R2, 0(R7)	ADDU	$4, R7	SUBU	$1, R4	BNE	R4, _subloop2 	/* sum[alen] = carry */_subend:	RET