THPAGE.MAC/-BF/AU:72.=THPAGE.MAC;-1
\
-2,2
	.IDENT	/V01.01/
-35
;
; Modified:
; 1.01	RJDK - ATMOS - OXFORD 2-Sept-81.
;		Correct bug in Task header display.
;		displayed EFN0 as EFN1, EFN1 as DSW and DSW as EFN0.
;
%
-202,203,/;RJDK/
TEFLG:	.BLKW	2		; T.EFLG
HDSW:	.BLKW	1		; H.DSW
-312,314,/;RJDK/
	MOV	T.EFLG+0(R0),(R5)+ ;; EVENT FLAGS  1 - 16
	MOV	T.EFLG+2(R0),(R5)+ ;; EVENT FLAGS 17 - 32
	MOV	H.DSW(R4),(R5)+	;; $DSW
/