File:  [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst / t03.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
L57:
	.long	0x00000000	# .float 0
	.align	2
L59:
	.long	0x3556BF95	# .float 2.e-07
	.align	2
L60:
	.long	1
	.align	2
L61:
	.long	3
	.align	2
L65:
	.long	2
	.align	2
L72:
	.long	0xA5000000	# .float -2.7755576e-17
	.align	2
L73:
	.long	0x25000000	# .float 2.7755576e-17
	.align	2
L75:
	.long	4
	.align	2
L77:
	.long	0xB44CCCCD	# .float -4.7683717e-08
	.align	2
L78:
	.long	0x344CCCCD	# .float 4.7683717e-08
	.align	2
L80:
	.long	5
	.align	2
L82:
	.long	6
	.align	2
L87:
	.long	7
	.align	2
L91:
	.long	0x43C80000	# .float 100
	.align	2
L93:
	.long	8
	.align	2
L95:
	.long	0xC0800000	# .float -1
	.align	2
L98:
	.long	9
	.align	2
L100:
	.long	0x40C00000	# .float 1.5
	.align	2
L101:
	.long	0x41400000	# .float 3
	.align	2
L102:
	.long	0x3ECCCCCD	# .float .1
	.align	2
L103:
	.long	0x41A00000	# .float 5
	.align	2
L106:
	.long	10
	.align	2
L108:
	.long	0xC4CA8000	# .float -405
	.align	2
L111:
	.long	11
	.align	2
L113:
	.long	0x408CCCCD	# .float 1.1
	.align	2
L114:
	.long	0x4099999A	# .float 1.2
	.align	2
L115:
	.long	12
	.align	2
L117:
	.long	13
	.align	2
L119:
	.long	14
	.align	2
L121:
	.long	15
	.align	2
L123:
	.long	16
	.align	2
L125:
	.long	17
	.align	2
L129:
	.long	0x28101D7D	# .float 2.e-15
	.align	2
L130:
	.long	18
	.align	2
L132:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L133:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L134:
	.long	0x28101D7D, 0x00000000	# .double 2.0000000072549874e-15
	.align	2
L135:
	.long	19
	.align	2
L139:
	.long	0x28101D7D	# .float 2.e-15
	.align	2
L140:
	.long	20
	.align	2
L142:
	.long	0xA5000000, 0x00000000	# .double -2.7755575615628914e-17
	.align	2
L143:
	.long	0x25000000, 0x00000000	# .double 2.7755575615628914e-17
	.align	2
L144:
	.long	0x28101D7D, 0x00000000	# .double 2.0000000072549874e-15
	.align	2
L145:
	.long	21
	.align	2
L147:
	.long	0xB44CCCCC, 0xCE000000	# .double -4.7683715836965845e-08
	.align	2
L148:
	.long	0x344CCCCC, 0xCE000000	# .double 4.7683715836965845e-08
	.align	2
L149:
	.long	0x28101D7D, 0x00000000	# .double 2.0000000072549874e-15
	.align	2
L150:
	.long	22
	.align	2
L152:
	.long	23
	.align	2
L154:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L155:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L156:
	.long	0x28101D7D, 0x00000000	# .double 2.0000000072549874e-15
	.align	2
L157:
	.long	24
	.align	2
L159:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L160:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L161:
	.long	0x43C80000, 0x00000000	# .double 100
	.align	2
L162:
	.long	0x28101D7D, 0x00000000	# .double 2.0000000072549874e-15
	.align	2
L163:
	.long	25
	.align	2
L165:
	.long	0xC0800000, 0x00000000	# .double -1
	.align	2
L167:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L168:
	.long	0x28101D7D, 0x00000000	# .double 2.0000000072549874e-15
	.align	2
L169:
	.long	26
	.align	2
L171:
	.long	0x40C00000, 0x00000000	# .double 1.5
	.align	2
L172:
	.long	0x41400000, 0x00000000	# .double 3
	.align	2
L173:
	.long	0x3ECCCCCC, 0xCCCCCCCC	# .double .099999999999999998
	.align	2
L174:
	.long	0x41A00000, 0x00000000	# .double 5
	.align	2
L175:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L176:
	.long	0x28101D7D, 0x00000000	# .double 2.0000000072549874e-15
	.align	2
L177:
	.long	27
	.align	2
L179:
	.long	0xC4CA8000, 0x00000000	# .double -405
	.align	2
L180:
	.long	0x00000000, 0x00000000	# .double 0
	.align	2
L181:
	.long	0x28101D7D, 0x00000000	# .double 2.0000000072549874e-15
	.align	2
L182:
	.long	28
	.align	2
L184:
	.long	0x408CCCCC, 0xCCCCCCCC	# .double 1.1
	.align	2
L185:
	.long	0x40999999, 0x99999999	# .double 1.2
	.align	2
L186:
	.long	29
	.align	2
L188:
	.long	30
	.align	2
L190:
	.long	31
	.align	2
L192:
	.long	32
	.align	2
L194:
	.long	33
	.align	2
L196:
	.long	34
	.data	2
	.data	1
	.data	0
	.globl	_MAIN_
	.globl	_e_
	.align	2
	.stabs	"t03.f",0x64,0,0,0
.text
.globl	_MAIN_
.set	LF1,100
.set	LWM1,0x180C
.align	1
_MAIN_:.word	LWM1
subl3	$LF1,fp,sp
movl	$v.1,r11
movl	L57,r0
cmpf2	r0,L59
jleq	L15
pushl	$L61
pushl	$L60
callf	$12,_e_
L15:movl	L57,r0
cmpf2	r0,L59
jleq	L16
pushl	$L61
pushl	$L65
callf	$12,_e_
L16:movl	L57,r0
cmpf2	r0,L59
jleq	L9993
pushl	$L61
pushl	$L61
callf	$12,_e_
L9993:movl	L73,r0
cmpf2	r0,L59
jleq	L9991
pushl	$L61
pushl	$L75
callf	$12,_e_
L9991:movl	L78,r0
cmpf2	r0,L59
jleq	L20
pushl	$L61
pushl	$L80
callf	$12,_e_
L20:movl	L57,r0
cmpf2	r0,L59
jleq	L21
pushl	$L61
pushl	$L87
callf	$12,_e_
L21:movl	L57,r0
ldf	r0
divf	L91
cmpf	L59
jleq	L22
pushl	$L61
pushl	$L93
callf	$12,_e_
L22:movl	L95,-56(fp)
subl3	$1,$-1,r0
cvlf	r0
addf	-56(fp)
addf	-56(fp)
addf	-56(fp)
addf	-56(fp)
stf	r0
cvlf	$6
addf	r0
stf	-60(fp)
cmpf2	L57,-60(fp)
jgtr	L9985
movl	-60(fp),r0
jbr	L9984
L9985:lnf	-60(fp)
stf	r0
L9984:cmpf2	r0,L59
jleq	L23
pushl	$L61
pushl	$L98
callf	$12,_e_
L23:movl	L100,v.2-v.1(r11)
movl	L101,v.3-v.1(r11)
movl	L102,v.4-v.1(r11)
ldf	v.3-v.1(r11)
mulf	L103
mulf	v.4-v.1(r11)
subf	v.2-v.1(r11)
stf	-64(fp)
cmpf2	L57,-64(fp)
jgtr	L9983
movl	-64(fp),r0
jbr	L9982
L9983:lnf	-64(fp)
stf	r0
L9982:cmpf2	r0,L59
jleq	L24
pushl	$L61
pushl	$L106
callf	$12,_e_
L24:ldf	v.3-v.1(r11)
mulf	v.3-v.1(r11)
mulf	v.3-v.1(r11)
divf	v.4-v.1(r11)
mulf	v.2-v.1(r11)
addf	L108
stf	-68(fp)
cmpf2	L57,-68(fp)
jgtr	L9981
movl	-68(fp),r0
jbr	L9980
L9981:lnf	-68(fp)
stf	r0
L9980:cmpf2	r0,L59
jleq	L25
pushl	$L61
pushl	$L111
callf	$12,_e_
L25:movl	L113,v.2-v.1(r11)
movl	L114,v.3-v.1(r11)
cmpf2	v.3-v.1(r11),v.2-v.1(r11)
jgeq	L26
pushl	$L61
pushl	$L115
callf	$12,_e_
L26:cmpf2	v.3-v.1(r11),v.2-v.1(r11)
jgtr	L27
pushl	$L61
pushl	$L117
callf	$12,_e_
L27:cmpf2	v.3-v.1(r11),v.2-v.1(r11)
jneq	L28
pushl	$L61
pushl	$L119
callf	$12,_e_
L28:cmpf2	v.2-v.1(r11),v.2-v.1(r11)
jeql	L29
pushl	$L61
pushl	$L121
callf	$12,_e_
L29:cmpf2	v.2-v.1(r11),v.3-v.1(r11)
jlss	L30
pushl	$L61
pushl	$L123
callf	$12,_e_
L30:cmpf2	v.2-v.1(r11),v.3-v.1(r11)
jleq	L31
pushl	$L61
pushl	$L125
callf	$12,_e_
L31:movl	L57,r0
cmpf2	r0,L129
jleq	L32
pushl	$L61
pushl	$L130
callf	$12,_e_
L32:movl	L132+4,r1
movl	L132,r0
cmpd2	r0,L134
jleq	L33
pushl	$L61
pushl	$L135
callf	$12,_e_
L33:movl	L57,r0
cmpf2	r0,L139
jleq	L9973
pushl	$L61
pushl	$L140
callf	$12,_e_
L9973:movl	L143+4,r1
movl	L143,r0
cmpd2	r0,L144
jleq	L9971
pushl	$L61
pushl	$L145
callf	$12,_e_
L9971:movl	L148+4,r1
movl	L148,r0
cmpd2	r0,L149
jleq	L37
pushl	$L61
pushl	$L150
callf	$12,_e_
L37:movl	L154+4,r1
movl	L154,r0
cmpd2	r0,L156
jleq	L38
pushl	$L61
pushl	$L157
callf	$12,_e_
L38:movl	L159+4,r1
movl	L159,r0
ldd	r0
divd	L161
cmpd	L162
jleq	L39
pushl	$L61
pushl	$L163
callf	$12,_e_
L39:movl	L165+4,-72(fp)
movl	L165,-76(fp)
subl3	$1,$-1,r0
cvlf	r0
addf	L95
stf	r0
ldfd	r0
addd	-76(fp)
addd	-76(fp)
addd	-76(fp)
std	r0
cvld	$6
addd	r0
std	-84(fp)
cmpd2	L167,-84(fp)
jgtr	L9965
movl	-80(fp),r1
movl	-84(fp),r0
jbr	L9964
L9965:lnd	-84(fp)
std	r0
L9964:cmpd2	r0,L168
jleq	L40
pushl	$L61
pushl	$L169
callf	$12,_e_
L40:movl	L171+4,v.5-v.1+4(r11)
movl	L171,v.5-v.1(r11)
movl	L172+4,v.6-v.1+4(r11)
movl	L172,v.6-v.1(r11)
movl	L173+4,v.7-v.1+4(r11)
movl	L173,v.7-v.1(r11)
ldd	v.6-v.1(r11)
muld	L174
muld	v.7-v.1(r11)
subd	v.5-v.1(r11)
std	-92(fp)
cmpd2	L175,-92(fp)
jgtr	L9963
movl	-88(fp),r1
movl	-92(fp),r0
jbr	L9962
L9963:lnd	-92(fp)
std	r0
L9962:cmpd2	r0,L176
jleq	L41
pushl	$L61
pushl	$L177
callf	$12,_e_
L41:ldd	v.6-v.1(r11)
muld	v.6-v.1(r11)
muld	v.6-v.1(r11)
divd	v.7-v.1(r11)
muld	v.5-v.1(r11)
addd	L179
std	-100(fp)
cmpd2	L180,-100(fp)
jgtr	L9961
movl	-96(fp),r1
movl	-100(fp),r0
jbr	L9960
L9961:lnd	-100(fp)
std	r0
L9960:cmpd2	r0,L181
jleq	L42
pushl	$L61
pushl	$L182
callf	$12,_e_
L42:movl	L184+4,v.5-v.1+4(r11)
movl	L184,v.5-v.1(r11)
movl	L185+4,v.6-v.1+4(r11)
movl	L185,v.6-v.1(r11)
cmpd2	v.6-v.1(r11),v.5-v.1(r11)
jgeq	L43
pushl	$L61
pushl	$L186
callf	$12,_e_
L43:cmpd2	v.6-v.1(r11),v.5-v.1(r11)
jgtr	L44
pushl	$L61
pushl	$L188
callf	$12,_e_
L44:cmpd2	v.6-v.1(r11),v.5-v.1(r11)
jneq	L45
pushl	$L61
pushl	$L190
callf	$12,_e_
L45:cmpd2	v.5-v.1(r11),v.5-v.1(r11)
jeql	L46
pushl	$L61
pushl	$L192
callf	$12,_e_
L46:cmpd2	v.5-v.1(r11),v.6-v.1(r11)
jlss	L47
pushl	$L61
pushl	$L194
callf	$12,_e_
L47:cmpd2	v.5-v.1(r11),v.6-v.1(r11)
jleq	L14
pushl	$L61
pushl	$L196
callf	$12,_e_
L14:ret#0

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


unix.superglobalmegacorp.com

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