[BACK]Return to t12.t0 CVS log [TXT] [DIR] Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst
File:  [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / t12.t0
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
L22:
	.long	1
	.align	2
L23:
	.long	12
	.align	2
L31:
	.long	2
	.align	2
L40:
	.long	3
	.align	2
L49:
	.long	4
	.align	2
L58:
	.long	5
	.align	2
L67:
	.long	6
	.align	2
L75:
	.long	7
	.align	2
L85:
	.long	8
	.align	2
L95:
	.long	9
	.align	2
L105:
	.long	10
	.align	2
L115:
	.long	11
	.align	2
L135:
	.long	13
	.align	2
L144:
	.long	14
	.data	2
	.data	1
	.data	0
	.globl	_MAIN_
	.globl	_e_
	.align	2
	.stabs	"t12.f",0x64,0,0,0

.text
	.globl	_MAIN_
	.align	1
_MAIN_:
	.word	LWM1
	subl3	$LF1,fp,sp
	jbr	L12
L13:
	movl	$5,v.2-v.1(r11)
	clrl	v.3-v.1(r11)
	movl	$1,r10
	movl	v.2-v.1(r11),-56(fp)
	cmpl	r10,-56(fp)
	jgtr	L16
L17:
	movl	r10,v.4-v.1(r11)
L15:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	incl	r10
	cmpl	r10,-56(fp)
	jleq	L17
L16:
	movl	r10,v.4-v.1(r11)
	cmpl	v.3-v.1(r11),$5
	jeql	L21
	pushl	$L23
	pushl	$L22
	callf	$12,_e_
L21:
	clrl	v.3-v.1(r11)
	movl	$5,r10
	movl	v.2-v.1(r11),-60(fp)
	cmpl	r10,-60(fp)
	jgtr	L25
L26:
	movl	r10,v.4-v.1(r11)
L24:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	incl	r10
	cmpl	r10,-60(fp)
	jleq	L26
L25:
	movl	r10,v.4-v.1(r11)
	cmpl	v.3-v.1(r11),$1
	jeql	L30
	pushl	$L23
	pushl	$L31
	callf	$12,_e_
L30:
	clrl	v.3-v.1(r11)
	movl	$6,r10
	movl	v.2-v.1(r11),-64(fp)
	cmpl	r10,-64(fp)
	jgtr	L34
L35:
	movl	r10,v.4-v.1(r11)
L33:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	incl	r10
	cmpl	r10,-64(fp)
	jleq	L35
L34:
	movl	r10,v.4-v.1(r11)
	tstl	v.3-v.1(r11)
	jeql	L39
	pushl	$L23
	pushl	$L40
	callf	$12,_e_
L39:
	clrl	v.3-v.1(r11)
	mnegl	$1,r10
	mnegl	v.2-v.1(r11),r0
	movl	r0,-68(fp)
	cmpl	r10,r0
	jlss	L43
L44:
	movl	r10,v.4-v.1(r11)
L42:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	addl2	$-1,r10
	cmpl	r10,-68(fp)
	jgeq	L44
L43:
	movl	r10,v.4-v.1(r11)
	cmpl	v.3-v.1(r11),$5
	jeql	L48
	pushl	$L23
	pushl	$L49
	callf	$12,_e_
L48:
	clrl	v.3-v.1(r11)
	mnegl	$5,r10
	mnegl	v.2-v.1(r11),r0
	movl	r0,-72(fp)
	cmpl	r10,r0
	jlss	L52
L53:
	movl	r10,v.4-v.1(r11)
L51:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	addl2	$-1,r10
	cmpl	r10,-72(fp)
	jgeq	L53
L52:
	movl	r10,v.4-v.1(r11)
	cmpl	v.3-v.1(r11),$1
	jeql	L57
	pushl	$L23
	pushl	$L58
	callf	$12,_e_
L57:
	clrl	v.3-v.1(r11)
	mnegl	$6,r10
	movl	v.2-v.1(r11),-76(fp)
	cmpl	r10,-76(fp)
	jlss	L61
L62:
	movl	r10,v.4-v.1(r11)
L60:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	addl2	$-1,r10
	cmpl	r10,-76(fp)
	jgeq	L62
L61:
	movl	r10,v.4-v.1(r11)
	tstl	v.3-v.1(r11)
	jeql	L66
	pushl	$L23
	pushl	$L67
	callf	$12,_e_
L66:
	clrl	v.3-v.1(r11)
	movl	$1,r10
	jbr	L70
L71:
	movl	r10,v.4-v.1(r11)
L69:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	addl2	$-1,r10
	cmpl	r10,$10
	jgeq	L71
L70:
	movl	r10,v.4-v.1(r11)
	tstl	v.3-v.1(r11)
	jeql	L74
	pushl	$L23
	pushl	$L75
	callf	$12,_e_
L74:
	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),-84(fp)
	subl3	-84(fp),$1,r0
	movl	r0,r10
	tstl	-84(fp)
	jlss	L81
L80:
	addl2	-84(fp),r10
	cmpl	r10,-80(fp)
	jgtr	L78
L79:
	movl	r10,v.5-v.1(r11)
L77:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	tstl	-84(fp)
	jgtr	L80
L81:
	addl2	-84(fp),r10
	cmpl	r10,-80(fp)
	jgeq	L79
L78:
	movl	r10,v.5-v.1(r11)
	cmpl	v.3-v.1(r11),$3
	jeql	L84
	pushl	$L23
	pushl	$L85
	callf	$12,_e_
L84:
	clrl	v.3-v.1(r11)
	movl	v.2-v.1(r11),-88(fp)
	movl	v.4-v.1(r11),-92(fp)
	subl3	-92(fp),$5,r0
	movl	r0,r10
	tstl	-92(fp)
	jlss	L91
L90:
	addl2	-92(fp),r10
	cmpl	r10,-88(fp)
	jgtr	L88
L89:
	movl	r10,v.5-v.1(r11)
L87:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	tstl	-92(fp)
	jgtr	L90
L91:
	addl2	-92(fp),r10
	cmpl	r10,-88(fp)
	jgeq	L89
L88:
	movl	r10,v.5-v.1(r11)
	cmpl	v.3-v.1(r11),$1
	jeql	L94
	pushl	$L23
	pushl	$L95
	callf	$12,_e_
L94:
	clrl	v.3-v.1(r11)
	movl	v.2-v.1(r11),-96(fp)
	movl	v.4-v.1(r11),-100(fp)
	subl3	-100(fp),$6,r0
	movl	r0,r10
	tstl	-100(fp)
	jlss	L101
L100:
	addl2	-100(fp),r10
	cmpl	r10,-96(fp)
	jgtr	L98
L99:
	movl	r10,v.5-v.1(r11)
L97:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	tstl	-100(fp)
	jgtr	L100
L101:
	addl2	-100(fp),r10
	cmpl	r10,-96(fp)
	jgeq	L99
L98:
	movl	r10,v.5-v.1(r11)
	tstl	v.3-v.1(r11)
	jeql	L104
	pushl	$L23
	pushl	$L105
	callf	$12,_e_
L104:
	clrl	v.3-v.1(r11)
	mnegl	v.2-v.1(r11),r0
	movl	r0,-104(fp)
	mnegl	v.4-v.1(r11),r0
	movl	r0,-108(fp)
	subl3	r0,$-1,r0
	movl	r0,r10
	tstl	-108(fp)
	jlss	L111
L110:
	addl2	-108(fp),r10
	cmpl	r10,-104(fp)
	jgtr	L108
L109:
	movl	r10,v.5-v.1(r11)
L107:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	tstl	-108(fp)
	jgtr	L110
L111:
	addl2	-108(fp),r10
	cmpl	r10,-104(fp)
	jgeq	L109
L108:
	movl	r10,v.5-v.1(r11)
	cmpl	v.3-v.1(r11),$3
	jeql	L114
	pushl	$L23
	pushl	$L115
	callf	$12,_e_
L114:
	clrl	v.3-v.1(r11)
	mnegl	v.2-v.1(r11),r0
	movl	r0,-112(fp)
	mnegl	v.4-v.1(r11),r0
	movl	r0,-116(fp)
	subl3	r0,$-5,r0
	movl	r0,r10
	tstl	-116(fp)
	jlss	L121
L120:
	addl2	-116(fp),r10
	cmpl	r10,-112(fp)
	jgtr	L118
L119:
	movl	r10,v.5-v.1(r11)
L117:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	tstl	-116(fp)
	jgtr	L120
L121:
	addl2	-116(fp),r10
	cmpl	r10,-112(fp)
	jgeq	L119
L118:
	movl	r10,v.5-v.1(r11)
	cmpl	v.3-v.1(r11),$1
	jeql	L124
	pushl	$L23
	pushl	$L23
	callf	$12,_e_
L124:
	clrl	v.3-v.1(r11)
	movl	v.2-v.1(r11),-120(fp)
	mnegl	v.4-v.1(r11),r0
	movl	r0,-124(fp)
	subl3	r0,$-6,r0
	movl	r0,r10
	tstl	-124(fp)
	jlss	L131
L130:
	addl2	-124(fp),r10
	cmpl	r10,-120(fp)
	jgtr	L128
L129:
	movl	r10,v.5-v.1(r11)
L127:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	tstl	-124(fp)
	jgtr	L130
L131:
	addl2	-124(fp),r10
	cmpl	r10,-120(fp)
	jgeq	L129
L128:
	movl	r10,v.5-v.1(r11)
	tstl	v.3-v.1(r11)
	jeql	L134
	pushl	$L23
	pushl	$L135
	callf	$12,_e_
L134:
	clrl	v.3-v.1(r11)
	mnegl	v.4-v.1(r11),r0
	movl	r0,-128(fp)
	subl3	r0,$1,r0
	movl	r0,r10
	tstl	-128(fp)
	jlss	L141
L140:
	addl2	-128(fp),r10
	cmpl	r10,$10
	jgtr	L138
L139:
	movl	r10,v.5-v.1(r11)
L137:
	addl3	$1,v.3-v.1(r11),r0
	movl	r0,v.3-v.1(r11)
	tstl	-128(fp)
	jgtr	L140
L141:
	addl2	-128(fp),r10
	cmpl	r10,$10
	jgeq	L139
L138:
	movl	r10,v.5-v.1(r11)
	tstl	v.3-v.1(r11)
	jeql	L143
	pushl	$L23
	pushl	$L144
	callf	$12,_e_
L143:
L14:
	ret#0
L12:
	movl	$v.1,r11
	jbr	L13
	.set	LF1,128
	.set	LWM1,0x1C00
.text
	.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.