dolphin/Source/TestSuite/FPU/source/fpu_asm.S

#define _LANGUAGE_ASSEMBLY
#include "asm.h"

	//r3 = &fpscr
	//r4 = result
	.globl	TestFRES1
TestFRES1:
	lis			r9,Unit01@ha
	addi		r9,r9,Unit01@l
	lfs  fr0, 0(r9)
	fres fr0, fr0
	stfs fr0, 0(r4)
	fres fr0, fr0
	stfs fr0, 0(r5)
	mffs fr1
	stfd fr1, 0(r3)
	blr

	.section .data
	.balign 4
Unit01:
	.float	0.0, 1.0
NrmData:
	.float	0.5, 3.0
TestSuite: start an FPU test. git-svn-id: https://dolphin-emu.googlecode.com/svn/trunk@3429 8ced0084-cf51-0410-be5f-012b33b47a6e 2009-06-13 23:08:51 +03:00			`#define _LANGUAGE_ASSEMBLY`
			`#include "asm.h"`

			`//r3 = &fpscr`
			`//r4 = result`
TestSuite: fix bug in first fpu test (must use stfd to get value of FPSCR, stfs corrupts the value trying to convert to single precision) git-svn-id: https://dolphin-emu.googlecode.com/svn/trunk@3430 8ced0084-cf51-0410-be5f-012b33b47a6e 2009-06-13 23:20:48 +03:00			`.globl TestFRES1`
TestSuite: start an FPU test. git-svn-id: https://dolphin-emu.googlecode.com/svn/trunk@3429 8ced0084-cf51-0410-be5f-012b33b47a6e 2009-06-13 23:08:51 +03:00			`TestFRES1:`
			`lis r9,Unit01@ha`
			`addi r9,r9,Unit01@l`
			`lfs fr0, 0(r9)`
			`fres fr0, fr0`
			`stfs fr0, 0(r4)`
			`fres fr0, fr0`
			`stfs fr0, 0(r5)`
			`mffs fr1`
TestSuite: fix bug in first fpu test (must use stfd to get value of FPSCR, stfs corrupts the value trying to convert to single precision) git-svn-id: https://dolphin-emu.googlecode.com/svn/trunk@3430 8ced0084-cf51-0410-be5f-012b33b47a6e 2009-06-13 23:20:48 +03:00			`stfd fr1, 0(r3)`
TestSuite: start an FPU test. git-svn-id: https://dolphin-emu.googlecode.com/svn/trunk@3429 8ced0084-cf51-0410-be5f-012b33b47a6e 2009-06-13 23:08:51 +03:00			`blr`

			`.section .data`
			`.balign 4`
			`Unit01:`
			`.float 0.0, 1.0`
			`NrmData:`
			`.float 0.5, 3.0`