Subversion Repositories scarts

        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