Mercurial > hg > Members > kono > nitros9-code

changeset 2588:d5a5b6b89fb1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added placeholder for SS.KySns GetStat.
author boisy
date Tue, 04 Oct 2011 15:07:00 +0000
parents 87fcf1bb90e6
children e134044fd755
files level1/modules/scdwn.asm
diffstat 1 files changed, 10 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/level1/modules/scdwn.asm	Tue Sep 20 11:43:58 2011 +0000
+++ b/level1/modules/scdwn.asm	Tue Oct 04 15:07:00 2011 +0000
@@ -423,12 +423,19 @@
                puls      cc,dp,pc            ; restore Carry status, system DP, return
 
 GetComSt       cmpa      #SS.ComSt
-               bne       UnSvcErr            ; no, we have no more answers, report error
+               bne       GetKySns            ; no, we have no more answers, report error
                ldd       #$0000              ; not used, return $0000
                std       R$Y,x
                sta       R$B,x
                puls      cc,dp,pc            ; restore Carry status, system DP, return			
 
+GetKySns
+               cmpa      #SS.KySns
+               bne       UnSvcErr            ; no, we have no more answers, report error
+* Get key sense byte from server and return to caller
+
+               puls      cc,dp,pc            ; restore Carry status, system DP, return			
+
 * Advertise Stat Code to server
 * A = Function Code
 * B = OP_SERGETSTAT or OP_SERSETSTAT
@@ -486,6 +493,8 @@
                bne       ex
                clr       <SSigID,u           clear process id
 ex             rts       
+sskysns        
+               rts
 ssig           pshs      cc
                orcc      #IntMasks
                lda       PD.CPR,y            ; get curr proc #