xref: /csrg-svn/lib/libc/vax/net/htonl.s (revision 21441)
1*21441Sdist/*
2*21441Sdist * Copyright (c) 1983 Regents of the University of California.
3*21441Sdist * All rights reserved.  The Berkeley software License Agreement
4*21441Sdist * specifies the terms and conditions for redistribution.
5*21441Sdist */
6*21441Sdist
7*21441Sdist#ifndef lint
8*21441Sdiststatic char sccsid[] = "@(#)htonl.s	5.1 (Berkeley) 05/30/85";
9*21441Sdist#endif not lint
10*21441Sdist
119713Ssam/* netorder = htonl(hostorder) */
129713Ssam
139713Ssam#include "DEFS.h"
149713Ssam
159713SsamENTRY(htonl)
169713Ssam	rotl	$-8,4(ap),r0
179713Ssam	insv	r0,$16,$8,r0
189713Ssam	movb	7(ap),r0
199713Ssam	ret
20