*********************************************************************************
*										*
*	TestNull -- Test program for forcing out a division by zero exception	*
*										*
*	$VER: TestNull.a 37.1 (12.8.92) -- Exception #5 handler test example	*
*										*
*	Copyright (C) 1992 Compos Mentis Software Systems -- Jesper Kehlet	*
*										*
*********************************************************************************

		include		'dos/dos.i'

		section		TestNull,code

*********************************************************************************
*										*
*	This is the main stuff -- the nasty exception provocateur		*
*										*
*********************************************************************************

		moveq		#0,d0			; Denominator must be zero
		divu		d0,d1			; Trap it...

		rts					; If we get here, it's OK

		end