Trailing-Edge
-
PDP-10 Archives
-
BB-H348C-RM_1982
-
swskit-v21/listings/rsx11s/drcmt.list
There are no other files named drcmt.list in the archive.
DRCMT MACRO M1110 22-AUG-79 06:57 PAGE 3
1 .TITLE DRCMT
2 .IDENT /04/
3
4 ;
5 ; COPYRIGHT (C) 1974, 1976
6 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
7 ;
8 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
9 ; OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
10 ;
11 ; VERSION 04
12 ;
13 ; D. N. CUTLER 31-AUG-73
14 ;
15 ; PREVIOUSLY MODIFIED BY:
16 ;
17 ; D. N. CUTLER
18 ;
19 ; MODIFIED BY:
20 ;
21 ; CANCEL MARK TIME AND SCHEDULE REQUESTS DIRECTIVES
22 ;
23 ; MACRO LIBRARY CALLS
24 ;
25
26 .MCALL CLKDF$
27 000000 CLKDF$ ;DEFINE CLOCK QUEUE CONTROL BLOCK OFFSETS
28
29 ;+
30 ; **-$DRCMT-CANCEL MARK TIME REQUESTS
31 ;
32 ; THIS DIRECTIVE INSTRUCTS THE SYSTEM TO CANCEL ALL MARK TIME REQUESTS
33 ; FOR THE ISSUING TASK.
34 ;
35 ; DPB FORMAT.
36 ;
37 ; WD. 00 -- DIC(27.),DPB SIZE(1.).
38 ;
39 ; INPUTS:
40 ;
41 ; R2=ADDRESS OF THE TASK STATUS WORD OF THE CURRENT TASK.
42 ; R3=ADDRESS OF THE LAST WORD IN THE DPB+2.
43 ; R4=ADDRESS OF THE HEADER OF THE CURRENT TASK.
44 ; R5=ADDRESS OF THE TCB OF THE CURRENT TASK.
45 ;
46 ; NOTE: THIS DIRECTIVE IS ALSO CALLED FROM THE EXIT DIRECTIVE AND
47 ; ONLY REQUIRES R5 TO BE LOADED ON ENTRANCE.
48 ;
49 ; OUTPUTS: (DIRECTIVE STATUS AND PS RETURNED TO TASK)
50 ;
51 ; C=0 WITH A DIRECTIVE STATUS OF +1.
52 ;-
53
54 .ENABL LSB
55 000000 005004 $DRCMT::CLR R4 ;SET TYPE OF REQUEST TO REMOVE
56 000002 000404 BR 10$ ;REMOVE ALL MARK TIME ENTRIES.
57
DRCMT MACRO M1110 22-AUG-79 06:57 PAGE 3-1
58 ;+
59 ; **-$DRCSR-CANCEL SCHEDULE REQUESTS
60 ;
61 ; THIS DIRECTIVE INSTRUCTS THE SYSTEM TO CANCEL ALL SCHEDULE REQUESTS FOR A
62 ; SPECIFIED TASK.
63 ;
64 ; DPB FORMAT:
65 ;
66 ; WD. 00 -- DIC(25.),DPB SIZE(3.).
67 ; WD. 01 -- FIRST HALF OF TASK NAME.
68 ; WD. 02 -- SECOND HALF OF TASK NAME.
69 ;
70 ; INPUTS:
71 ;
72 ; R0=ADDRESS OF THE TCB TO CANCEL SCHEDULE REQUESTS FOR.
73 ; R1=ADDRESS OF THE TASK STATUS WORD OF THE TASK TO CANCEL SCHEDULE REQUES
74 ; R2=ADDRESS OF THE TASK STATUS WORD OF THE CURRENT TASK.
75 ; R3=ADDRESS OF THE LAST WORD IN THE DPB+2.
76 ; R4=ADDRESS OF THE HEADER OF THE CURRENT TASK.
77 ; R5=ADDRESS OF THE TCB OF THE CURRENT TASK.
78 ;
79 ; OUTPUTS: (DIRECTIVE STATUS AND PS RETURNED TO TASK)
80 ;
81 ; C=0 WITH A DIRECTIVE STATUS OF +1.
82 ;-
83
84 000004 010005 $DRCSR::MOV R0,R5 ;SET TCB ADDRESS
85 000006 005004 CLR R4 ;SET INITIAL ENTRY TYPE MINUS 2
86 000010 CALL (PC) ;REMOVE PERIODIC/SINGLE SHOT REQUESTS
87 000012 005724 TST (R4)+ ;ADVANCE TO NEXT ENTRY TYPE
88 000014 10$: CALLR $CLRMV ;REMOVE ALL REMAINING ENTRIES
89 .DSABL LSB
90
91 000001 .END
DRCMT MACRO M1110 22-AUG-79 06:57 PAGE 3-2
SYMBOL TABLE
A$$CHK= 000000 C.MRKT= 000000 C.UIC 000016 L$$DRV= 000000 R$$SND= 000000
A$$CPS= 000000 C.RQT 000002 G$$TPP= 000000 M$$CRB= 000124 R$$11M= 000000
A$$TRP= 000000 C.RSI 000012 G$$TTK= 000000 M$$MGE= 000000 R$$11S= 000000
C$$ORE= 002000 C.SCHD= 000002 H$$RTZ= 000074 M$$NET= 000000 S$$YSZ= 001740
C.AR5 000014 C.SRC 000014 I$$RDN= 000000 M$$NT2= 000000 V$$CTR= 001200
C.AST 000012 C.SSHT= 000004 K$$CNT= 177546 N$$LDV= 000001 V$$RSN= 000031
C.CSTP= 000012 C.SUB 000012 K$$CSR= 177546 P$$RTY= 000000 X$$DBT= 000000
C.DST 000016 C.SYST= 000006 K$$IEN= 000115 P$$TPT= 000000 $CLRMV= ****** GX
C.EFN 000003 C.SYTK= 000010 K$$LDC= 000001 R$$DER= 000000 $DRCMT 000000RG
C.LGTH= 000020 C.TCB 000004 K$$TPS= 000074 R$$EXV= 000000 $DRCSR 000004RG
C.LNK 000000 C.TIM 000006 L$$ASG= 000000
. ABS. 000020 000
000020 001
ERRORS DETECTED: 0
VIRTUAL MEMORY USED: 1523 WORDS ( 6 PAGES)
DYNAMIC MEMORY: 2980 WORDS ( 11 PAGES)
ELAPSED TIME: 00:00:09
[11,24]DRCMT,SY0:[11,34]DRCMT/-SP=[1,1]EXEMC/ML,[11,10]RSXMC/PA:1,DRCMT