[an error occurred while processing this directive]
[an error occurred while processing this directive]
|
BCLR IEN // этого делать не надо !!! иначе - см. ниже
%SaveReg()
BCLR T2IR
CALL OSIntEnter
; CALLS SEG(OSIntEnter), SOF(OSIntEnter)
MOV R9, WORD PortSem3+2
MOV R8, WORD PortSem3
CALLS SEG(OSSemPost), SOF(OSSemPost)
CALL OSIntExit
CALLS SEG(OSIntExit), SOF(OSIntExit) // здесь может произойти переключение контекса !!!
// в эту точку можно уже и не попасть ...
// а прерывания-то запрещены !!!
%RestoreReg()
BSET IEN
RETI
А вообще следует выполнять требования автора по написанию обработчиков прерываний, тогда вопросов будет меньше :-))
E-mail: info@telesys.ru