Return to movb.s CVS log

Up to [Power 6/32 Unix Tahoe 4.2BSD] / cci / d / entry

Power 6/32 Unix version 1.2b

/*	moveb test - checks all combinations		*/

	.globl	_movball

_movball:
	callf	$4,_setjmp	/* save context for return from error */
	movab	_movball,_stpc	/* save subtest starting address */
	movl	$1,_subtst	/* subtest number */
	movl	$1,_no_opr	/* number of operands in use */
	movl	$0xaabbccdd,l1
	movl	l1,_opr /* first operand */
0:	movl	$0xffffffff,l2
	movb	l1,l2
	cmpl	$0xaaffffff,l2
	jeql	nxt1
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xaaffffff,_expected /* expected data */
	jmp	*badrtn
nxt1:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am2:	callf	$4,_setjmp	/* save context for return from error */
	movab	am2,_stpc	/* save subtest starting address */
	movl	$2,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1,l2+1
	cmpl	$0xffaaffff,l2
	jeql	nxt2
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffaaffff,_expected /* expected data */
	jmp	*badrtn
nxt2:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am3:	callf	$4,_setjmp	/* save context for return from error */
	movab	am3,_stpc	/* save subtest starting address */
	movl	$3,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1,l2+2
	cmpl	$0xffffaaff,l2
	jeql	nxt3
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffffaaff,_expected /* expected data */
	jmp	*badrtn
nxt3:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am4:	callf	$4,_setjmp	/* save context for return from error */
	movab	am4,_stpc	/* save subtest starting address */
	movl	$4,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1,l2+3
	cmpl	$0xffffffaa,l2
	jeql	nxt4
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffffffaa,_expected /* expected data */
	jmp	*badrtn
nxt4:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am5:	callf	$4,_setjmp	/* save context for return from error */
	movab	am5,_stpc	/* save subtest starting address */
	movl	$5,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+1,l2
	cmpl	$0xbbffffff,l2
	jeql	nxt5
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xbbffffff,_expected /* expected data */
	jmp	*badrtn
nxt5:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am6:	callf	$4,_setjmp	/* save context for return from error */
	movab	am6,_stpc	/* save subtest starting address */
	movl	$6,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+1,l2+1
	cmpl	$0xffbbffff,l2
	jeql	nxt6
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffbbffff,_expected /* expected data */
	jmp	*badrtn
nxt6:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am7:	callf	$4,_setjmp	/* save context for return from error */
	movab	am7,_stpc	/* save subtest starting address */
	movl	$7,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+1,l2+2
	cmpl	$0xffffbbff,l2
	jeql	nxt7
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffffbbff,_expected /* expected data */
	jmp	*badrtn
nxt7:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am8:	callf	$4,_setjmp	/* save context for return from error */
	movab	am8,_stpc	/* save subtest starting address */
	movl	$8,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+1,l2+3
	cmpl	$0xffffffbb,l2
	jeql	nxt8
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffffffbb,_expected /* expected data */
	jmp	*badrtn
nxt8:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am9:	callf	$4,_setjmp	/* save context for return from error */
	movab	am9,_stpc	/* save subtest starting address */
	movl	$9,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+2,l2
	cmpl	$0xccffffff,l2
	jeql	nxt9
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xccffffff,_expected /* expected data */
	jmp	*badrtn
nxt9:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am10:	callf	$4,_setjmp	/* save context for return from error */
	movab	am10,_stpc	/* save subtest starting address */
	movl	$0xa,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+2,l2+1
	cmpl	$0xffccffff,l2
	jeql	nxt10
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffccffff,_expected /* expected data */
	jmp	*badrtn
nxt10:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am11:	callf	$4,_setjmp	/* save context for return from error */
	movab	am11,_stpc	/* save subtest starting address */
	movl	$0xb,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+2,l2+2
	cmpl	$0xffffccff,l2
	jeql	nxt11
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffffccff,_expected /* expected data */
	jmp	*badrtn
nxt11:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am12:	callf	$4,_setjmp	/* save context for return from error */
	movab	am12,_stpc	/* save subtest starting address */
	movl	$0xc,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+2,l2+3
	cmpl	$0xffffffcc,l2
	jeql	nxt12
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffffffcc,_expected /* expected data */
	jmp	*badrtn
nxt12:	
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am13:	callf	$4,_setjmp	/* save context for return from error */
	movab	am13,_stpc	/* save subtest starting address */
	movl	$0xd,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+3,l2
	cmpl	$0xddffffff,l2
	jeql	nxt13
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xddffffff,_expected /* expected data */
	jmp	*badrtn
nxt13:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am14:	callf	$4,_setjmp	/* save context for return from error */
	movab	am14,_stpc	/* save subtest starting address */
	movl	$0xe,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+3,l2+1
	cmpl	$0xffddffff,l2
	jeql	nxt14
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffddffff,_expected /* expected data */
	jmp	*badrtn
nxt14:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am15:	callf	$4,_setjmp	/* save context for return from error */
	movab	am15,_stpc	/* save subtest starting address */
	movl	$0xf,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+3,l2+2
	cmpl	$0xffffddff,l2
	jeql	nxt15
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffffddff,_expected /* expected data */
	jmp	*badrtn
nxt15:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am16:	callf	$4,_setjmp	/* save context for return from error */
	movab	am16,_stpc	/* save subtest starting address */
	movl	$0x10,_subtst	/* subtest number */
0:	movl	$0xffffffff,l2
	movb	l1+3,l2+3
	cmpl	$0xffffffdd,l2
	jeql	nxt16
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l2,_actual	/* actual data */
	movl	$0xffffffdd,_expected /* expected data */
	jmp	*badrtn
nxt16:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am17:	callf	$4,_setjmp	/* save context for return from error */
	movab	am17,_stpc	/* save subtest starting address */
	movl	$0x11,_subtst	/* subtest number */
	movl	$0xaabbccdd,_opr /* first operand */
0:	movl	$0xaabbccdd,l1
	movb	l1,l1+1
	cmpl	$0xaaaaccdd,l1
	jeql	nxt17
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l1,_actual	/* actual data */
	movl	$0xaaaaccdd,_expected /* expected data */
	jmp	*badrtn
nxt17:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am18:	callf	$4,_setjmp	/* save context for return from error */
	movab	am18,_stpc	/* save subtest starting address */
	movl	$0x12,_subtst	/* subtest number */
	movl	$0xaabbccdd,_opr /* first operand */
0:	movl	$0xaabbccdd,l1
	movb	l1,l1+3
	cmpl	$0xaabbccaa,l1
	jeql	nxt18
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l1,_actual	/* actual data */
	movl	$0xaabbccaa,_expected /* expected data */
	jmp	*badrtn
nxt18:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am19:	callf	$4,_setjmp	/* save context for return from error */
	movab	am19,_stpc	/* save subtest starting address */
	movl	$0x13,_subtst	/* subtest number */
	movl	$0xaabbccdd,_opr /* first operand */
0:	movl	$0xaabbccdd,l1
	movb	l1+2,l1
	cmpl	$0xccbbccdd,l1
	jeql	nxt19
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l1,_actual	/* actual data */
	movl	$0xccbbccdd,_expected /* expected data */
	jmp	*badrtn
nxt19:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
am20:	callf	$4,_setjmp	/* save context for return from error */
	movab	am20,_stpc	/* save subtest starting address */
	movl	$0x14,_subtst	/* subtest number */
0:	movl	$0xaabbccdd,l1
	movb	l1+3,l1+1
	cmpl	$0xaaddccdd,l1
	jeql	nxt20
	bbs	$0,_scoplp,0b	/* if set scope loop on error */
	movl	$1,_ercode	/* error code data miscompare */
	movl	l1,_actual	/* actual data */
	movl	$0xaabbccdd,_expected /* expected data */
	jmp	*badrtn
nxt20:
	bbs	$0,_force_lp,0b	/* if set loop on last subtest */
	jmp	*return		/* good, return to monitor */


	.align	2
l1:
	.long	0xaabbccdd
l2:
	.long	0xffffffff	

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