2 changed files with 52 additions and 0 deletions
@ -0,0 +1,51 @@ |
|||
.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.: |
|||
.EXPORT blah,DATA |
|||
.SPACE $PRIVATE$ |
|||
.SUBSPA $DATA$ |
|||
|
|||
.align 8 |
|||
blah |
|||
; .double 0e+00 |
|||
.word 0 ; = 0x0 |
|||
.word 0 ; = 0x0 |
|||
.EXPORT foo,DATA |
|||
.align 8 |
|||
foo |
|||
; .double 0e+00 |
|||
.word 0 ; = 0x0 |
|||
.word 0 ; = 0x0 |
|||
.EXPORT yabba,DATA |
|||
.align 4 |
|||
yabba |
|||
.word 1 |
|||
.SPACE $TEXT$ |
|||
.SUBSPA $CODE$ |
|||
|
|||
.align 4 |
|||
.EXPORT bar,CODE |
|||
.EXPORT bar,ENTRY,PRIV_LEV=3,RTNVAL=GR |
|||
bar |
|||
.PROC |
|||
.CALLINFO FRAME=64,NO_CALLS,SAVE_SP,ENTRY_GR=3 |
|||
.ENTRY |
|||
copy %r3,%r1 |
|||
copy %r30,%r3 |
|||
stwm %r1,64(0,%r30) |
|||
addil L'yabba-$global$,%r27 |
|||
ldo R'yabba-$global$(%r1),%r19 |
|||
ldi 2,%r20 |
|||
stw %r20,0(0,%r19) |
|||
L$0001 |
|||
ldo 64(%r3),%r30 |
|||
ldwm -64(0,%r30),%r3 |
|||
bv,n 0(%r2) |
|||
.EXIT |
|||
.PROCEND |
|||
Loading…
Reference in new issue