*	Created by TT-Digger v6.1
*	Wed Jan 19 20:02:12 2000

*	TTD_6.1

	ds.b	000bc8
clear_CPU_cache:
	move.l	d0,-(a7)			; 2F00		     /ø
	move.l	a0,-(a7)			; 2F08		     /ø
	move.l	_cookies.w,d0			; 203805A0	      8øø
	beq.s	done_clear_cache		; 6732		     g2
	movea.l	d0,a0				; 2040		      @
L00BD4:
	move.l	(a0),d0				; 2010		      ø
	beq.s	done_clear_cache		; 672C		     g,
	addq.l	#8,a0				; 5088		     Pø
	cmpi.l	#$5F435055,d0			; 0C805F435055	     øø_CPU
	bne.s	L00BD4				; 66F2		     fø
	move	-(a0),d0			; 3020		     0 
	cmpi	#$0014,d0			; 0C400014	     ø@øø
	bcs.s	done_clear_cache		; 651A		     eø
	cmpi	#$0028,d0			; 0C400028	     ø@ø(
	bcc.s	clear_cache_040			; 640E		     dø
	movec	cacr,d0				; 4E7A0002	     Nzøø
	ori	#$0808,d0			; 00400808	     ø@øø
	movec	d0,cacr				; 4E7B0002	     N{øø
	bra.s	done_clear_cache		; 6006		     `ø

clear_cache_040:
	dc.w	$F478				; F478		     øx
	dc.w	$F498				; F498		     øø
	nop					; 4E71		     Nq
done_clear_cache:
	movea.l	(a7)+,a0			; 205F		      _
	move.l	(a7)+,d0			; 201F		      ø
	rts					; 4E75		     Nu


