[BACK]Return to overlay.t1 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 / overlay.t1
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
L17:
.byte 050,02
.byte 0164,0141
.byte 0147,02
.byte 051,00
	.align	2
L64:
	.long	L17
	.align	2
L90:
	.long	L17
	.data	2
	.data	1
	.data	0
	.globl	_ovlay_
	.comm	__BLNK__,1664
	.globl	_s_wsfe
	.globl	_e_wsfe
	.align	2
	.stabs	"overlay.f",0x64,0,0,0

.text
	.globl	_ovlay_
	.align	1
_ovlay_:
	.word	LWM1
	subl3	$LF1,fp,sp
	jbr	L12
L16:
L18:
L15:
	clrl	__BLNK__+1640
	clrl	__BLNK__+1636
L20:
	movl	__BLNK__+1604,__BLNK__+1644
	movl	__BLNK__+1608,__BLNK__+1648
	movl	__BLNK__+1608,r0
	movl	__BLNK__+-4[r0],__BLNK__+1656
	movl	__BLNK__+1604,r0
	movl	__BLNK__+-4[r0],__BLNK__+1660
	divl3	$4,__BLNK__+1656,r0
	movl	r0,__BLNK__+1632
	shll	$2,__BLNK__+1632,r0
	subl3	r0,__BLNK__+1656,r0
	jeql	L22
	jbr	L21
L22:
	divl3	$4,__BLNK__+1656,r0
	movl	r0,__BLNK__+1632
	divl3	$64,__BLNK__+1632,r0
	movl	r0,__BLNK__+1624
	shll	$6,__BLNK__+1624,r0
	subl3	r0,__BLNK__+1632,r0
	movl	r0,__BLNK__+1624
L23:
	divl3	$4,__BLNK__+1660,r0
	movl	r0,__BLNK__+1632
	divl3	$64,__BLNK__+1632,r0
	movl	r0,__BLNK__+1628
	shll	$6,__BLNK__+1628,r0
	subl3	r0,__BLNK__+1632,r0
	movl	r0,__BLNK__+1628
	addl3	__BLNK__+1636,__BLNK__+1628,r0
	movl	r0,__BLNK__+1636
L24:
	cmpl	__BLNK__+1624,__BLNK__+1636
	jgeq	L25
	jbr	L26
L25:
	divl3	$4,__BLNK__+1660,r0
	movl	r0,__BLNK__+1632
	shll	$2,__BLNK__+1632,r0
	subl3	r0,__BLNK__+1660,r0
	incl	r0
	movl	r0,__BLNK__+1628
	movl	__BLNK__+1644,__BLNK__+1652
	movl	__BLNK__+1628,r0
	casel	r0,$1,$3
	.align 1
L96:
	.word	L27-L96
	.word	L28-L96
	.word	L27-L96
	.word	L29-L96
L27:
	addl3	$1,__BLNK__+1644,r0
	movl	r0,__BLNK__+1644
	jbr	L30
L29:
	movl	__BLNK__+1644,r0
	cmpl	__BLNK__[r0],$-1
	jneq	L31
	jbr	L32
L31:
L28:
	addl3	$1,__BLNK__+1644,r0
	movl	r0,__BLNK__+1644
L32:
	addl3	$2,__BLNK__+1644,r0
	movl	r0,__BLNK__+1644
L30:
	movl	__BLNK__+1644,r0
	movl	__BLNK__+-4[r0],__BLNK__+1660
	cmpl	__BLNK__+1624,__BLNK__+1636
	jneq	L33
	jbr	L34
L33:
	jbr	L23
L26:
	cmpl	__BLNK__+1604,__BLNK__+1644
	jneq	L35
	jbr	L21
L35:
	movl	__BLNK__+1644,r0
	divl3	$4,__BLNK__+-4[r0],r0
	movl	r0,__BLNK__+1632
	movl	__BLNK__+1644,r0
	shll	$2,__BLNK__+1632,r1
	subl3	r1,__BLNK__+-4[r0],r0
	jeql	L37
	jbr	L36
L37:
	movl	v.2-v.1(r11),r10
	movl	-56(fp),r9
	movl	__BLNK__+1604,r10
	addl3	$-1,__BLNK__+1644,r0
	movl	r0,r9
	cmpl	r10,r0
	jgtr	L39
L40:
	movl	__BLNK__+1600,r0
	movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
L38:
	incl	r10
	cmpl	r10,r9
	jleq	L40
L39:
	movl	r9,-56(fp)
	movl	r10,v.2-v.1(r11)
	movl	__BLNK__+1644,__BLNK__+1604
	subl3	__BLNK__+1628,__BLNK__+1636,r0
	subl3	r0,__BLNK__+1624,r0
	movl	r0,v.3-v.1(r11)
	shll	$2,v.3-v.1(r11),r0
	movl	__BLNK__+1600,r1
	movl	r0,__BLNK__+-4[r1]
	addl3	$1,__BLNK__+1608,r0
	movl	r0,__BLNK__+1608
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
	mnegl	v.3-v.1(r11),r0
	movl	r0,__BLNK__+1636
	movl	v.3-v.1(r11),__BLNK__+1640
	jbr	L20
L21:
	divl3	$4,__BLNK__+1660,r0
	movl	r0,__BLNK__+1632
	shll	$2,__BLNK__+1632,r0
	subl3	r0,__BLNK__+1660,r0
	jeql	L44
	jbr	L43
L44:
	divl3	$4,__BLNK__+1660,r0
	movl	r0,__BLNK__+1632
	divl3	$64,__BLNK__+1632,r0
	movl	r0,__BLNK__+1628
	shll	$6,__BLNK__+1628,r0
	subl3	r0,__BLNK__+1632,r0
	movl	r0,__BLNK__+1628
L45:
	divl3	$4,__BLNK__+1656,r0
	movl	r0,__BLNK__+1632
	divl3	$64,__BLNK__+1632,r0
	movl	r0,__BLNK__+1624
	shll	$6,__BLNK__+1624,r0
	subl3	r0,__BLNK__+1632,r0
	movl	r0,__BLNK__+1624
	addl3	__BLNK__+1640,__BLNK__+1624,r0
	movl	r0,__BLNK__+1640
	cmpl	__BLNK__+1628,__BLNK__+1640
	jgeq	L46
	jbr	L47
L46:
	divl3	$4,__BLNK__+1656,r0
	movl	r0,__BLNK__+1632
	shll	$2,__BLNK__+1632,r0
	subl3	r0,__BLNK__+1656,r0
	incl	r0
	movl	r0,__BLNK__+1624
	movl	__BLNK__+1648,__BLNK__+1652
	movl	__BLNK__+1624,r0
	casel	r0,$1,$3
	.align 1
L97:
	.word	L48-L97
	.word	L49-L97
	.word	L48-L97
	.word	L50-L97
L48:
	addl3	$1,__BLNK__+1648,r0
	movl	r0,__BLNK__+1648
	jbr	L51
L50:
	movl	__BLNK__+1648,r0
	cmpl	__BLNK__[r0],$-1
	jneq	L52
	jbr	L53
L52:
L49:
	addl3	$1,__BLNK__+1648,r0
	movl	r0,__BLNK__+1648
L53:
	addl3	$2,__BLNK__+1648,r0
	movl	r0,__BLNK__+1648
L51:
	movl	__BLNK__+1648,r0
	movl	__BLNK__+-4[r0],__BLNK__+1656
	cmpl	__BLNK__+1628,__BLNK__+1640
	jneq	L54
	jbr	L55
L54:
	jbr	L45
L47:
	cmpl	__BLNK__+1608,__BLNK__+1648
	jneq	L56
	jbr	L36
L56:
L57:
	movl	__BLNK__+1648,r0
	divl3	$4,__BLNK__+-4[r0],r0
	movl	r0,__BLNK__+1632
	movl	__BLNK__+1648,r0
	shll	$2,__BLNK__+1632,r1
	subl3	r1,__BLNK__+-4[r0],r0
	jeql	L58
	jbr	L36
L58:
	movl	v.2-v.1(r11),r10
	movl	-60(fp),r9
	movl	__BLNK__+1608,r10
	addl3	$-1,__BLNK__+1648,r0
	movl	r0,r9
	cmpl	r10,r0
	jgtr	L60
L61:
	movl	__BLNK__+1600,r0
	movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
L59:
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
	incl	r10
	cmpl	r10,r9
	jleq	L61
L60:
	movl	r9,-60(fp)
	movl	r10,v.2-v.1(r11)
	movl	__BLNK__+1648,__BLNK__+1608
	subl3	__BLNK__+1624,__BLNK__+1640,r0
	subl3	r0,__BLNK__+1628,r0
	movl	r0,v.3-v.1(r11)
	shll	$2,v.3-v.1(r11),r0
	movl	__BLNK__+1600,r1
	movl	r0,__BLNK__+-4[r1]
	addl3	$1,__BLNK__+1604,r0
	movl	r0,__BLNK__+1604
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
	mnegl	v.3-v.1(r11),r0
	movl	r0,__BLNK__+1640
	movl	v.3-v.1(r11),__BLNK__+1636
	jbr	L20
L43:
	divl3	$4,__BLNK__+1656,r0
	movl	r0,__BLNK__+1632
	movl	L64,v.4+12
	pushl	$v.4
	callf	$8,_s_wsfe
	callf	$4,_e_wsfe
	shll	$2,__BLNK__+1632,r0
	subl3	r0,__BLNK__+1656,r0
	incl	r0
	movl	r0,__BLNK__+1624
	movl	__BLNK__+1624,r0
	casel	r0,$1,$3
	.align 1
L98:
	.word	L65-L98
	.word	L66-L98
	.word	L67-L98
	.word	L68-L98
L66:
	movl	$3,__BLNK__+1624
	jbr	L65
L67:
	movl	$1,__BLNK__+1624
	jbr	L65
L68:
	movl	__BLNK__+1608,r0
	cmpl	__BLNK__[r0],$-1
	jeql	L69
	jbr	L66
L69:
	movl	$3,__BLNK__+1624
L65:
	movl	$1,v.2-v.1(r11)
	movl	__BLNK__+1624,-64(fp)
	cmpl	v.2-v.1(r11),-64(fp)
	jgtr	L71
L72:
	movl	__BLNK__+1608,r0
	movl	__BLNK__+1604,r1
	cmpl	__BLNK__+-4[r0],__BLNK__+-4[r1]
	jeql	L75
	jbr	L36
L75:
	movl	__BLNK__+1608,r0
	movl	__BLNK__+1600,r1
	movl	__BLNK__+-4[r0],__BLNK__+-4[r1]
	addl3	$1,__BLNK__+1608,r0
	movl	r0,__BLNK__+1608
	addl3	$1,__BLNK__+1604,r0
	movl	r0,__BLNK__+1604
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
L70:
	incl	v.2-v.1(r11)
	cmpl	v.2-v.1(r11),-64(fp)
	jleq	L72
L71:
	jbr	L18
L34:
	movl	v.2-v.1(r11),r10
	movl	-68(fp),r9
	movl	__BLNK__+1604,r10
	addl3	$-1,__BLNK__+1644,r0
	movl	r0,r9
	cmpl	r10,r0
	jgtr	L77
L78:
	movl	__BLNK__+1600,r0
	movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
L76:
	incl	r10
	cmpl	r10,r9
	jleq	L78
L77:
	movl	r9,-68(fp)
	movl	r10,v.2-v.1(r11)
	subl3	__BLNK__+1612,__BLNK__+1644,r0
	incl	r0
	jlss	L81
	jbr	L82
L82:
	movl	__BLNK__+1600,__BLNK__+1620
	jbr	L14
L81:
	addl3	$1,__BLNK__+1608,r0
	movl	r0,__BLNK__+1608
	movl	__BLNK__+1644,__BLNK__+1604
	jbr	L18
L55:
	movl	v.2-v.1(r11),r10
	movl	-72(fp),r9
	movl	__BLNK__+1608,r10
	addl3	$-1,__BLNK__+1648,r0
	movl	r0,r9
	cmpl	r10,r0
	jgtr	L84
L85:
	movl	__BLNK__+1600,r0
	movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
L83:
	incl	r10
	cmpl	r10,r9
	jleq	L85
L84:
	movl	r9,-72(fp)
	movl	r10,v.2-v.1(r11)
	subl3	__BLNK__+1612,__BLNK__+1604,r0
	incl	r0
	jlss	L88
	jbr	L89
L89:
	movl	__BLNK__+1600,__BLNK__+1620
	movl	L90,v.5+12
	pushl	$v.5
	callf	$8,_s_wsfe
	callf	$4,_e_wsfe
	jbr	L14
L88:
	addl3	$1,__BLNK__+1604,r0
	movl	r0,__BLNK__+1604
	movl	__BLNK__+1648,__BLNK__+1608
	jbr	L18
L36:
	movl	$1,__BLNK__+1616
L14:
L13:
	ret#0
L12:
	movl	$v.1,r11
	jbr	L15
	.set	LF1,72
	.set	LWM1,0x1E00
.text
	.data	2
	.align	2
v.5:
	.long	0
	.long	6
	.space	8
	.align	2
v.4:
	.long	0
	.long	6
	.space	8
	.align	2
v.2:
	.space	4
	.align	2
v.3:
	.space	4
	.set	v.1,v.3
unix.superglobalmegacorp.com

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