Return to t07.t2 CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / usr / src / usr.bin / f77 / f77pass1 / tst

Power 6/32 Unix version 1.21

	.data	0
	.align	2
L19:
	.long	1
	.align	2
L20:
	.long	7
	.align	2
L21:
	.long	2
	.align	2
L23:
	.long	0x41600000	# .float 3.5
	.align	2
L25:
	.long	3
	.align	2
L27:
	.long	0x41900000	# .float 4.5
	.align	2
L29:
	.long	4
	.data	2
	.data	1
	.data	0
	.globl	_MAIN_
	.comm	_t7_,8
	.globl	_e_
	.align	2
	.stabs	"t07.f",0x64,0,0,0
.text
.globl	_MAIN_
.set	LF1,52
.set	LWM1,0x1800
.align	1
_MAIN_:.word	LWM1
subl3	$LF1,fp,sp
movl	$v.1,r11
movl	$6,v.2-v.1(r11)
movl	v.2-v.1(r11),_t7_
cmpl	_t7_,$6
jeql	L15
pushl	$L20
pushl	$L19
callf	$12,_e_
L15:movl	$6,_t7_
movl	_t7_,v.2-v.1(r11)
cmpl	v.2-v.1(r11),$6
jeql	L16
pushl	$L20
pushl	$L21
callf	$12,_e_
L16:movl	L23,v.3-v.1(r11)
movl	v.3-v.1(r11),_t7_+4
cmpf2	_t7_+4,L23
jeql	L17
pushl	$L20
pushl	$L25
callf	$12,_e_
L17:movl	L27,_t7_+4
movl	_t7_+4,v.3-v.1(r11)
cmpf2	v.3-v.1(r11),L27
jeql	L14
pushl	$L20
pushl	$L29
callf	$12,_e_
L14:ret#0

	.data	2
	.align	2
v.2:
	.space	4
	.align	2
v.3:
	.space	4
	.set	v.1,v.3

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