.TITLE	htons

	.entry	htons,^m<>
	rotl	#8,4(ap),r0
	movb	5(ap),r0
	movzwl	r0,r0
	ret

	.end