usr/src/lib/libc/tahoe/net/htons.s

/*
 * Copyright (c) 1988 Regents of the University of California.
 * All rights reserved.
 *
 * %sccs.include.redist.c%
 */

#if defined(LIBC_SCCS) && !defined(lint)
        .asciz "@(#)htons.s     1.4 (Berkeley) %G%"
#endif /* LIBC_SCCS and not lint */

/* hostorder = htons(netorder) */

#include "DEFS.h"

ENTRY(htons, 0)
        movzwl  6(fp),r0
        ret