1/*- 2 * Copyright (c) 1992, 1993 3 * The Regents of the University of California. All rights reserved. 4 * 5 * %sccs.include.redist.c% 6 */ 7 8#if defined(LIBC_SCCS) && !defined(lint) 9 .asciz "@(#)modsi3.s 8.1 (Berkeley) 06/04/93" 10#endif /* LIBC_SCCS and not lint */ 11 12#include "DEFS.h" 13 14ENTRY(__modsi3, 0) 15 clrl r0 16 movl 4(fp),r1 17 jgeq 1f 18 mnegl $1,r0 191: ediv 8(fp),r0,r1,r0 20 ret 21