sys7.1-doc-wip/Toolbox/DataPubsMgr/dpPackEntry.a
2019-07-27 22:37:48 +08:00

40 lines
997 B
Plaintext

;
; File: dpPackEntry.a
;
; Contains: PACK 11 entry - Edition Manager (stolen from MiscPatches.a)
;
; Written by: Tim Nichols
;
; Copyright: © 1992 by Apple Computer, Inc., all rights reserved.
;
; This file is used in these builds: ROM
;
; Change History (most recent first):
;
; <1> 5/20/92 TN first checked in
;
; To Do:
;
LOAD 'StandardEqu.d'
INCLUDE 'DispatchHelperPriv.a'
;___________________________________________________________________________________
;
; PACK 11 entry - Edition Manager
;
;___________________________________________________________________________________
Pack11 PROC EXPORT
Pack11Handle EQU App2Packs+12
Pack11Globals EQU ExpandMemRec.emPack11Globals
MOVE.L Pack11Handle,A0 ; A0 = handle to PACK
MOVE.L ExpandMem, A1 ; A1 = expanded memory area
ADD.W #Pack11Globals,A1 ; A1 = pointer to PACK use count
_ProcHelper ; let ProcHelper take over
ENDPROC ; Pack11Entry
END ; of file