xref: /original-bsd/lib/libc/vax/string/bzero.s (revision 8ca26665)
1/*
2 * Copyright (c) 1983 Regents of the University of California.
3 * All rights reserved.
4 *
5 * %sccs.include.redist.c%
6 */
7
8#if defined(LIBC_SCCS) && !defined(lint)
9	.asciz "@(#)bzero.s	5.6 (Berkeley) 06/01/90"
10#endif /* LIBC_SCCS and not lint */
11
12/* bzero(base, length) */
13
14#include "DEFS.h"
15
16ENTRY(bzero, 0)
17	movl	4(ap),r3
18	jbr	2f
191:
20	subl2	r0,8(ap)
21	movc5	$0,(r3),$0,r0,(r3)
222:
23	movzwl	$65535,r0
24	cmpl	8(ap),r0
25	jgtr	1b
26	movc5	$0,(r3),$0,8(ap),(r3)
27	ret
28