| # MACRO: exit |
| .macro exit nr |
| ldi.l $r0, \nr; |
| # Trap function 1: exit(). |
| swi 1; |
| .endm |
| |
| # MACRO: pass |
| # Write 'pass' to stdout and quit |
| .macro pass |
| # Use stdout. |
| ldi.b $r0, 1; |
| # Point to the string. |
| ldi.l $r1, 1f; |
| # Number of bytes to write. |
| ldi.s $r2, 5; |
| # Trap function 5: write(). |
| swi 5; |
| exit 0 |
| .data |
| 1: .asciz "pass\n" |
| .endm |
| |
| # MACRO: fail |
| # Write 'fail' to stdout and quit |
| .macro fail |
| # Use stdout. |
| ldi.b $r0, 1; |
| # Point to the string. |
| ldi.l $r1, 1f; |
| # Number of bytes to write. |
| ldi.s $r2, 5; |
| # Trap function 5: write(). |
| swi 5; |
| exit 0 |
| .data |
| 1: .asciz "fail\n" |
| .endm |
| |
| # MACRO: start |
| # All assembler tests should start with a call to "start" |
| .macro start |
| .text |
| .global _start |
| _start: |
| .endm |
