Trailing-Edge
-
PDP-10 Archives
-
BB-H348C-RM_1982
-
swskit-v21/listings/mcb/ntitim.list
There are no other files named ntitim.list in the archive.
NTITIM MACRO M1110 13-OCT-79 10:44
TABLE OF CONTENTS
4- 38 DATA
5- 53 START CEX TIMERS
NTITIM MACRO M1110 13-OCT-79 10:44 PAGE 3
1 .IIF NDF,L$$SI1, .TITLE NTITIM
2 .IIF DF,L$$SI1, .TITLE LSITIM
3 .IDENT /V01.01/
4
5 ;
6 ; COPYRIGHT (C) 1978 BY
7 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
8 ;
9 ;
10 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED
11 ; ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE
12 ; INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER
13 ; COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY
14 ; OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY
15 ; TRANSFERRED.
16 ;
17 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE
18 ; AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
19 ; CORPORATION.
20 ;
21 ; DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
22 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.
23 ;
24 ; MODULE DESCRIPTION:
25 ;
26 ; NTINIT - START COMM EXEC TIMERS
27 ;
28 ; DISTRIBUTED SYSTEMS SOFTWARE ENGINEERING
29 ;
30 ; IDENT HISTORY:
31 ;
32 ; 1.00 27-FEB-78
33 ; VERSION 2.0 RELEASE
34 ; 1.01 19-APR-79 ALAN D. PECKHAM
35 ; REMOVE STARTUP OF 50MS TIMER
36 ;
NTITIM MACRO M1110 13-OCT-79 10:44 PAGE 4
DATA
38 .SBTTL DATA
39
40 ;
41 ; LIBRARY MACROS
42 ;
43 .MCALL NHWDF$
44
45 000000 NHWDF$ ;HARDWARE DEFINITIONS
46
47
48 ;
49 ; START OF PURE CODE
50 ;
51 000000 .PSECT
NTITIM MACRO M1110 13-OCT-79 10:44 PAGE 5
START CEX TIMERS
53 .SBTTL START CEX TIMERS
54
55 ;+
56 ; $NITIM - START CEX TIMERS IF NOT ALREADY STARTED
57 ;
58 ; INPUTS:
59 ; NONE
60 ;
61 ; OUTPUTS:
62 ; IF THE TIMERS ARE ALREADY IN THE CLOCK QUEUE, THEN THIS IS A
63 ; NO-OP, ELSE THE TIMERS ARE STARTED.
64 ; R0 IS DESTROYED.
65 ;-
66
67 000000 012700 000000G $NITIM::MOV #$CLKHD,R0 ;POINT AT THE CLOCK QUEUE
68 000004 SWSTK$ 30$ ;SWITCH TO SYSTEM STATE
69 000010 MTPS #PR7 ;;DISABLE INTERUPTS
70
71 000016 011000 10$: MOV (R0),R0 ;;;POINT AT NEXT BLOCK
72 000020 001405 BEQ 20$ ;;;BR IF END
73 000022 022700 000000G CMP #$T1SCL,R0 ;;;ENTRY FOR 1 SEC TIMER? ;**-2
74 000026 001373 BNE 10$ ;;;BR IF NO, CHECK NEXT BLOCK
75
76 000030 005066 000002 15$: CLR 2(SP) ;;;RETURN "STARTED" INDICATION
77
78 000034 20$: MTPS #0 ;;;RE-ENABLE INTERRUPTS
79 000040 RETURN ;;RETURN TO USER MODE AT "30$"
80
81 000042 005700 30$: TST R0 ;TIMERS STARTED ALREADY?
82 000044 001402 BEQ 40$ ;BR IF YES, NO-OP
83 000046 CALL $T1SIN ;START 1 SEC TIMER ;**-1
84 000052 40$: RETURN
NTITIM MACRO M1110 13-OCT-79 10:44 PAGE 6
START CEX TIMERS
86 000001 .END
NTITIM MACRO M1110 13-OCT-79 10:44 PAGE 6-1
SYMBOL TABLE
A$$CHK= 000000 G$$TPP= 000000 L$$11R= 000000 PR1 = 000040 S$$WRG= 000000
A$$CPS= 000000 G$$TSS= 000000 MPAR = 172100 PR2 = 000100 S$$YSZ= 007600
A$$PRI= 000000 G$$TTK= 000000 MPCSR = 177746 PR3 = 000140 TPS = 177564
A$$TRP= 000000 G$$WRD= 000000 M$$CRB= 000124 PR4 = 000200 T$$KMG= 000000
BUFUMP= 172354 I$$RAR= 000000 M$$CRX= 000000 PR5 = 000240 T$$MIN= 000000
CMODE = 140000 I$$RDN= 000000 M$$EXT= 000000 PR6 = 000300 UBMPR = 170200
C$$CKP= 000000 KISAR0= 172340 M$$FCS= 000000 PR7 = 000340 UISAR0= 177640
C$$ORE= 000400 KISAR6= 172354 M$$MGE= 000000 PS = 177776 UISAR1= 177642
C$$RSH= 177564 K$$CNT= 177546 M$$OVR= 000000 P$$P45= 000000 V$$CTR= 001000
D$$BUG= 177514 K$$CSR= 177546 N$$LDV= 000001 P$$WRD= 000000 X$$DBT= 000000
D$$ISK= 000000 K$$LDC= 000000 N$$MOV= 000010 Q$$OPT= 000010 $CLKHD= ****** GX
D$$L11= 000001 K$$TPS= 000074 N$$SYS= 000001 R$$DER= 000000 $NITIM 000000RG
D$$YNC= 000000 LD$LP = 000000 N$$USR= 000001 R$$K11= 000001 $T1SCL= ****** GX
D$$YNM= 000000 L$$ASG= 000000 PIRQ = 177772 R$$SND= 000000 $T1SIN= ****** GX
E$$XPR= 000000 L$$DRV= 000000 PMODE = 030000 R$$11M= 000000 .BASEB= 140000
F$$LVL= 000001 L$$P11= 000001 PR0 = 000000 SWR = 177570
. ABS. 000000 000
000054 001
ERRORS DETECTED: 0
VIRTUAL MEMORY USED: 2204 WORDS ( 9 PAGES)
DYNAMIC MEMORY: 2668 WORDS ( 10 PAGES)
ELAPSED TIME: 00:00:09
NTITIM,[132,34]NTITIM/CR/-SP=[130,10]NETLIB/ML,RSXMC7/PA:1,[132,10]NTITIM
NTITIM CREATED BY MACRO ON 13-OCT-79 AT 10:44 PAGE 1
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
BUFUMP = 172354 #4-45
CMODE = 140000 #4-45
I$$AS = ****** 4-45
KISAR0 = 172340 #4-45
KISAR6 = 172354 #4-45
L$$SI1 = ****** 3-1 3-2
MPAR = 172100 #4-45
MPCSR = 177746 #4-45
M$$MGE = 000000 4-45
PIRQ = 177772 #4-45
PMODE = 030000 #4-45
PR0 = 000000 #4-45
PR1 = 000040 #4-45
PR2 = 000100 #4-45
PR3 = 000140 #4-45
PR4 = 000200 #4-45
PR5 = 000240 #4-45
PR6 = 000300 #4-45
PR7 = 000340 #4-45 5-69
PS = 177776 #4-45 5-69 5-78
R$$11D = ****** 4-45
SWR = 177570 #4-45
TPS = 177564 #4-45
UBMPR = 170200 #4-45
UISAR0 = 177640 #4-45
UISAR1 = 177642 #4-45
$CLKHD = ****** GX 5-67
$NITIM 000000 RG #5-67
$T1SCL = ****** GX 5-73
$T1SIN = ****** GX 5-83
.BASEB = 140000 #4-45
NTITIM CREATED BY MACRO ON 13-OCT-79 AT 10:44 PAGE 2
MACRO CROSS REFERENCE CREF
MACRO NAME REFERENCES
CALL 5-68 5-83
MTPS 5-69 5-78
NHWDF$ #4-43 #4-45
RETURN #5-79 #5-84
SWSTK$ #5-68