Commit 421bd2b0 authored by Kevin Bracey's avatar Kevin Bracey
Browse files

Merged in service call table only from Ursula branch.

Version 2.39. Tagged as 'FileSwitch-2_39'
parent 7965686f
......@@ -5,8 +5,10 @@
GBLA Module_Version
GBLS Module_MinorVersion
GBLS Module_Date
Module_MajorVersion SETS "2.38"
Module_Version SETA 238
GBLS Module_FullVersion
Module_MajorVersion SETS "2.39"
Module_Version SETA 239
Module_MinorVersion SETS ""
Module_Date SETS "22 Oct 1998"
END
Module_Date SETS "04 Aug 1999"
Module_FullVersion SETS "2.39"
END
/* (2.38)
/* (2.39)
*
* This file is automatically maintained by srccommit, do not edit manually.
*
*/
#define Module_MajorVersion_CMHG 2.38
#define Module_MajorVersion_CMHG 2.39
#define Module_MinorVersion_CMHG
#define Module_Date_CMHG 22 Oct 1998
#define Module_Date_CMHG 04 Aug 1999
#define Module_MajorVersion "2.38"
#define Module_Version 238
#define Module_MajorVersion "2.39"
#define Module_Version 239
#define Module_MinorVersion ""
#define Module_Date "22 Oct 1998"
#define Module_Date "04 Aug 1999"
#define Module_FullVersion "2.39"
......@@ -1612,9 +1612,27 @@ FileSwitch_Die Entry "fp"
; +++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
; Service entry. No trashable registers. Services can't give errors back
FileSwitch_Service ROUT
; Rapid service rejection
ASSERT Service_Memory < Service_StartUpFS
ASSERT Service_StartUpFS < Service_Reset
ASSERT Service_Reset < Service_CloseFile
ASSERT Service_CloseFile < Service_TerritoryStarted
ASSERT Service_TerritoryStarted < Service_DiscDismounted
FileSwitch_ServTab ; Ursula format service table
DCD 0 ; flags word
DCD FileSwitch_UService - Module_BaseAddr ; offset to handler (skip rapid rejection)
DCD Service_Memory ; service calls...
DCD Service_StartUpFS
DCD Service_Reset
DCD Service_CloseFile
DCD Service_TerritoryStarted
DCD Service_DiscDismounted ; ...in ascending numerical order
DCD 0 ; terminator
DCD FileSwitch_ServTab - Module_BaseAddr ;anchor for table
FileSwitch_Service ROUT ; Rapid service rejection
MOV r0, r0 ; magic instruction indicates Ursula format
TEQ r1, #Service_Memory
TEQNE r1, #Service_Reset
TEQNE r1, #Service_StartUpFS
......@@ -1623,7 +1641,7 @@ FileSwitch_Service ROUT
TEQNE r1, #Service_TerritoryStarted
MOVNE pc, lr
; Now go to the various service handlers...
FileSwitch_UService ; Now go to the various service handlers...
TEQ r1, #Service_Memory
BEQ FileSwitch_Service_Memory
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment