File: fsrra.s

package info (click to toggle)
gdb-doc 16.3-1
  • links: PTS, VCS
  • area: non-free
  • in suites: forky, sid, trixie
  • size: 244,264 kB
  • sloc: ansic: 2,134,731; asm: 375,582; exp: 206,875; cpp: 73,639; makefile: 70,232; sh: 26,038; python: 13,697; yacc: 11,341; ada: 7,358; xml: 6,098; perl: 5,077; pascal: 3,389; tcl: 2,986; f90: 2,764; lisp: 1,984; cs: 879; lex: 738; sed: 228; awk: 181; objc: 137; fortran: 57
file content (63 lines) | stat: -rw-r--r-- 1,029 bytes parent folder | download | duplicates (9) 
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
 
# sh testcase for fsrra
# mach: sh
# as(sh):	-defsym sim_cpu=0
# xerror: test hasn't been run in a long time

	.include "testutils.inc"

	start
fsrra_single:
	set_grs_a5a5
	set_fprs_a5a5
	# 1/sqrt(0.0) = +infinity.
	fldi0	fr0
	fsrra	fr0
	assert_fpreg_x	0x7f800000, fr0

	# 1/sqrt(1.0) = 1.0.
	fldi1	fr0
	fsrra	fr0
	assert_fpreg_i	1, fr0

	# 1/sqrt(4.0) = 1/2.0
	fldi1	fr0
	# Double it.
	fadd	fr0, fr0
	# Double it again.
	fadd	fr0, fr0
	fsrra	fr0
	fldi1	fr2
	# Double it.
	fadd	fr2, fr2
	fldi1	fr1
	# Divide
	fdiv	fr2, fr1
	fcmp/eq	fr0, fr1
	bt	.L2
	fail
.L2:
	# Double-check (pun intended)
	fadd	fr0, fr0
	assert_fpreg_i	1, fr0
	fadd	fr1, fr1
	assert_fpreg_i	1, fr1

	# And make sure the rest of the regs are un-affected.
	assert_fpreg_i	2, fr2
	test_fpr_a5a5	fr3
	test_fpr_a5a5	fr4
	test_fpr_a5a5	fr5
	test_fpr_a5a5	fr6
	test_fpr_a5a5	fr7
	test_fpr_a5a5	fr8
	test_fpr_a5a5	fr9
	test_fpr_a5a5	fr10
	test_fpr_a5a5	fr11
	test_fpr_a5a5	fr12
	test_fpr_a5a5	fr13
	test_fpr_a5a5	fr14
	test_fpr_a5a5	fr15
	test_grs_a5a5

	pass
	exit 0