File: psub.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 (64 lines) | stat: -rw-r--r-- 998 bytes parent folder | download | duplicates (40) 
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
 
# sh testcase for psub
# mach:	 shdsp
# as(shdsp):	-defsym sim_cpu=1 -dsp

	.include "testutils.inc"

	start
	set_grs_a5a5
	lds	r0, a0
	pcopy	a0, a1
	lds	r0, x0
	lds	r0, x1
	lds	r0, y0
	lds	r0, y1
	pcopy	x0, m0
	pcopy	y1, m1

psub_sx_sy:
	# 0xa5a5a5a5 minus 0xa5a5a5a5 equals zero
	psub	x0, y0, a0
	assert_sreg	0, a0

psub_sy_sx:
	# 100 - 25 = 75
	mov	#100, r0
	mov	#25, r1
	lds	r0, y1
	lds	r1, x1
	psub	y1, x1, a0
	assert_sreg	75, a0

dct_psub:
	# 100 - 25 = 75
	set_dcfalse
	dct	psub	y1, x1, a1
	assert_sreg2	0xa5a5a5a5, a1
	set_dctrue
	dct	psub	y1, x1, a1
	assert_sreg2	75, a1

dcf_psub:
	# 25 - 100 = -75
	set_dctrue
	dcf	psub	x1, y1, m1
	assert_sreg2	0xa5a5a5a5, m1
	set_dcfalse
	dcf	psub	x1, y1, m1
	assert_sreg2	-75, m1

psub_pmuls:
	# 25 - 100 = -75, and 2 x 2 = 8 (yes, eight, not four)
	mov	#2, r0
	shll16	r0
	lds	r0, x0
	lds	r0, y0
	psub	x1, y1, a1	pmuls	x0, y0, a0
	assert_sreg	8, a0
	assert_sreg2	-75, a1

	set_greg	0xa5a5a5a5, r0
	set_greg	0xa5a5a5a5, r1
	test_grs_a5a5
	pass
	exit 0