4.3BSD - /usr/src/lib/libc/vax/net/htonl.c

   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  "@(#)htonl.c	5.3 (Berkeley) 3/9/86"
   9: #endif LIBC_SCCS
  10: 
  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

Defined functions