;
;	File:		ATIPrimaryInit.a
;
;	Contains:	xxx put contents here xxx
;
;	Written by:	xxx put writers here xxx
;
;	Copyright:	© 1993 by Apple Computer, Inc., all rights reserved.
;
;	Change History (most recent first):
;
;		 <1>	 11/5/93	fau		first checked in
;		 <1>	10/27/93	fau		first checked in
;		 <1>	10/19/93	fau		first checked in
;
;

;--------------------------------------------------------------------------
;start
;
;Name:		PrimaryInit.a
;Creator:	George D. Wilson Jr.
;Date:		8/10/93
;
;Purpose:	Does the jump into the high C PrimaryInit code.
;
;Category:	INIT Point.
;File:		PrimaryInit.a
;
;Calls:		REALMAIN
;
;Entry:		a0		-		Pointer to slot exec parameter block.
;
;Alters:	See high level code for alters.
;
;Detailed:		This entry point pushes the slot exec parameter block
;				onto the stack and jumps to the high level C.  It upon
;				returning from the C routine simply returns with an rts.
;
;History:
;
;	  Date		Programmer					Modification
;	--------	----------		-----------------------------------------
;
;stop
;------------------------------------------------------------------------*/

;--------------------------------------------------------------------------
;
;								Includes
;
;------------------------------------------------------------------------*/

				INCLUDE	'ROMEqu.a'						;Declaration ROM equates
				INCLUDE	'Slots.a'						;Declaration ROM equates

;--------------------------------------------------------------------------
;
;							Main Entry Point
;
;------------------------------------------------------------------------*/
Begin			MAIN	EXPORT

				IMPORT	REALMAIN

				DC.B	sExec2
				DC.B	sCPU68020
				DC.W	0
				DC.L	theCode-*				; Offset to executable

theCode
				WITH	SEBlock,SpBlock

				move.l	a0,-(sp)				; Move the SEBlock on stack
				jsr		REALMAIN				; Call high level C code
				addq.l	#4,sp					; Drop arguments
				rts

				ENDP
				
				END

;--------------------------------------------------------------------------
;
;							End of Module
;
;------------------------------------------------------------------------*/