1/* 2 * Copyright (c) 1988, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * %sccs.include.redist.c% 6 * 7 * This code is derived from software contributed to Berkeley by 8 * Computer Consoles Inc. 9 */ 10 11#if defined(LIBC_SCCS) && !defined(lint) 12 .asciz "@(#)nargs.s 8.1 (Berkeley) 06/04/93" 13#endif /* LIBC_SCCS and not lint */ 14 15/* C library -- nargs */ 16 17#include "DEFS.h" 18 19ENTRY(nargs, 0) 20 movl (fp),r0 21 movw -2(r0),r0 # removed word 22 subw2 $4,r0 23 shar $2,r0,r0 # no. of arguments 24 ret 25