old-cross-binutils/sim/testsuite/v850eq-elf/t-macros.i
1997-09-17 03:31:09 +00:00

37 lines
388 B
OpenEdge ABL

.macro start
.text
.globl _start
_start:
.endm
.macro exit47
mov 1, r6
addi 47, r0, r7
trap 31
.endm
.macro exit0
mov 1, r6
mov 0, r7
trap 31
.endm
.macro load reg val
jr 1f
.align 2
1: jarl 2f, \reg
.long \val
2: ld.w 0[\reg], \reg
.endm
.macro check1 reg val
jr 1f
.align 2
1: jarl 2f, r1
.long \val
2: ld.w 0[r1], r1
cmp r1, \reg
be 1f
exit47
1:
.endm