shithub: riscv

ref: e391b7ec8c0dc746a70725f3fc598def0419d1e6
dir: /sys/src/ape/lib/ap/sparc/main9.s/

View raw version
GLOBL	_tos(SB), $4

TEXT	_main(SB), 1, $0
	SUB	$8, R1
	MOVW	$setSB(SB), R2
	MOVW	R7, _tos(SB)

/*
	MOVW	_fpsr+0(SB), FSR
	FMOVD	$0.5, F26
	FSUBD	F26, F26, F24
	FADDD	F26, F26, F28
	FADDD	F28, F28, F30
*/

	MOVW	$_apemain(SB), R7
	MOVW	$_callmain(SB), R24
	MOVW	$0, R15
	JMP	(R24)
	MOVW	$_mul(SB), R8	/* force loading of muldiv */