
		;   MODU.A
		;
		;   (c)Copyright 1990, Matthew Dillon, All Rights Reserved
		;
		;   D0/D1 -> 32 signed modulus
		;   32/32 -> 32 signed modulus

		section text,code

		xdef	__modu
		xref	__divu

__modu: 	bsr	__divu
		move.l	D1,D0		; modulus return
		rts

		END

