File: testutils.inc

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 (70 lines) | stat: -rw-r--r-- 977 bytes parent folder | download | duplicates (17)
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
# MACRO: exit
# Terminates execution.
	.macro exit nr

	stp	x29, x30, [sp,#-32]!
	mov	x4, #0x26
	mov	x7, #\nr
	mov	x29, sp
	movk	x4, #0x2, lsl #16
	add	x1, x29, #0x10
	str	x4, [x29,#16]
	str	x7, [x29,#24]
	mov	w0, #0x18
	hlt	#0xf000

	.endm

# MACRO: swiwrite
# Writes the string in X1 to stdout
	.macro swiwrite len
	
	stp	x29, x30, [sp,#-48]!
	mov	x0, #1
	mov	x2, #\len
	mov	x29, sp
	str	x0, [x29,#24]
	str	x1, [x29,#32]
	str	x2, [x29,#40]
	mov	w0, #0x5
	add	x1, x29, #0x18
	hlt	#0xf000
	ldp	x29, x30, [sp],#48
	ret

	.endm

# MACRO: pass
# Write 'pass' to stdout and quit
	.macro pass

	adrp	x1, .Lpass
	add	x1, x1, :lo12:.Lpass
	
	swiwrite 5
	exit 0
	.endm

# MACRO: fail
# Write 'fail' to stdout and quit
	.macro fail

	adrp	x1, .Lfail
	add	x1, x1, :lo12:.Lfail
	swiwrite 5
	exit 1
	.endm

# MACRO: start
# All assembler tests should start with a call to "start"
	.macro start
	.data
.Lpass:
	.asciz "pass\n"
.Lfail:
	.asciz "fail\n"

	.text
.global _start
_start:
	.endm