155376Sbostic/*- 2*61183Sbostic * Copyright (c) 1992, 1993 3*61183Sbostic * The Regents of the University of California. All rights reserved. 455376Sbostic * 555376Sbostic * %sccs.include.redist.c% 655376Sbostic */ 755376Sbostic 855376Sbostic#if defined(LIBC_SCCS) && !defined(lint) 9*61183Sbostic .asciz "@(#)modsi3.s 8.1 (Berkeley) 06/04/93" 1055376Sbostic#endif /* LIBC_SCCS and not lint */ 1155376Sbostic 1255376Sbostic#include "DEFS.h" 1355376Sbostic 1455376SbosticENTRY(__modsi3, 0) 1555376Sbostic clrl r0 1655376Sbostic movl 4(fp),r1 1755376Sbostic jgeq 1f 1855376Sbostic mnegl $1,r0 1955376Sbostic1: ediv 8(fp),r0,r1,r0 2055376Sbostic ret 21