; Start of parallel Mandelbrot iterator
; By Neil A Carson, RiscBSD kernel team, 1995

;
; Put ourselves in the module header area, so we get to go at the top of the
; code. On loading, please fill the word pointed to by using the first word
; of the module as an offset with the start address of the screen memory.
; Then branch into the *second* word of the module, with R0 pointing to an
; array of records, to start scanning the Mandelbrot set.
;

	AREA	|!!!Module$$Header|, CODE, READONLY
|module$$header|
	DCD	(screen				-	|module$$header|)/4
	DCD	(count_val			-	|module$$header|)/4
	DCD	(maxiters			-	|module$$header|)/4
	B	scan

	GET	s.recurse			; So that screen doesn't need
						; to be relocated.
	GET	s.scan				; So we know where to put
						; count_val

	END
