Cross Reference: swab.S
xref: /src/lib/libc/arch/m68k/string/swab.S
  • Home
  • History
  • AnnotateAnnotate
  • Line#
  • Navigate
  • Raw
  • Download
  • only in /src/lib/libc/arch/m68k/string/
swab.S revision 1.7
11.7Sthorpej/*	$NetBSD: swab.S,v 1.7 1999/10/25 23:48:16 thorpej Exp $	*/
21.4Sthorpej
31.6Sjtc#include <machine/asm.h>
41.1Smycroft
51.1SmycroftENTRY(swab)
61.7Sthorpej	movl	%sp@(4),%a0		| source
71.7Sthorpej	movl	%sp@(8),%a1		| destination
81.7Sthorpej	movl	%sp@(12),%d0		| count
91.7Sthorpej	lsrl	#1,%d0			| count is in bytes; we need words
101.5Sjtc	jeq	swdone
111.1Smycroft
121.1Smycroftswloop:
131.7Sthorpej	movw	%a0@+,%d1
141.7Sthorpej	rorw	#8,%d1
151.7Sthorpej	movw	%d1,%a1@+
161.7Sthorpej	subql	#1,%d0
171.5Sjtc	jne	swloop
181.1Smycroft
191.1Smycroftswdone:
201.1Smycroft	rts
21

Indexes created Mon Nov 10 17:20:41 GMT 2025