xref: /csrg-svn/lib/libc/vax/net/ntohl.s (revision 34425)
1/*
2 * Copyright (c) 1983 Regents of the University of California.
3 * All rights reserved.  The Berkeley software License Agreement
4 * specifies the terms and conditions for redistribution.
5 */
6
7#ifdef LIBC_SCCS
8_sccsid:.asciz	"@(#)ntohl.s	5.4 (Berkeley) 05/22/88"
9#endif LIBC_SCCS
10
11/* hostorder = ntohl(netorder) */
12
13#include "DEFS.h"
14
15ENTRY(ntohl, 0)
16	rotl	$-8,4(ap),r0
17	insv	r0,$16,$8,r0
18	movb	7(ap),r0
19	ret
20