summaryrefslogtreecommitdiff
path: root/sim/testsuite/sim/sh64/compact/fdiv.cgs
blob: 06d1e93a0147aa198a5aa32a7d92dd7af5ea6124 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
# sh testcase for fdiv -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32

	.include "compact/testutils.inc"

	start
	_clrpr
	
	# 1.0 / 0.0 should be INF
	# (and not crash the sim).
	fldi0 fr0
	fldi1 fr1
	fdiv fr0, fr1

	# 0.0 / 1.0 == 0.0.
	fldi0 fr0
	fldi1 fr1
	fdiv fr1, fr0
	fldi0 fr2
	fcmp/eq fr0, fr2
	bf wrong

	# 2.0 / 1.0 == 2.0.
	fldi1 fr1
	fldi1 fr2
	fadd fr2, fr2
	fdiv fr1, fr2
	# Load 2.0 into fr3.
	fldi1 fr3
	fadd fr3, fr3
	fcmp/eq fr2, fr3
	bf wrong

	# (1.0 / 2.0) + (1.0 / 2.0) == 1.0.
	fldi1 fr1
	fldi1 fr2
	fadd fr2, fr2
	fdiv fr2, fr1
	# fr1 should contain 0.5.
	fadd fr1, fr1
	# Load 1.0 into fr3.
	fldi1 fr3
	# Compare fr1 with fr3.
	fcmp/eq fr1, fr3
	bf wrong

	bra double
	nop

wrong:
	fail
	
double:	
	# double test
	# (1.0 / 2.0) + (1.0 / 2.0) == 1.0.
	fldi1 fr1
	_s2d fr1, dr6
	fldi1 fr2
	fadd fr2, fr2
	_s2d fr2, dr8
	_setpr
	fdiv dr8, dr6
	# dr0 should contain 0.5.
	# double it, expect 1.0.
	fadd dr6, dr6
	_clrpr
foo:	
	# Load 1.0 into dr4.
	fldi1 fr1
	_s2d fr1, dr10
	# Compare dr0 with dr10.
	_setpr
	fcmp/eq dr6, dr10
	bf wrong2
	_clrpr
	
okay:
	pass

wrong2:
	fail