File: jsr.ms

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 (86 lines) | stat: -rw-r--r-- 944 bytes parent folder | download | duplicates (35) 
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
84
85
86
 
# mach: crisv3 crisv8 crisv10 crisv32
# output: 0\n0\n0\n0\n0\n0\n

# Test that jsr Rn and jsr [PC+] work.

 .include "testutils.inc"
 start
x:
 move.d 0f,r6
 setf nzvc
 jsr r6
 .if ..asm.arch.cris.v32
 nop
 .endif
0:
 test_move_cc 1 1 1 1
 move srp,r3
 sub.d 0b,r3
 dumpr3

 move.d 1f,r0
 setf nzvc
 jsr r0
 .if ..asm.arch.cris.v32
 moveq 0,r0
 .endif
6:
 nop
 quit

2:
 test_move_cc 0 0 0 0
 move srp,r3
 sub.d 3f,r3
 dumpr3
 jsr 4f
 .if ..asm.arch.cris.v32
 nop
 .endif
7:
 nop
 quit

; Can't use local label 8 or 9, as they're used by test_move_cc.
y:
 move srp,r3
 sub.d 7b,r3
 dumpr3
 quit

4:
 move srp,r3
 sub.d 7b,r3
 dumpr3
 move.d 5f,r3
 jump r3
 .if ..asm.arch.cris.v32
 moveq 0,r3
 .endif
 quit

 .space 32770,0
1:
 test_move_cc 1 1 1 1
 move srp,r3
 sub.d 6b,r3
 dumpr3

 clearf cznv
 jsr 2b
 .if ..asm.arch.cris.v32
 nop
 .endif
3:

 quit

5:
 move srp,r3
 sub.d 7b,r3
 dumpr3
 jump y
 .if ..asm.arch.cris.v32
 nop
 .endif
 quit