; LSYS9.M68 -- Patch #1 to SYS:LSYS.MON Version 1.3(123)
;
; This patch corrects a problem in the monitor where usage of the ITC can
; cause queue checks to be used and not returned.  This can happen using
; the new spooler.
;
       COPY    PATCH

       OVER    1,3,0,123.,0
       NVER    1,3,0,123.,1

       OHASH   351,406,051,460
       NHASH   216,216,002,036

       .=5736
100$:

       .=52024
       SUB     #14,A3
       TST     20(A3)
       BEQ     10$
       QRET    A3
       BR      15$
10$:    CALL    100$
15$:    BCALL   50$
       BNE     30$
20$:    REST    A0-A4,D1
       CLRB    @SP
       RTE
30$:    REST    A0-A4,D1
       MOVB    #4,@SP
       RTE

       .=52132
50$:

       END