sys7.1-doc-wip/QuickDraw/PictUtilities/puPackEntry.a
2019-07-27 22:37:48 +08:00

41 lines
1.0 KiB
Plaintext

;
; File: puPackEntry.a
;
; Contains: PACK 15 entry - Picture Utilities (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
; <1> 5/14/92 tcn first checked in
;
; To Do:
;
LOAD 'StandardEqu.d'
INCLUDE 'DispatchHelperPriv.a'
;___________________________________________________________________________________
;
; PACK 15 entry - Picture Utilities
;
;___________________________________________________________________________________
Pack15 PROC EXPORT
Pack15Handle EQU App2Packs+28
Pack15Globals EQU ExpandMemRec.emPack15Globals
MOVE.L Pack15Handle,A0 ; A0 = handle to PACK
MOVE.L ExpandMem, A1 ; A1 = expanded memory area
ADD.W #Pack15Globals,A1 ; A1 = pointer to PACK use count
_ProcHelper ; let ProcHelper take over
ENDPROC ; Pack15Entry
END ; of file