| comment "subroutine declare" |
| .purgem gdbasm_declare |
| .macro gdbasm_declare name |
| .ent \name |
| \name: |
| .endm |
| |
| comment "subroutine prologue" |
| .macro gdbasm_enter |
| .frame $30, 16, $26, 0 |
| .mask 0x04000000, -16 |
| ldgp $gp, 0($27) |
| subq $sp, 16, $sp |
| stq $26, 0($sp) |
| .prologue 1 |
| .endm |
| |
| comment "subroutine epilogue" |
| .macro gdbasm_leave |
| ldq $26, 0($sp) |
| addq $sp, 16, $sp |
| ret |
| .endm |
| |
| comment "subroutine end" |
| .purgem gdbasm_end |
| .macro gdbasm_end name |
| .end \name |
| .endm |
| |
| comment "subroutine call" |
| /* Can't use ldgp here because the finish-frame test expects the |
| pc to wind up on the next line. That's ok, we're all local. */ |
| .macro gdbasm_call subr |
| jsr $26, \subr |
| .endm |
| |
| .macro gdbasm_several_nops |
| nop |
| nop |
| nop |
| nop |
| .endm |
| |
| comment "exit (0)" |
| .macro gdbasm_exit0 |
| lda $16, 0($31) |
| lda $0, 1($31) |
| callsys |
| .endm |
| |
| comment "crt0 startup" |
| .macro gdbasm_startup |
| .frame $31, 0, $31, 0 |
| .prologue |
| ldgp $gp, 0($27) |
| .endm |
| |
| comment "Declare a data variable" |
| .purgem gdbasm_datavar |
| .macro gdbasm_datavar name value |
| .data |
| \name: |
| .long \value |
| .endm |
