xref: /original-bsd/lib/libcompat/4.3/tahoe/nargs.s (revision c95cd016)
1/*
2 * Copyright (c) 1988 Regents of the University of California.
3 * All rights reserved.
4 *
5 * This code is derived from software contributed to Berkeley by
6 * Computer Consoles Inc.
7 *
8 * Redistribution and use in source and binary forms are permitted
9 * provided that this notice is preserved and that due credit is given
10 * to the University of California at Berkeley. The name of the University
11 * may not be used to endorse or promote products derived from this
12 * software without specific prior written permission. This software
13 * is provided ``as is'' without express or implied warranty.
14 */
15
16#if defined(LIBC_SCCS) && !defined(lint)
17_sccsid:.asciz	"@(#)nargs.s	1.2 (Berkeley) 05/23/88"
18#endif /* LIBC_SCCS and not lint */
19
20/* C library -- nargs */
21
22#include "DEFS.h"
23
24ENTRY(nargs, 0)
25	movw	-2(fp),r0  #  removed word
26	subw2	$4,r0
27	shar	$2,r0,r0  #  no. of arguments
28	ret
29