.set noat .set noreorder .set nomacro .text .align 2 .align 4 .globl to_octal .ent to_octal $to_octal..ng: to_octal: .frame $30,0,$26,0 .prologue 0 addl $31,$18,$4 .align 4 $L2: lda $4,-1($4) zapnot $4,15,$3 and $16,7,$1 addq $17,$3,$3 lda $2,48($1) cpys $f31,$f31,$f31 insbl $2,$3,$2 ldq_u $1,0($3) addl $31,$4,$4 srl $16,3,$16 mskbl $1,$3,$1 bis $2,$1,$2 stq_u $2,0($3) bne $4,$L2 ret $31,($26),1 .end to_octal .align 2 .align 4 .globl main .ent main main: .frame $30,0,$26,0 .mask 0x4000000,0 ldah $29,0($27) !gpdisp!1 lda $29,0($29) !gpdisp!1 $main..ng: lda $30,-32($30) lda $16,4516($31) lda $17,16($30) stq $26,0($30) .prologue 1 lda $18,6($31) cpys $f31,$f31,$f31 bsr $26,$to_octal..ng ldq_u $3,17($30) lda $2,17($30) extbl $3,$2,$1 sll $1,56,$1 sra $1,56,$1 cmpeq $1,49,$1 beq $1,$L8 mov $31,$0 ldq $26,0($30) lda $30,32($30) ret $31,($26),1 $L8: ldq $27,abort($29) !literal!2 jsr $26,($27),abort !lituse_jsr!2 .end main .ident "GCC: (GNU) 3.3.2"