mirror of
https://github.com/elliotnunn/sys7.1-doc-wip.git
synced 2024-05-31 13:41:30 +00:00
82 lines
1.8 KiB
Plaintext
82 lines
1.8 KiB
Plaintext
;
|
||
; File: EditionsPrivate.a
|
||
;
|
||
; Contains: subset of EditionsPrivate.p that is needed in assembly
|
||
;
|
||
; Written by: Nick Kledzik
|
||
;
|
||
; Copyright: © 1990 by Apple Computer, Inc., all rights reserved.
|
||
;
|
||
; Change History (most recent first):
|
||
;
|
||
; <7> 1/30/91 gbm sab, #38: Change the ‘already including this file’ variable to
|
||
; all uppercase (for security reasons)
|
||
; <6> 5/31/90 ngk update globals record structure
|
||
; <4> 4/7/90 ngk Added bogus IO routine constant, FailInfo
|
||
; <3> 3/10/90 ngk Removed dialogCodeH
|
||
; <2> 1/22/90 ngk Added symbolic names for standard procs
|
||
; <1> 1/6/90 ngk first checked in
|
||
;
|
||
; To Do:
|
||
;
|
||
|
||
IF &TYPE('__INCLUDINGEDITIONSPRIVATE__') = 'UNDEFINED' THEN
|
||
__INCLUDINGEDITIONSPRIVATE__ SET 1
|
||
|
||
kStandardOpenerProcPtr EQU 0
|
||
kStandardFormatIOProcPtr EQU 0
|
||
kBogusFormatIOProcPtr EQU 1
|
||
|
||
|
||
; ====================================== Global Data ========================================
|
||
|
||
EdtnMgrGlobals RECORD 0
|
||
firstPubCB DS.L 1
|
||
lastPubCB DS.L 1
|
||
perAppListHead DS.L 1
|
||
nextPollTime DS.L 1
|
||
A6Link DS.L 1
|
||
gotoHere DS.L 1
|
||
failureHandler DS.L 1
|
||
lastEditionUsed DS.L 1
|
||
volumeNotifyCode DS.W 3
|
||
ENDR
|
||
|
||
FailInfo RECORD 0
|
||
regs DS.L 11
|
||
returnTo DS.L 1
|
||
errorPtr DS.L 1
|
||
nextInfo DS.L 1
|
||
error DS.W 1
|
||
ENDR
|
||
|
||
|
||
; ====================================== Internal Routines ========================================
|
||
|
||
; FUNCTION PostSectionEvent(sectionH: SectionHandle; toApp: AppRefNum; classID: ResType): OSErr;
|
||
|
||
MACRO
|
||
_PostSectionEvent
|
||
MOVE.W #$06FA,D0
|
||
_Pack11
|
||
ENDM
|
||
|
||
|
||
; FUNCTION EditionBackGroundTask: OSErr;
|
||
|
||
MACRO
|
||
_EditionBackGroundTask
|
||
MOVE.W #$00FC,D0
|
||
_Pack11
|
||
ENDM
|
||
|
||
|
||
; FUNCTION QuitEditionPack: OSErr;
|
||
|
||
MACRO
|
||
_QuitEditionPack
|
||
MOVE.W #$00FE,D0
|
||
_Pack11
|
||
ENDM
|
||
|
||
ENDIF ; ...already included |