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