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 (38 lines) | stat: -rw-r--r-- 787 bytes parent folder | download | duplicates (6) 
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
 

    ;; Print "pass\n" and 'exit 0'
    .macro      pass
    .data
mpass:
    .string "pass\n"
    .text
_pass:
    mov         %r1, mpass      ; point to "pass\n" string
    mov         %r2, 5          ; strlen mpass
    call        7               ; printk
    mov         %r0, 0          ;
    exit                        ; exit 0
    .endm

;;; MACRO fail
;;; Exit with status 1
    .macro fail
    mov %r0, 1
    exit
    .endm

;;; MACRO fail_ne32
;;; Exit with status 1 if \reg32 != \val
    .macro      fail_ne32 reg val
    jeq32       \reg, \val, 2
    mov         %r0, 1
    exit
    .endm

;;; MACRO fail_ne
;;; Exit with status1 if \reg ne \val
    .macro      fail_ne reg val
    lddw        %r0, \val
    jeq         \reg, %r0, 2
    mov         %r0, 1
    exit
    .endm