URL
https://opencores.org/ocsvn/eco32/eco32/trunk
Subversion Repositories eco32
[/] [eco32/] [trunk/] [lcc/] [alpha/] [osf/] [tst/] [8q.sbk] - Rev 4
Compare with Previous | Blame | View Log
.globl main.text.text.ent mainmain:ldgp $gp,0($27)lda $sp,-80($sp).mask 0x4004000,-72.frame $sp,80,$26,48stq $14,0($sp)stq $26,8($sp).prologue 1mov $31,$14L.2:sll $14,8*(8-4),$27sra $27,8*(8-4),$27sll $27,2,$27lda $25,1stl $25,down($27)stl $25,up($27)L.3:lda $14,1($14)cmplt $14,15,$23bne $23,L.2mov $31,$14L.6:sll $14,8*(8-4),$27sra $27,8*(8-4),$27sll $27,2,$27lda $25,1stl $25,rows($27)L.7:lda $14,1($14)cmplt $14,8,$23bne $23,L.6mov $31,$16jsr $26,queensldgp $gp,0($26)mov $31,$0L.1:ldq $14,0($sp)ldq $26,8($sp)lda $sp,80($sp)ret.end main.globl queens.text.ent queensqueens:ldgp $gp,0($27)lda $sp,-80($sp).mask 0x4006000,-64.frame $sp,80,$26,48stq $13,0($sp)stq $14,8($sp)stq $26,16($sp)mov $16,$14.prologue 1mov $31,$13L.11:sll $13,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25ldl $25,rows($25)cmpeq $25,$31,$23bne $23,L.15subl $13,$14,$25lda $25,7($25)sll $25,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25ldl $25,up($25)cmpeq $25,$31,$23bne $23,L.15addl $13,$14,$25sll $25,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25ldl $25,down($25)cmpeq $25,$31,$23bne $23,L.15addl $13,$14,$25sll $25,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25stl $31,down($25)subl $13,$14,$25lda $25,7($25)sll $25,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25stl $31,up($25)sll $13,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25stl $31,rows($25)sll $14,8*(8-4),$27sra $27,8*(8-4),$27sll $27,2,$27stl $13,x($27)cmpeq $14,7,$23beq $23,L.17jsr $26,printldgp $gp,0($26)br L.18L.17:lda $16,1($14)jsr $26,queensldgp $gp,0($26)L.18:lda $27,1addl $13,$14,$25sll $25,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25stl $27,down($25)subl $13,$14,$25lda $25,7($25)sll $25,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25stl $27,up($25)sll $13,8*(8-4),$25sra $25,8*(8-4),$25sll $25,2,$25stl $27,rows($25)L.15:L.12:lda $13,1($13)cmplt $13,8,$23bne $23,L.11mov $31,$0L.10:ldq $13,0($sp)ldq $14,8($sp)ldq $26,16($sp)lda $sp,80($sp)ret.end queens.globl print.text.ent printprint:ldgp $gp,0($27)lda $sp,-80($sp).mask 0x4004000,-72.frame $sp,80,$26,48stq $14,0($sp)stq $26,8($sp).prologue 1mov $31,$14L.20:lda $16,L.24sll $14,8*(8-4),$27sra $27,8*(8-4),$27sll $27,2,$27ldl $27,x($27)lda $17,49($27)jsr $26,printfldgp $gp,0($26)L.21:lda $14,1($14)cmplt $14,8,$23bne $23,L.20lda $16,L.25jsr $26,printfldgp $gp,0($26)mov $31,$0L.19:ldq $14,0($sp)ldq $26,8($sp)lda $sp,80($sp)ret.end print.globl x.comm x,32.globl rows.comm rows,32.globl down.comm down,60.globl up.comm up,60.rdata.align 0L.25:.byte 10.byte 0.align 0L.24:.byte 37.byte 99.byte 32.byte 0
