 SUBT Module handler reason codes etc. => &.Hdr.ModHand

OldOpt SETA {OPT}
 OPT OptNoList+OptNoP1List

; ***********************************
; ***    C h a n g e   L i s t    ***
; ***********************************

; Date       Name  Description
; ----       ----  -----------
; 27-Nov-86  BC    Added Module_Ticker
; 15-Jan-87  SKS   Added SWI base addresses
; 21-Jan-87  APT   New Module_LoadAddr added.
; 26-Jan-87  BC    Removed Module_Ticker
;  5-Feb-87  APT   Added flag manifests
;  9-Feb-87  APT   Added more reason codes
; 17-Feb-87  BC    Added Module name server entries
; 25-Feb-87  APT   Help-is-code flag added
;  2-Apr-87  APT   ExtendBlock reason code added
; 23-Apr-87  APT   Help-is-code flag moved into high byte
; 17-Jun-87  APT   NewIncarnation, AddPoduleModule reason codes
; 24-Jun-87  APT   RenameIncarnation r.c.
; 15-Jul-87  APT   MakePreferred
; 29-Jul-87  APT   LookupName
; 17-Aug-87  APT   EnumerateROM_Modules

ModHandReason_Run                  * 0
ModHandReason_Load                 * 1
ModHandReason_Enter                * 2
ModHandReason_ReInit               * 3
ModHandReason_Delete               * 4
ModHandReason_RMADesc              * 5
ModHandReason_Claim                * 6
ModHandReason_Free                 * 7
ModHandReason_Tidy                 * 8
ModHandReason_Clear                * 9
ModHandReason_AddArea              * 10
ModHandReason_CopyArea             * 11
ModHandReason_GetNames             * 12
ModHandReason_ExtendBlock          * 13
ModHandReason_NewIncarnation       * 14
ModHandReason_RenameIncarnation    * 15
ModHandReason_MakePreferred        * 16
ModHandReason_AddPoduleModule      * 17
ModHandReason_LookupName           * 18
ModHandReason_EnumerateROM_Modules * 19

; Real module offsets

                 ^ 0
Module_Start     # 4
Module_Init      # 4
Module_Die       # 4
Module_Service   # 4
Module_Title     # 4
Module_HelpStr   # 4
Module_HC_Table  # 4       ; help and command table.

; optional SWI handler offsets
Module_SWIChunk  # 4
Module_SWIEntry  # 4
Module_NameTable # 4
Module_NameCode  # 4

; Magic number for RM load addr

Module_LoadAddr * &FFFFFA00  ; magic number from Stu/Bruce standard :
                             ; the two zeroes are ignored.
                             ; &FFFFFE00 on Proto-Arfur < .032

Module_SWIChunkSize * 2_1000000

Module_SWISystemBase      * 1 :SHL: 18
Module_SWIApplicationBase * 2 :SHL: 18
Module_SWIUserBase        * 3 :SHL: 18


; flags for the information word :

FS_Command_Flag     * 1 :SHL: 31
Status_Keyword_Flag * 1 :SHL: 30
Help_Is_Code_Flag   * 1 :SHL: 29

        OPT OldOpt

        END
