63 lines
947 B
PHP
63 lines
947 B
PHP
# MACRO: exit
|
|
.macro exit nr
|
|
mov \nr, d1;
|
|
# Trap function 1: exit().
|
|
mov 1, d0;
|
|
syscall;
|
|
.endm
|
|
|
|
# MACRO: pass
|
|
# Write 'pass' to stdout and quit
|
|
.macro pass
|
|
# Trap function 5: write().
|
|
mov 5, d0;
|
|
# Use stdout.
|
|
mov 1, d1;
|
|
# Point to the string.
|
|
mov 1f, a0;
|
|
mov a0, (12, sp);
|
|
# Number of bytes to write.
|
|
mov 5, d3;
|
|
mov d3, (16, sp);
|
|
# Trigger OS trap.
|
|
syscall;
|
|
exit 0
|
|
.data
|
|
1: .asciz "pass\n"
|
|
.endm
|
|
|
|
# MACRO: fail
|
|
# Write 'fail' to stdout and quit
|
|
.macro fail
|
|
# Trap function 5: write().
|
|
mov 5, d0;
|
|
# Use stdout.
|
|
mov 1, d1;
|
|
# Point to the string.
|
|
mov 1f, a0;
|
|
mov a0, (12, sp);
|
|
# Number of bytes to write.
|
|
mov 5, d3;
|
|
mov d3, (16, sp);
|
|
# Trigger OS trap.
|
|
syscall;
|
|
exit 0
|
|
.data
|
|
1: .asciz "fail\n"
|
|
.endm
|
|
|
|
# MACRO: start
|
|
# All assembler tests should start with a call to "start"
|
|
.macro start
|
|
.data
|
|
.global _stack
|
|
_stack:
|
|
.rept 8
|
|
.long 0
|
|
.endr
|
|
.text
|
|
.global _start
|
|
_start:
|
|
mov _stack, a0;
|
|
mov a0, sp;
|
|
.endm
|