mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-12-13 11:29:15 +00:00
88 lines
2.0 KiB
Plaintext
88 lines
2.0 KiB
Plaintext
|
;
|
||
|
|
; 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
|
||
|
|
;
|
||
|
|
;------------------------------------------------------------------------*/
|