Subversion Repositories openrisc_2011-10-31

        .IMPORT $global$,DATA

        .IMPORT $$dyncall,MILLICODE

; gcc_compiled.:

        .IMPORT abort,CODE

        .EXPORT f,DATA

        .data

        .align 4

f:

        .word P%abort

        .word P%abort

        .IMPORT __main,CODE

        .IMPORT printf,CODE

        .code

        .align 4

LC$0000:

        .STRING "frob\x0a\x00"

        .align 4

        .EXPORT main,CODE

        .EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR

main:

        .PROC

        .CALLINFO FRAME=128,CALLS,SAVE_RP

        .ENTRY

        stw %r2,-20(%r30)

        ldo 128(%r30),%r30

        .CALL

        bl __main,%r2

        nop

        ldil L'LC$0000,%r26

        .CALL ARGW0=GR

        bl printf,%r2

        ldo R'LC$0000(%r26),%r26

        ldw -148(%r30),%r2

        bv %r0(%r2)

        ldo -128(%r30),%r30

        .EXIT

        .PROCEND