aboutsummaryrefslogtreecommitdiff
path: root/unix/as.vax/aaddks.s
blob: 8000beb04d8ffcda313855b766ed4d23ab4f43a3 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
.data	0
	.set	LWM1,0xfc0
	.data	2
	.data	1
	.data	0
	.globl	_aaddks_
	.data	2
v.2:
	.space	4
	.set	v.1,v.2

	.stabs	"aaddks.f",0x64,0,0,0
	.text
	.globl	_aaddks_
	.set	LF1,12
_aaddks_:
	.word	LWM1
	subl2	$LF1,sp
	jbr	L12
	.align	1
L12:
	moval	v.1,r11
	movl	*16(ap),-4(fp)
	subl2	$2,4(ap)
	movl	*16(ap),-8(fp)
	subl2	$2,12(ap)
	movl	*16(ap),-12(fp)
	movl	v.2-v.1(r11),r10
	movl	4(ap),r9
	movl	8(ap),r8
	movl	12(ap),r7
	movl	-12(fp),r6
	movl	$1,r10
	cmpl	r6,r10
	jlss	L20
L21:
	addw3	(r9)[r10],(r8),(r7)[r10]
	aobleq	r6,r10,L21
L20:
	ret