Commit d841fd01 authored by Alistair Rodger's avatar Alistair Rodger
Browse files

changed the service call handler as per new spec.

parent 7691f9df
......@@ -389,10 +389,51 @@ monitoroutput_cont
;----------------------------------------------------------------------------
;
; The service entry
;
; AR 27/march 98 changed to ursula code
;----------------------------------------------------------------------------
ASSERT Service_Reset < Service_ModeChange
ASSERT Service_ModeChange < Service_WimpReportError
ASSERT Service_WimpReportError < Service_PDriverStarting
ASSERT Service_PDriverStarting < Service_SwitchingOutputToSprite
ASSERT Service_SwitchingOutputToSprite < Service_PDriverGetMessages
ASSERT Service_Print < Service_WimpCloseDown
ASSERT Service_WimpCloseDown < Service_PDriverGetMessages
serviceentry_ServTab
DCD 0
DCD serviceOentry - Module_BaseAddr ; offset to handler (skip rapid rejection)
[ debug
DCD Service_Reset ; Service reset?
]
DCD Service_ModeChange ;Reset 'spriteparams' on a
DCD Service_WimpReportError ;Must suspend interception on
DCD Service_PDriverStarting ;Declare ourselves
[ debug
DCD Service_SwitchingOutputToSprite
DCD Service_Print
]
DCD Service_PDriverGetMessages ; find messages doofers!
[ debug
DCD Service_WimpCloseDown
]
DCD 0
DCD serviceentry_ServTab - Module_BaseAddr ;anchor for table
serviceentry
MOV R0, R0
TEQ R1,#Service_PDriverStarting ;Declare ourselves
TEQNE R1,#Service_WimpReportError ;Must suspend interception on
TEQNE R1,#Service_ModeChange ;Reset 'spriteparams' on a
TEQNE R1,#Service_PDriverGetMessages ; find messages doofers!
[ debug
TEQNE R1,#Service_SwitchingOutputToSprite
TEQNE R1,#Service_Print
TEQNE R1,#Service_WimpCloseDown
TEQNE R1,#Service_Reset ; Service reset?
]
MOVNE pc, lr
serviceOentry
[ debug
TEQ r1, #&68 ;Don't attempt to trace Service_FileClosed
DebugIf NE, svc, "+service", r1
......@@ -411,7 +452,7 @@ serviceentry
TEQ R1,#Service_PDriverGetMessages ; find messages doofers!
BEQ ServiceMessages
[ debug
[ debug ; these service calls only deal with debug
TEQ R1,#Service_SwitchingOutputToSprite
BEQ serviceentry_switchingoutputtosprite
......@@ -420,10 +461,10 @@ serviceentry
TEQ R1,#Service_WimpCloseDown
BEQ serviceentry_wimpclosedown
]
TEQ R1,#Service_Reset ; Service reset?
BEQ serviceentry_reset
]
[ debug
TEQ r1, #&68 ;Don't attempt to trace Service_FileClosed
......
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