git: 9front

ref: 27ff6876d02ff5d326d6ee13d2466a6e4a3e0925
dir: /sys/src/libc/68020/vlop.s/

View raw version
TEXT	_mulv(SB), $0
	MOVL	r+0(FP), A0
	MOVL	a+8(FP), R0

	WORD	$0x4c2f
	WORD	$0x0401
	WORD	$0x0014
/*
 *	MULUL	b+16(FP), R0:R1
 *	philw made me do it!
 */

	MOVL	a+4(FP), R2
	MULUL	b+16(FP), R2
	ADDL	R2, R1

	MOVL	a+8(FP), R2
	MULUL	b+12(FP), R2
	ADDL	R2, R1

	MOVL	R1, (A0)+
	MOVL	R0, (A0)
	RTS