[unix-history] / usr / src / lib / libc / vax / net / htonl.s

/*
 * Copyright (c) 1983 Regents of the University of California.
 * All rights reserved.  The Berkeley software License Agreement
 * specifies the terms and conditions for redistribution.
 */

#ifndef lint
_sccsid:.asciz	"@(#)htonl.s	5.2 (Berkeley) %G%"
#endif not lint

/* netorder = htonl(hostorder) */

#include "DEFS.h"

ENTRY(htonl)
	rotl	$-8,4(ap),r0
	insv	r0,$16,$8,r0
	movb	7(ap),r0
	ret
Commit	Line	Data
586c39b1 DF	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	#ifndef lint
7f0e38f0	8	_sccsid:.asciz "@(#)htonl.s 5.2 (Berkeley) %G%"
586c39b1 DF	9	#endif not lint
586c39b1 DF	10
4e132424 SL	11	/* netorder = htonl(hostorder) */
	12
	13	#include "DEFS.h"
	14
	15	ENTRY(htonl)
	16	rotl $-8,4(ap),r0
	17	insv r0,$16,$8,r0
	18	movb 7(ap),r0
	19	ret