Subversion Repositories scarts

        comment "subroutine prologue"

        .macro gdbasm_enter

        stwu    1, -16(1)

        stw     31, 8(1)

        mr      31, 1

        mflr    0

        stw     0, 20(1)

        .endm

        comment "subroutine epilogue"

        .macro gdbasm_leave

        lwz     0, 20(1)

        mtlr    0

        lwz     31, 8(1)

        lwz     1, 0(1)

        blr

        .endm

        .macro gdbasm_call subr

        bl \subr

        .endm

        .macro gdbasm_several_nops

        nop

        nop

        nop

        nop

        .endm

        comment "exit (0)"

        .macro gdbasm_exit0

        comment "Don't know how to exit, but this will certainly halt..."

        li      0, 0

        lwz     0, 0(0)

        .endm

        comment "crt0 startup"

        .macro gdbasm_startup

        .p2align 2

        .endm

        comment "Declare a data variable"

        .purgem gdbasm_datavar

        .macro gdbasm_datavar name value

        .data

\name:

        .long   \value

        .endm