.set noat .set noreorder .set nomacro .text .align 2 .align 4 .globl create_array_type .ent create_array_type create_array_type: .frame $30,0,$26,0 .mask 0x4000600,0 ldah $29,0($27) !gpdisp!1 lda $29,0($29) !gpdisp!1 $create_array_type..ng: lda $30,-48($30) stq $9,8($30) mov $17,$9 stq $10,16($30) mov $16,$10 stq $26,0($30) .prologue 1 beq $16,$L8 $L2: lda $16,32($30) ldq $27,get_discrete_bounds($29) !literal!6 lda $17,40($30) jsr $26,($27),get_discrete_bounds !lituse_jsr!6 ldah $29,0($26) !gpdisp!7 lda $29,0($29) !gpdisp!7 ldl $4,0($9) ldq $1,40($30) ldq $2,32($30) zapnot $4,15,$4 ldl $3,16($10) ldq $16,8($10) subq $1,$2,$1 lda $1,1($1) mulq $4,$1,$4 zapnot $3,252,$3 bis $3,1,$3 stl $3,16($10) stl $4,0($10) beq $16,$L3 lda $9,8($16) ldq $5,32($9) ldq $2,24($9) subq $5,$2,$1 cmplt $1,32,$1 bis $31,$31,$31 bne $1,$L9 $L5: lda $1,32($2) ldq $0,16($9) stq $1,24($9) cmpeq $1,$0,$1 bne $1,$L10 $L6: ldl $1,40($9) ldq $3,24($9) ldq $4,8($9) addl $31,$1,$2 addq $3,$2,$3 bic $3,$1,$1 stq $1,24($9) subq $1,$4,$1 subq $5,$4,$4 cmple $1,$4,$1 bne $1,$L7 stq $5,24($9) $L7: ldq $1,24($9) stq $1,16($9) $L4: stq $0,24($10) mov $10,$0 ldq $26,0($30) ldq $9,8($30) ldq $10,16($30) lda $30,48($30) ret $31,($26),1 .align 4 $L10: lda $1,1($31) cpys $f31,$f31,$f31 stl $1,44($9) br $31,$L6 .align 4 $L9: mov $9,$16 ldq $27,_obstack_newchunk($29) !literal!4 lda $17,32($31) jsr $26,($27),_obstack_newchunk !lituse_jsr!4 ldah $29,0($26) !gpdisp!5 lda $29,0($29) !gpdisp!5 ldq $2,24($9) bis $31,$31,$31 ldq $5,32($9) br $31,$L5 .align 4 $L3: lda $16,32($31) ldq $27,xmalloc($29) !literal!2 jsr $26,($27),xmalloc !lituse_jsr!2 ldah $29,0($26) !gpdisp!3 lda $29,0($29) !gpdisp!3 br $31,$L4 $L8: ldq $27,alloc_type($29) !literal!8 jsr $26,($27),alloc_type !lituse_jsr!8 ldah $29,0($26) !gpdisp!9 lda $29,0($29) !gpdisp!9 mov $0,$10 br $31,$L2 .end create_array_type .align 2 .align 4 .globl alloc_type .ent alloc_type alloc_type: .frame $30,0,$26,0 .mask 0x4000000,0 ldah $29,0($27) !gpdisp!10 lda $29,0($29) !gpdisp!10 $alloc_type..ng: lda $30,-16($30) ldq $27,abort($29) !literal!11 stq $26,0($30) .prologue 1 jsr $26,($27),abort !lituse_jsr!11 .end alloc_type .align 2 .align 4 .globl xmalloc .ent xmalloc $xmalloc..ng: xmalloc: .frame $30,0,$26,0 .prologue 0 mov $31,$0 ret $31,($26),1 .end xmalloc .align 2 .align 4 .globl _obstack_newchunk .ent _obstack_newchunk _obstack_newchunk: .frame $30,0,$26,0 .mask 0x4000000,0 ldah $29,0($27) !gpdisp!12 lda $29,0($29) !gpdisp!12 $_obstack_newchunk..ng: lda $30,-16($30) ldq $27,abort($29) !literal!13 stq $26,0($30) .prologue 1 jsr $26,($27),abort !lituse_jsr!13 .end _obstack_newchunk .align 2 .align 4 .globl get_discrete_bounds .ent get_discrete_bounds $get_discrete_bounds..ng: get_discrete_bounds: .frame $30,0,$26,0 .prologue 0 stq $31,0($16) lda $1,2($31) stq $1,0($17) ret $31,($26),1 .end get_discrete_bounds .align 2 .align 4 .globl main .ent main main: .frame $30,0,$26,0 .mask 0x4000000,0 ldah $29,0($27) !gpdisp!14 lda $29,0($29) !gpdisp!14 $main..ng: lda $30,-80($30) lda $1,4($31) stq $31,16($30) lda $16,48($30) lda $17,16($30) stl $1,16($30) stq $26,0($30) .prologue 1 stq $31,24($30) stq $31,32($30) stq $31,40($30) stq $31,48($30) stq $31,56($30) stq $31,64($30) stq $31,72($30) bsr $26,$create_array_type..ng ldl $1,48($30) cmpeq $1,12,$1 bne $1,$L16 ldq $27,abort($29) !literal!16 jsr $26,($27),abort !lituse_jsr!16 $L16: mov $31,$16 ldq $27,exit($29) !literal!15 jsr $26,($27),exit !lituse_jsr!15 .end main .ident "GCC: (GNU) 3.3.2"