OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-7.1/] [gdb/] [testsuite/] [gdb.asm/] [alpha.inc] - Rev 842

Compare with Previous | Blame | View Log

        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

Compare with Previous | Blame | View Log

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.