blob: 6c3fa3781cd18f27d6737b322e45a121fcc61870 [file] [log] [blame]
.SPACE $PRIVATE$
.SUBSPA $DATA$,QUAD=1,ALIGN=8,ACCESS=31
.SUBSPA $BSS$,QUAD=1,ALIGN=8,ACCESS=31,ZERO,SORT=82
.SPACE $TEXT$
.SUBSPA $LIT$,QUAD=0,ALIGN=8,ACCESS=44
.SUBSPA $CODE$,QUAD=0,ALIGN=8,ACCESS=44,CODE_ONLY
.IMPORT $global$,DATA
.IMPORT $$dyncall,MILLICODE
; gcc_compiled.:
.SPACE $TEXT$
.SUBSPA $LIT$
.align 8
L$P0000
.word 0x12345678
.word 0x0
.align 8
L$C0000
.word 0x3ff00000
.word 0x0
.SPACE $TEXT$
.SUBSPA $CODE$
.align 4
.EXPORT g,ENTRY,PRIV_LEV=3,RTNVAL=FR
g
.PROC
.CALLINFO FRAME=0,NO_CALLS
.ENTRY
stw %r19,-32(%r30)
ldw T'L$C0000(%r19),%r20
bv %r0(%r2)
fldds 0(%r20),%fr4
.EXIT
.PROCEND
.IMPORT abort,CODE
.IMPORT exit,CODE
.SPACE $TEXT$
.SUBSPA $LIT$
.align 8
L$C0001
.word 0x3ff00000
.word 0x0
.SPACE $TEXT$
.SUBSPA $CODE$
.align 4
.EXPORT main,ENTRY,PRIV_LEV=3,RTNVAL=GR
main
.PROC
.CALLINFO FRAME=128,CALLS,SAVE_RP,ENTRY_GR=3
.ENTRY
stw %r2,-20(%r30)
ldo 128(%r30),%r30
stw %r19,-32(%r30)
stw %r4,-128(%r30)
copy %r19,%r4
.CALL
bl g,%r2
copy %r4,%r19
copy %r4,%r19
ldw T'L$C0001(%r19),%r20
fldds 0(%r20),%fr8
fcmp,dbl,= %fr4,%fr8
ftest
add,tr %r0,%r0,%r0
b,n L$0003
.CALL
bl abort,%r2
nop
L$0003
.CALL ARGW0=GR
bl exit,%r2
ldi 0,%r26
nop
.EXIT
.PROCEND