File:  [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / overlay.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
L17:
.byte 050,02
.byte 0164,0141
.byte 0147,02
.byte 051,00
	.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
L30:
	.word	L27-L30
	.word	L28-L30
	.word	L27-L30
	.word	L29-L30
L27:
	addl3	$1,__BLNK__+1644,r0
	movl	r0,__BLNK__+1644
	jbr	L31
L29:
	movl	__BLNK__+1644,r0
	cmpl	__BLNK__[r0],$-1
	jneq	L32
	jbr	L33
L32:
L28:
	addl3	$1,__BLNK__+1644,r0
	movl	r0,__BLNK__+1644
L33:
	addl3	$2,__BLNK__+1644,r0
	movl	r0,__BLNK__+1644
L31:
	movl	__BLNK__+1644,r0
	movl	__BLNK__+-4[r0],__BLNK__+1660
	cmpl	__BLNK__+1624,__BLNK__+1636
	jneq	L34
	jbr	L35
L34:
	jbr	L23
L26:
	cmpl	__BLNK__+1604,__BLNK__+1644
	jneq	L36
	jbr	L21
L36:
	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	L38
	jbr	L37
L38:
	movl	__BLNK__+1604,r10
	addl3	$-1,__BLNK__+1644,r0
	movl	r0,-56(fp)
	cmpl	r10,r0
	jgtr	L40
L41:
	movl	r10,v.2-v.1(r11)
	movl	__BLNK__+1600,r0
	movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
L39:
	incl	r10
	cmpl	r10,-56(fp)
	jleq	L41
L40:
	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	L46
	jbr	L45
L46:
	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
L47:
	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	L48
	jbr	L49
L48:
	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
L53:
	.word	L50-L53
	.word	L51-L53
	.word	L50-L53
	.word	L52-L53
L50:
	addl3	$1,__BLNK__+1648,r0
	movl	r0,__BLNK__+1648
	jbr	L54
L52:
	movl	__BLNK__+1648,r0
	cmpl	__BLNK__[r0],$-1
	jneq	L55
	jbr	L56
L55:
L51:
	addl3	$1,__BLNK__+1648,r0
	movl	r0,__BLNK__+1648
L56:
	addl3	$2,__BLNK__+1648,r0
	movl	r0,__BLNK__+1648
L54:
	movl	__BLNK__+1648,r0
	movl	__BLNK__+-4[r0],__BLNK__+1656
	cmpl	__BLNK__+1628,__BLNK__+1640
	jneq	L57
	jbr	L58
L57:
	jbr	L47
L49:
	cmpl	__BLNK__+1608,__BLNK__+1648
	jneq	L59
	jbr	L37
L59:
L60:
	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	L61
	jbr	L37
L61:
	movl	__BLNK__+1608,r10
	addl3	$-1,__BLNK__+1648,r0
	movl	r0,-60(fp)
	cmpl	r10,r0
	jgtr	L63
L64:
	movl	r10,v.2-v.1(r11)
	movl	__BLNK__+1600,r0
	movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
L62:
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
	incl	r10
	cmpl	r10,-60(fp)
	jleq	L64
L63:
	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
L45:
	divl3	$4,__BLNK__+1656,r0
	movl	r0,__BLNK__+1632
	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
L72:
	.word	L68-L72
	.word	L69-L72
	.word	L70-L72
	.word	L71-L72
L69:
	movl	$3,__BLNK__+1624
	jbr	L68
L70:
	movl	$1,__BLNK__+1624
	jbr	L68
L71:
	movl	__BLNK__+1608,r0
	cmpl	__BLNK__[r0],$-1
	jeql	L73
	jbr	L69
L73:
	movl	$3,__BLNK__+1624
L68:
	movl	$1,r10
	movl	__BLNK__+1624,-64(fp)
	cmpl	r10,-64(fp)
	jgtr	L75
L76:
	movl	r10,v.2-v.1(r11)
	movl	__BLNK__+1608,r0
	movl	__BLNK__+1604,r1
	cmpl	__BLNK__+-4[r0],__BLNK__+-4[r1]
	jeql	L80
	jbr	L37
L80:
	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
L74:
	incl	r10
	cmpl	r10,-64(fp)
	jleq	L76
L75:
	movl	r10,v.2-v.1(r11)
	jbr	L18
L35:
	movl	__BLNK__+1604,r10
	addl3	$-1,__BLNK__+1644,r0
	movl	r0,-68(fp)
	cmpl	r10,r0
	jgtr	L82
L83:
	movl	r10,v.2-v.1(r11)
	movl	__BLNK__+1600,r0
	movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
L81:
	incl	r10
	cmpl	r10,-68(fp)
	jleq	L83
L82:
	movl	r10,v.2-v.1(r11)
	subl3	__BLNK__+1612,__BLNK__+1644,r0
	incl	r0
	jlss	L87
	jbr	L88
L88:
	movl	__BLNK__+1600,__BLNK__+1620
	jbr	L14
L87:
	addl3	$1,__BLNK__+1608,r0
	movl	r0,__BLNK__+1608
	movl	__BLNK__+1644,__BLNK__+1604
	jbr	L18
L58:
	movl	__BLNK__+1608,r10
	addl3	$-1,__BLNK__+1648,r0
	movl	r0,-72(fp)
	cmpl	r10,r0
	jgtr	L90
L91:
	movl	r10,v.2-v.1(r11)
	movl	__BLNK__+1600,r0
	movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
	addl3	$1,__BLNK__+1600,r0
	movl	r0,__BLNK__+1600
L89:
	incl	r10
	cmpl	r10,-72(fp)
	jleq	L91
L90:
	movl	r10,v.2-v.1(r11)
	subl3	__BLNK__+1612,__BLNK__+1604,r0
	incl	r0
	jlss	L95
	jbr	L96
L96:
	movl	__BLNK__+1600,__BLNK__+1620
	pushl	$v.5
	callf	$8,_s_wsfe
	callf	$4,_e_wsfe
	jbr	L14
L95:
	addl3	$1,__BLNK__+1604,r0
	movl	r0,__BLNK__+1604
	movl	__BLNK__+1648,__BLNK__+1608
	jbr	L18
L37:
	movl	$1,__BLNK__+1616
L14:
L13:
	ret#0
L12:
	movl	$v.1,r11
	jbr	L15
	.set	LF1,72
	.set	LWM1,0x1C00
.text
	.data	2
	.align	2
v.5:
	.long	0
	.long	6
	.space	4
	.long	L17
	.align	2
v.4:
	.long	0
	.long	6
	.space	4
	.long	L17
	.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.