blob: 9f4a46538efaa2f5986e73d24ebd5f118f25f6dc [file] [log] [blame]
.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