[unix-history] / .ref-BSD-1 / px / 17ind.s

/
/ INDS
/
_IND2:
	mov	*(sp)+,-(sp)
	return
_IND4:
	mov	(sp),r0
	tst	-(sp)
	mov	sp,r2
	mov	(r0)+,(r2)+
	mov	(r0)+,(r2)+
	return
_IND1:
	movb	*(sp),r0
	mov	r0,(sp)
	return
_IND8:
	mov	$8,r3
_IND:
	bne	1f
	mov	(lc)+,r3
1:
	mov	(sp)+,r0
_INDcon:
	add	r3,r0
	asr	r3
	bcc	1f
	movb	-(r0),r1
	bic	$!377,r1
	mov	r1,-(sp)		/ clean for sets, e.g.
1:
	inc	r3
	br	2f
1:
	mov	-(r0),-(sp)
2:
	sob	r3,1b
	return
Commit	Line	Data
4e754410 BJ	1	/
	2	/ INDS
	3	/
	4	_IND2:
	5	mov *(sp)+,-(sp)
	6	return
	7	_IND4:
	8	mov (sp),r0
	9	tst -(sp)
	10	mov sp,r2
	11	mov (r0)+,(r2)+
	12	mov (r0)+,(r2)+
	13	return
	14	_IND1:
	15	movb *(sp),r0
	16	mov r0,(sp)
	17	return
	18	_IND8:
	19	mov $8,r3
	20	_IND:
	21	bne 1f
	22	mov (lc)+,r3
	23	1:
	24	mov (sp)+,r0
	25	_INDcon:
	26	add r3,r0
	27	asr r3
	28	bcc 1f
	29	movb -(r0),r1
	30	bic $!377,r1
	31	mov r1,-(sp) / clean for sets, e.g.
	32	1:
	33	inc r3
	34	br 2f
	35	1:
	36	mov -(r0),-(sp)
	37	2:
	38	sob r3,1b
	39	return