File:  [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / overlay.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
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_
.set	LF1,72
.set	LWM1,0x1E00
.align	1
_ovlay_:.word	LWM1
subl3	$LF1,fp,sp
movl	$v.1,r11
L15:clrl	__BLNK__+1640
clrl	__BLNK__+1636
jbr	L20
L2000001:divl3	$4,__BLNK__+1656,__BLNK__+1632
divl3	$64,__BLNK__+1632,__BLNK__+1624
shll	$6,__BLNK__+1624,r0
subl3	r0,__BLNK__+1632,__BLNK__+1624
L23:divl3	$4,__BLNK__+1660,__BLNK__+1632
divl3	$64,__BLNK__+1632,__BLNK__+1628
shll	$6,__BLNK__+1628,r0
subl3	r0,__BLNK__+1632,__BLNK__+1628
addl2	__BLNK__+1628,__BLNK__+1636
cmpl	__BLNK__+1624,__BLNK__+1636
jlss	L26
divl3	$4,__BLNK__+1660,__BLNK__+1632
shll	$2,__BLNK__+1632,r0
subl3	r0,__BLNK__+1660,r0
addl3	$1,r0,__BLNK__+1628
movl	__BLNK__+1644,__BLNK__+1652
casel	__BLNK__+1628,$1,$3
.align 1
L2000004:
.word	L27-L2000004
.word	L28-L2000004
.word	L27-L2000004
.word	L29-L2000004
L27:addl2	$1,__BLNK__+1644
jbr	L30
L29:movl	__BLNK__+1644,r0
cmpl	__BLNK__[r0],$-1
jeql	L32
L28:addl2	$1,__BLNK__+1644
L32:addl2	$2,__BLNK__+1644
L30:movl	__BLNK__+1644,r0
movl	__BLNK__+-4[r0],__BLNK__+1660
cmpl	__BLNK__+1624,__BLNK__+1636
jneq	L23
movl	v.2-v.1(r11),r10
movl	-68(fp),r9
movl	__BLNK__+1604,r10
subl3	$1,r0,r0
movl	r0,r9
cmpl	r10,r0
jgtr	L77
L78:movl	__BLNK__+1600,r0
movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
addl2	$1,__BLNK__+1600
aobleq	r9,r10,L78
L77:movl	r9,-68(fp)
movl	r10,v.2-v.1(r11)
subl3	__BLNK__+1612,__BLNK__+1644,r0
incl	r0
jlss	L81
movl	__BLNK__+1600,__BLNK__+1620
jbr	L13
L26:cmpl	__BLNK__+1604,__BLNK__+1644
jeql	L21
movl	__BLNK__+1644,r0
divl3	$4,__BLNK__+-4[r0],__BLNK__+1632
shll	$2,__BLNK__+1632,r1
subl3	r1,__BLNK__+-4[r0],r0
jneq	L36
movl	v.2-v.1(r11),r10
movl	-56(fp),r9
movl	__BLNK__+1604,r10
subl3	$1,__BLNK__+1644,r0
movl	r0,r9
cmpl	r10,r0
jgtr	L39
L40:movl	__BLNK__+1600,r0
movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
addl2	$1,__BLNK__+1600
aobleq	r9,r10,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,v.3-v.1(r11)
shll	$2,v.3-v.1(r11),r0
movl	__BLNK__+1600,r1
movl	r0,__BLNK__+-4[r1]
addl2	$1,__BLNK__+1608
addl2	$1,__BLNK__+1600
mnegl	v.3-v.1(r11),__BLNK__+1636
movl	v.3-v.1(r11),__BLNK__+1640
jbr	L20
L2000003:divl3	$4,__BLNK__+1660,__BLNK__+1632
divl3	$64,__BLNK__+1632,__BLNK__+1628
shll	$6,__BLNK__+1628,r0
subl3	r0,__BLNK__+1632,__BLNK__+1628
L45:divl3	$4,__BLNK__+1656,__BLNK__+1632
divl3	$64,__BLNK__+1632,__BLNK__+1624
shll	$6,__BLNK__+1624,r0
subl3	r0,__BLNK__+1632,__BLNK__+1624
addl2	__BLNK__+1624,__BLNK__+1640
cmpl	__BLNK__+1628,__BLNK__+1640
jlss	L47
divl3	$4,__BLNK__+1656,__BLNK__+1632
shll	$2,__BLNK__+1632,r0
subl3	r0,__BLNK__+1656,r0
addl3	$1,r0,__BLNK__+1624
movl	__BLNK__+1648,__BLNK__+1652
casel	__BLNK__+1624,$1,$3
.align 1
L2000005:
.word	L48-L2000005
.word	L49-L2000005
.word	L48-L2000005
.word	L50-L2000005
L48:addl2	$1,__BLNK__+1648
jbr	L51
L50:movl	__BLNK__+1648,r0
cmpl	__BLNK__[r0],$-1
jeql	L53
L49:addl2	$1,__BLNK__+1648
L53:addl2	$2,__BLNK__+1648
L51:movl	__BLNK__+1648,r0
movl	__BLNK__+-4[r0],__BLNK__+1656
cmpl	__BLNK__+1628,__BLNK__+1640
jneq	L45
movl	v.2-v.1(r11),r10
movl	-72(fp),r9
movl	__BLNK__+1608,r10
subl3	$1,r0,r0
movl	r0,r9
cmpl	r10,r0
jgtr	L84
L85:movl	__BLNK__+1600,r0
movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
addl2	$1,__BLNK__+1600
aobleq	r9,r10,L85
L84:movl	r9,-72(fp)
movl	r10,v.2-v.1(r11)
subl3	__BLNK__+1612,__BLNK__+1604,r0
incl	r0
jlss	L88
movl	__BLNK__+1600,__BLNK__+1620
movl	L90,v.5+12
pushl	$v.5
callf	$8,_s_wsfe
callf	$4,_e_wsfe
jbr	L13
L47:cmpl	__BLNK__+1608,__BLNK__+1648
jeql	L36
movl	__BLNK__+1648,r0
divl3	$4,__BLNK__+-4[r0],__BLNK__+1632
shll	$2,__BLNK__+1632,r1
subl3	r1,__BLNK__+-4[r0],r0
jneq	L36
movl	v.2-v.1(r11),r10
movl	-60(fp),r9
movl	__BLNK__+1608,r10
subl3	$1,__BLNK__+1648,r0
movl	r0,r9
cmpl	r10,r0
jgtr	L60
L61:movl	__BLNK__+1600,r0
movl	__BLNK__+-4[r10],__BLNK__+-4[r0]
addl2	$1,__BLNK__+1600
aobleq	r9,r10,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,v.3-v.1(r11)
shll	$2,v.3-v.1(r11),r0
movl	__BLNK__+1600,r1
movl	r0,__BLNK__+-4[r1]
addl2	$1,__BLNK__+1604
addl2	$1,__BLNK__+1600
mnegl	v.3-v.1(r11),__BLNK__+1640
movl	v.3-v.1(r11),__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,__BLNK__+1632
shll	$2,__BLNK__+1632,r0
subl3	r0,__BLNK__+1656,r0
jeql	L2000001
L21:divl3	$4,__BLNK__+1660,__BLNK__+1632
shll	$2,__BLNK__+1632,r0
subl3	r0,__BLNK__+1660,r0
jeql	L2000003
divl3	$4,__BLNK__+1656,__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
addl3	$1,r0,__BLNK__+1624
casel	__BLNK__+1624,$1,$3
.align 1
L2000006:
.word	L65-L2000006
.word	L69-L2000006
.word	L67-L2000006
.word	L68-L2000006
jbr	L69
L67:movl	$1,__BLNK__+1624
jbr	L65
L68:movl	__BLNK__+1608,r0
cmpl	__BLNK__[r0],$-1
jneq	L69
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	L15
L72:movl	__BLNK__+1608,r0
movl	__BLNK__+1604,r1
cmpl	__BLNK__+-4[r0],__BLNK__+-4[r1]
jneq	L36
movl	__BLNK__+1600,r1
movl	__BLNK__+-4[r0],__BLNK__+-4[r1]
addl2	$1,__BLNK__+1608
addl2	$1,__BLNK__+1604
addl2	$1,__BLNK__+1600
aobleq	-64(fp),v.2-v.1(r11),L72
jbr	L15
L81:addl2	$1,__BLNK__+1608
movl	__BLNK__+1644,__BLNK__+1604
jbr	L15
L88:addl2	$1,__BLNK__+1604
movl	__BLNK__+1648,__BLNK__+1608
jbr	L15
L36:movl	$1,__BLNK__+1616
L13:ret#0

	.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.