File: nudiv.cgs

package info (click to toggle)
gdb-doc 13.1-1
  • links: PTS, VCS
  • area: non-free
  • in suites: bookworm
  • size: 234,284 kB
  • sloc: ansic: 1,988,072; asm: 373,465; exp: 187,579; cpp: 75,697; makefile: 69,432; sh: 24,829; yacc: 11,654; python: 9,602; ada: 6,680; xml: 6,073; perl: 5,077; pascal: 3,357; f90: 2,555; tcl: 1,902; lisp: 1,578; cs: 879; lex: 759; sed: 228; awk: 154; objc: 137; fortran: 57
file content (49 lines) | stat: -rw-r--r-- 1,126 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
# frv testcase for nudiv $GRi,$GRj,$GRk
# mach: fr500 fr550 frv

	.include "testutils.inc"

	start

	.global nudiv
nudiv:
	set_spr_immed	0,gner0
	set_spr_immed	0,gner1

	; simple division 12 / 3
	set_gr_immed   	0x00000003,gr2
	set_gr_immed   	0x0000000c,gr3
	nudiv      	gr3,gr2,gr3
	test_gr_immed  	0x00000003,gr2
	test_gr_immed  	0x00000004,gr3
	test_spr_immed	0,gner0
	test_spr_immed	0,gner1

	; example 1 from the fr30 manual
	set_gr_limmed  	0x0123,0x4567,gr2
	set_gr_limmed  	0xfedc,0xba98,gr3
	nudiv      	gr3,gr2,gr3
	test_gr_limmed 	0x0123,0x4567,gr2
	test_gr_immed  	0x000000e0,gr3
	test_spr_immed	0,gner0
	test_spr_immed	0,gner1

	or_spr_immed	0x20,isr	; turn on isr.edem
	nudiv      	gr1,gr0,gr32	; divide by zero
	test_spr_immed	1,gner0
	test_spr_immed	0,gner1

	and_spr_immed	-33,isr		; turn off isr.edem
	nudiv      	gr1,gr0,gr10	; divide by zero
	test_spr_immed	1,gner0
	test_spr_immed	0x00000400,gner1

	; simple division 12 / 3 -- should turn off ne flag
	set_gr_immed   	12,gr1
	set_gr_immed   	3,gr3
	nudiv      	gr1,gr3,gr10
	test_gr_immed  	4,gr10
	test_spr_immed	1,gner0
	test_spr_immed	0,gner1

	pass