; ; 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