xref: /netbsd-src/lib/libc/arch/m68k/string/swab.S (revision 76dfffe33547c37f8bdd446e3e4ab0f3c16cea4b)
1/*	$NetBSD: swab.S,v 1.4 1995/11/17 20:21:28 thorpej Exp $	*/
2
3#include "DEFS.h"
4
5ENTRY(swab)
6	movl	sp@(4),a0		| source
7	movl	sp@(8),a1		| destination
8	movl	sp@(12),d0		| count
9	lsrl	#1,d0			| count is in bytes; we need words
10	beq	swdone
11
12swloop:
13	movw	a0@+,d1
14	rorw	#8,d1
15	movw	d1,a1@+
16	subql	#1,d0
17	bne	swloop
18
19swdone:
20	rts
21