File:  [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / t12.t2
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Sun Jul 28 12:26:07 2019 UTC (7 years ago) by root
Branches: bsd, MAIN
CVS tags: v121, HEAD
Power 6/32 Unix version 1.21

	.data	0
	.align	2
L125:
	.long	1
	.align	2
L126:
	.long	12
	.align	2
L127:
	.long	2
	.align	2
L129:
	.long	3
	.align	2
L131:
	.long	4
	.align	2
L133:
	.long	5
	.align	2
L135:
	.long	6
	.align	2
L137:
	.long	7
	.align	2
L139:
	.long	8
	.align	2
L141:
	.long	9
	.align	2
L143:
	.long	10
	.align	2
L145:
	.long	11
	.align	2
L149:
	.long	13
	.align	2
L151:
	.long	14
	.data	2
	.data	1
	.data	0
	.globl	_MAIN_
	.globl	_e_
	.align	2
	.stabs	"t12.f",0x64,0,0,0
.text
.globl	_MAIN_
.set	LF1,156
.set	LWM1,0x1FC0
.align	1
_MAIN_:.word	LWM1
subl3	$LF1,fp,sp
movl	$v.1,r11
movl	$5,v.2-v.1(r11)
clrl	v.3-v.1(r11)
movl	v.2-v.1(r11),-56(fp)
movl	v.3-v.1(r11),r10
movl	-56(fp),r9
movl	v.4-v.1(r11),r8
movl	$1,r8
cmpl	r8,r9
jgtr	L16
L15:addl2	$1,r10
aobleq	r9,r8,L15
L16:movl	r8,v.4-v.1(r11)
movl	r10,v.3-v.1(r11)
cmpl	r10,$5
jeql	L20
pushl	$L126
pushl	$L125
callf	$12,_e_
L20:clrl	v.3-v.1(r11)
movl	v.2-v.1(r11),-60(fp)
movl	v.3-v.1(r11),r10
movl	-60(fp),r9
movl	v.4-v.1(r11),r8
movl	$5,r8
cmpl	r8,r9
jgtr	L22
L21:addl2	$1,r10
aobleq	r9,r8,L21
L22:movl	r8,v.4-v.1(r11)
movl	r10,v.3-v.1(r11)
cmpl	r10,$1
jeql	L26
pushl	$L126
pushl	$L127
callf	$12,_e_
L26:clrl	v.3-v.1(r11)
movl	v.2-v.1(r11),-64(fp)
movl	v.3-v.1(r11),r10
movl	-64(fp),r9
movl	v.4-v.1(r11),r8
movl	$6,r8
cmpl	r8,r9
jgtr	L28
L27:addl2	$1,r10
aobleq	r9,r8,L27
L28:movl	r8,v.4-v.1(r11)
movl	r10,v.3-v.1(r11)
tstl	r10
jeql	L32
pushl	$L126
pushl	$L129
callf	$12,_e_
L32:clrl	v.3-v.1(r11)
mnegl	v.2-v.1(r11),-68(fp)
movl	v.3-v.1(r11),r10
movl	-68(fp),r9
movl	v.4-v.1(r11),r8
mnegl	$1,r8
cmpl	r8,r9
jlss	L34
L33:addl2	$1,r10
subl2	$1,r8
cmpl	r8,r9
jgeq	L33
L34:movl	r8,v.4-v.1(r11)
movl	r10,v.3-v.1(r11)
cmpl	r10,$5
jeql	L38
pushl	$L126
pushl	$L131
callf	$12,_e_
L38:clrl	v.3-v.1(r11)
mnegl	v.2-v.1(r11),-72(fp)
movl	v.3-v.1(r11),r10
movl	-72(fp),r9
movl	v.4-v.1(r11),r8
mnegl	$5,r8
cmpl	r8,r9
jlss	L40
L39:addl2	$1,r10
subl2	$1,r8
cmpl	r8,r9
jgeq	L39
L40:movl	r8,v.4-v.1(r11)
movl	r10,v.3-v.1(r11)
cmpl	r10,$1
jeql	L44
pushl	$L126
pushl	$L133
callf	$12,_e_
L44:clrl	v.3-v.1(r11)
movl	v.2-v.1(r11),-76(fp)
movl	v.3-v.1(r11),r10
movl	-76(fp),r9
movl	v.4-v.1(r11),r8
mnegl	$6,r8
cmpl	r8,r9
jlss	L46
L45:addl2	$1,r10
subl2	$1,r8
cmpl	r8,r9
jgeq	L45
L46:movl	r8,v.4-v.1(r11)
movl	r10,v.3-v.1(r11)
tstl	r10
jeql	L50
pushl	$L126
pushl	$L135
callf	$12,_e_
L50:clrl	v.3-v.1(r11)
movl	v.3-v.1(r11),r10
movl	v.4-v.1(r11),r9
movl	$1,r9
jbr	L52
L51:addl2	$1,r10
subl2	$1,r9
cmpl	r9,$10
jgeq	L51
L52:movl	r9,v.4-v.1(r11)
movl	r10,v.3-v.1(r11)
tstl	r10
jeql	L56
pushl	$L126
pushl	$L137
callf	$12,_e_
L56:clrl	v.3-v.1(r11)
movl	$2,v.4-v.1(r11)
movl	v.2-v.1(r11),-80(fp)
movl	v.4-v.1(r11),-88(fp)
subl3	-88(fp),$1,-84(fp)
movl	-80(fp),r10
movl	-88(fp),r9
movl	v.3-v.1(r11),r8
movl	v.5-v.1(r11),r7
movl	-84(fp),r6
movl	r6,r7
tstl	r9
jlss	L61
L60:addl2	r9,r7
cmpl	r7,r10
jgtr	L58
L57:addl2	$1,r8
tstl	r9
jgtr	L60
L61:addl2	r9,r7
cmpl	r7,r10
jgeq	L57
L58:movl	r7,v.5-v.1(r11)
movl	r8,v.3-v.1(r11)
cmpl	r8,$3
jeql	L62
pushl	$L126
pushl	$L139
callf	$12,_e_
L62:clrl	v.3-v.1(r11)
movl	v.2-v.1(r11),-92(fp)
movl	v.4-v.1(r11),-100(fp)
subl3	-100(fp),$5,-96(fp)
movl	-92(fp),r10
movl	-100(fp),r9
movl	v.3-v.1(r11),r8
movl	v.5-v.1(r11),r7
movl	-96(fp),r6
movl	r6,r7
tstl	r9
jlss	L67
L66:addl2	r9,r7
cmpl	r7,r10
jgtr	L64
L63:addl2	$1,r8
tstl	r9
jgtr	L66
L67:addl2	r9,r7
cmpl	r7,r10
jgeq	L63
L64:movl	r7,v.5-v.1(r11)
movl	r8,v.3-v.1(r11)
cmpl	r8,$1
jeql	L68
pushl	$L126
pushl	$L141
callf	$12,_e_
L68:clrl	v.3-v.1(r11)
movl	v.2-v.1(r11),-104(fp)
movl	v.4-v.1(r11),-112(fp)
subl3	-112(fp),$6,-108(fp)
movl	-104(fp),r10
movl	-112(fp),r9
movl	v.3-v.1(r11),r8
movl	v.5-v.1(r11),r7
movl	-108(fp),r6
movl	r6,r7
tstl	r9
jlss	L73
L72:addl2	r9,r7
cmpl	r7,r10
jgtr	L70
L69:addl2	$1,r8
tstl	r9
jgtr	L72
L73:addl2	r9,r7
cmpl	r7,r10
jgeq	L69
L70:movl	r7,v.5-v.1(r11)
movl	r8,v.3-v.1(r11)
tstl	r8
jeql	L74
pushl	$L126
pushl	$L143
callf	$12,_e_
L74:clrl	v.3-v.1(r11)
mnegl	v.2-v.1(r11),-116(fp)
mnegl	v.4-v.1(r11),r0
movl	r0,-124(fp)
subl3	r0,$-1,-120(fp)
movl	-116(fp),r10
movl	r0,r9
movl	v.3-v.1(r11),r8
movl	v.5-v.1(r11),r7
movl	-120(fp),r6
movl	r6,r7
tstl	r9
jlss	L79
L78:addl2	r9,r7
cmpl	r7,r10
jgtr	L76
L75:addl2	$1,r8
tstl	r9
jgtr	L78
L79:addl2	r9,r7
cmpl	r7,r10
jgeq	L75
L76:movl	r7,v.5-v.1(r11)
movl	r8,v.3-v.1(r11)
cmpl	r8,$3
jeql	L80
pushl	$L126
pushl	$L145
callf	$12,_e_
L80:clrl	v.3-v.1(r11)
mnegl	v.2-v.1(r11),-128(fp)
mnegl	v.4-v.1(r11),r0
movl	r0,-136(fp)
subl3	r0,$-5,-132(fp)
movl	-128(fp),r10
movl	r0,r9
movl	v.3-v.1(r11),r8
movl	v.5-v.1(r11),r7
movl	-132(fp),r6
movl	r6,r7
tstl	r9
jlss	L85
L84:addl2	r9,r7
cmpl	r7,r10
jgtr	L82
L81:addl2	$1,r8
tstl	r9
jgtr	L84
L85:addl2	r9,r7
cmpl	r7,r10
jgeq	L81
L82:movl	r7,v.5-v.1(r11)
movl	r8,v.3-v.1(r11)
cmpl	r8,$1
jeql	L86
pushl	$L126
pushl	$L126
callf	$12,_e_
L86:clrl	v.3-v.1(r11)
movl	v.2-v.1(r11),-140(fp)
mnegl	v.4-v.1(r11),r0
movl	r0,-148(fp)
subl3	r0,$-6,-144(fp)
movl	-140(fp),r10
movl	r0,r9
movl	v.3-v.1(r11),r8
movl	v.5-v.1(r11),r7
movl	-144(fp),r6
movl	r6,r7
tstl	r9
jlss	L91
L90:addl2	r9,r7
cmpl	r7,r10
jgtr	L88
L87:addl2	$1,r8
tstl	r9
jgtr	L90
L91:addl2	r9,r7
cmpl	r7,r10
jgeq	L87
L88:movl	r7,v.5-v.1(r11)
movl	r8,v.3-v.1(r11)
tstl	r8
jeql	L92
pushl	$L126
pushl	$L149
callf	$12,_e_
L92:clrl	v.3-v.1(r11)
mnegl	v.4-v.1(r11),r0
movl	r0,-156(fp)
subl3	r0,$1,-152(fp)
movl	r0,r10
movl	v.3-v.1(r11),r9
movl	v.5-v.1(r11),r8
movl	-152(fp),r7
movl	r7,r8
tstl	r10
jlss	L97
L96:addl2	r10,r8
cmpl	r8,$10
jgtr	L94
L93:addl2	$1,r9
tstl	r10
jgtr	L96
L97:addl2	r10,r8
cmpl	r8,$10
jgeq	L93
L94:movl	r8,v.5-v.1(r11)
movl	r9,v.3-v.1(r11)
tstl	r9
jeql	L14
pushl	$L126
pushl	$L151
callf	$12,_e_
L14:ret#0

	.data	2
	.align	2
v.4:
	.space	4
	.align	2
v.3:
	.space	4
	.align	2
v.5:
	.space	4
	.align	2
v.2:
	.space	4
	.set	v.1,v.5


unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.