Trailing-Edge
-
PDP-10 Archives
-
BB-H348C-RM_1982
-
swskit-v21/listings/mcb/match.list
There are no other files named match.list in the archive.
MATCH MACRO M1110 13-OCT-79 10:56 PAGE 3
1 .TITLE MATCH
2 .IDENT /V01.00/
3 ;
4 ; COPYRIGHT (C) 1978 BY
5 ; DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASS.
6 ;
7 ;
8 ; THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED
9 ; ONLY IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE
10 ; INCLUSION OF THE ABOVE COPYRIGHT NOTICE. THIS SOFTWARE OR ANY OTHER
11 ; COPIES THEREOF MAY NOT BE PROVIDED OR OTHERWISE MADE AVAILABLE TO ANY
12 ; OTHER PERSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY
13 ; TRANSFERRED.
14 ;
15 ; THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE WITHOUT NOTICE
16 ; AND SHOULD NOT BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT
17 ; CORPORATION.
18 ;
19 ; DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS
20 ; SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL.
21 ;
22 ;
23 ; MODULE DESCRIPTION:
24 ;
25 ; NCU UTILITY MODULE TO MATCH A CODE AND RETURN A SECONDARY VALUE
26 ;
27 ;
28 ; DISTRIBUTED SYSTEMS SOFTWARE ENGINEERING
29 ;
30 ; IDENT HISTORY:
31 ;
32 ; 1.00 10-FEB-78
33 ; VERSION 2.0 RELEASE
34 ;
MATCH MACRO M1110 13-OCT-79 10:56 PAGE 4
36 ;
37 ;======================================================================;
38 ;++
39 ; +-------------------------------------------------+
40 ; I I
41 ; I M A T C H I
42 ; I - - - - - I
43 ; I I
44 ; +-------------------------------------------------+
45 ;
46 ; FUNCTION:
47 ;
48 ; UTILITY MODULE TO FIND A MATCH BETWEEN A CODE AND A TABLE OF CODES
49 ; AND TO RETURN A SECONDARY VALUE AS A RESULT OF THAT MATCH
50 ;
51 ; CALLING SEQUENCE: CALL MATCH
52 ;
53 ; INPUT:
54 ;
55 ; R0 - CODE TO BE MATCHED
56 ; R1 - ADDRESS OF BEGINNING OF TABLE
57 ; R2 - ADDRESS OF END OF TABLE
58 ;
59 ; OUTPUT:
60 ;
61 ; C-BIT CLEAR - MATCH FOUND
62 ; R0 - SECONDARY VALUE AS RESULT OF MATCH
63 ; C-BIT SET - NO MATCH FOUND
64 ;
65 ; REQUIREMENTS:
66 ;
67 ; INPUT VIA TABLE:
68 ; EACH ENTRY IN THE TABLE IS 2 WORDS
69 ; THE FIRST WORD CONTAINS A CODE TO BE MATCHED
70 ; THE SECOND CONTAINS A SECONDARY VALUE
71 ;
72 ;--
73 ;======================================================================;
74 ;
75 ;
76 ; EXTERNAL MACROS
77 ;
78 .MCALL PROC
79 ;
80 ; DEFINE INTERNAL SYMBOLS
81 ;
82 000000 M.CODE = 0. ;CODE OFFSET
83 000002 M.ADDR = 2. ;ADDRESS OFFSET
84 ;
85 000004 M$ELEN = 4. ;ENTRY LENGTH
MATCH MACRO M1110 13-OCT-79 10:56 PAGE 5
87 ;
88 ; PROCEDURE BODY
89 ;
90 000000 PROC MATCH
91 000000 000261 SEC ;INDICATE NO MATCH
92 000002 WHILE ; NO MATCH AND NOT ALL ENTRIES CHECKED
93 000002 FALSE CC
94 000004 FALSE HIS R1,R2
95 000010 DO
96 000010 IF ; CODES MATCH
97 000010 FALSE NE R0,M.CODE(R1)
98 000016 THEN
99 000016 016100 000002 MOV M.ADDR(R1),R0 ;GET ADDRESS
100 000022 000241 CLC
101 000024 ELSE
102 000026 062701 000004 ADD #M$ELEN,R1 ;ADVANCE TO NEXT ENTRY
103 000032 000261 SEC ;INDICATE NO MATCH
104 000034 ENDIF
105 000034 ENDWHILE
106 000036 IF ; A MATCH WAS FOUND
107 000036 FALSE HIS R1,R2
108 000042 THEN
109 000042 000241 CLC
110 000044 ELSE
111 000046 000261 SEC
112 000050 ENDIF
113 000050 ENDPROC
114 000001 .END
MATCH MACRO M1110 13-OCT-79 10:56 PAGE 5-1
SYMBOL TABLE
A$$CHK= 000000 FT$CNS= 000000 F$OPIR= 000000 F$TRMA= 000000 M$$CRB= 000124
A$$CPS= 000000 FT$NOD= 000001 F$OPLK= 000005 F$TRMS= 000002 M$$CRX= 000000
A$$TRP= 000000 FT$TSK= 000001 F$OPLN= 000002 F$WRBK= 000000 M$$FCS= 000000
C$$CKP= 000000 F$ALBF= 000001 F$OPLO= 000000 F$WRCL= 000001 M$$OVR= 000000
C$$ORE= 000400 F$ALCB= 000001 F$OPOR= 000000 F$WRCM= 000000 M.ADDR= 000002
C$$RSH= 177564 F$CB = 000017 F$OPOT= 000000 F$WRRC= 000000 M.CODE= 000000
D$$BUG= 177514 F$CLCL= 000001 F$ORLU= 000000 F$ZERO= 000001 NO = 000000
D$$ISK= 000000 F$CLCO= 000000 F$OTLU= 000001 F$ZRCN= 000001 N$$USR= 000001
D$$L11= 000001 F$CLFL= 000000 F$RCBK= 000002 F$$LVL= 000001 P$$P45= 000000
FL$BOO= 000001 F$CLLK= 000006 F$RCEV= 000001 F$150 = 000002 R$$DER= 000000
FL$DUM= 000001 F$CLLN= 000002 F$RCIN= 000000 F$300 = 000012 R$$K11= 000001
FL$LOA= 000001 F$DPOS= 000001 F$RCMA= 000000 F$50 = 000002 R$$SND= 000000
FL$LOO= 000001 F$DUMP= 000000 F$RCMS= 000002 F$550 = 000002 R$$11M= 000000
FR$LCC= 000001 F$EVNT= 000001 F$RDBK= 000000 G$$TPP= 000000 S$$WRG= 000000
FR$LCS= 000001 F$EXAM= 000001 F$RDCM= 000000 G$$TSS= 000000 S$$YSZ= 001600
FR$LNC= 000001 F$EXHO= 000000 F$RDIN= 000001 G$$TTK= 000000 T$$KMG= 000000
FR$LNL= 000001 F$GTCM= 000001 F$RDIS= 000012 I$$RAR= 000000 T$$MIN= 000000
FR$LNS= 000001 F$INCM= 000000 F$RDRC= 000000 I$$RDN= 000000 V$$CTR= 001000
FR$RMC= 000001 F$INLU= 000001 F$RECO= 000001 K$$CNT= 177546 X$$DBT= 000000
FR$RML= 000001 F$IRLU= 000000 F$RLBF= 000001 K$$CSR= 177546 YES = 000001
FR$RMS= 000001 F$LKLU= 000010 F$RLCB= 000001 K$$LDC= 000000 $$CSTA= 000000
FS$HOS= 000001 F$LNLU= 000002 F$STBK= 000000 K$$TPS= 000074 $$PRST= 000012
FS$INT= 000000 F$LNSR= 000001 F$STPR= 000001 LD$LP = 000000 $$STIX= 000777
FS$LLP= 000001 F$LOAD= 000000 F$STPS= 000006 L$$ASG= 000000 $$STNM= 000000
FS$LOF= 000001 F$LOGD= 000001 F$TEST= 000001 L$$DRV= 000000 $$S774= 000077
FS$LOG= 000001 F$LOOP= 000001 F$TRAC= 000000 L$$P11= 000001 $$S775= 000010
FS$LST= 000001 F$NTCM= 000000 F$TRBK= 000001 L$$11R= 000000 $$S776= 000000
FS$NET= 000001 F$OPCL= 000001 F$TRIG= 000001 MATCH 000000RG $$S777= 000000
FS$NST= 000000 F$OPCO= 000000 F$TRIN= 000000 M$ELEN= 000004 $$TRNM= 000000
FS$PAS= 000001 F$OPIN= 000000
. ABS. 000000 000
000052 001
ERRORS DETECTED: 0
VIRTUAL MEMORY USED: 8181 WORDS ( 32 PAGES)
DYNAMIC MEMORY: 9004 WORDS ( 34 PAGES)
ELAPSED TIME: 00:00:27
MATCH,[135,30]MATCH/CR/-SP=[130,10]NETLIB/ML,[135,10]CFGNIC/PA:1,MATCH
MATCH CREATED BY MACRO ON 13-OCT-79 AT 10:56 PAGE 1
SYMBOL CROSS REFERENCE CREF
SYMBOL VALUE REFERENCES
F$TRAC = 000000 5-90 5-90 5-113 5-113
I$$AS = ****** 5-90
MATCH 000000 RG #5-90
M$ELEN = 000004 #4-85 5-102
M.ADDR = 000002 #4-83 5-99
M.CODE = 000000 #4-82 5-97
R$$11D = ****** 5-90
R$$11M = 000000 5-90
$$CSTA = 000000 #5-90
$$PRST = 000012 #5-90 5-92 #5-92 5-96 #5-96 5-106 #5-106
$$SLST = ****** 5-90 5-92 5-93 5-94 5-94 5-95 5-97 5-97 5-98
5-101 5-101 5-104 5-105 5-105 5-107 5-107 5-108 5-110
5-110 5-112 5-113
$$STIX = 000777 #5-90 5-92 5-92 #5-92 5-92 5-92 #5-92 5-96 5-96
#5-96 5-96 5-96 #5-96 5-104 #5-104 5-104 5-104 #5-104
5-104 5-105 #5-105 5-105 5-105 #5-105 5-105 5-106 5-106
#5-106 5-106 5-106 #5-106 5-112 #5-112 5-112 5-112 #5-112
5-112
$$STNM = 000000 #5-90 5-92 #5-92 5-92 5-92 5-93 5-94 5-95 5-96
#5-96 5-96 5-97 5-98 5-101 5-101 5-104 #5-104 5-105
5-105 #5-105 5-106 #5-106 5-106 5-107 5-108 5-110 5-110
5-112 #5-112
$$S774 = 000077 #5-96 5-104
$$S775 = 000010 #5-96 5-104
$$S776 = 000000 #5-92 5-105 #5-106 5-112
$$S777 = 000000 #5-92 5-105 #5-106 5-112
$$TRNM = 000000 #5-90 5-92 #5-92 5-93 5-94 5-95 5-96 #5-96 5-97
5-98 5-101 #5-101 5-104 #5-104 5-105 #5-105 5-106 #5-106
5-107 5-108 5-110 #5-110 5-112 #5-112
MATCH CREATED BY MACRO ON 13-OCT-79 AT 10:56 PAGE 2
MACRO CROSS REFERENCE CREF
MACRO NAME REFERENCES
CASE #5-90
DO #5-90 #5-95
ELSE #5-90 #5-101 #5-110
ENDCAS #5-90
ENDIF #5-90 #5-104 #5-105 #5-112
ENDPRO #5-90 5-113
ENDWHI #5-90 5-105
FALSE #5-90 #5-93 #5-94 #5-97 #5-107
FALSEB #5-90
IF #5-90 5-92 5-96 5-106
JMPPRO #5-90
ONCASE #5-90
PROC #4-78 5-90
PROCLC #5-90
SWSTK$ #5-90
THEN #5-90 5-95 5-98 5-108
TRUE #5-90
TRUEB #5-90
WHILE #5-90 5-92
$$BGND #5-90 #5-93 #5-94 #5-97 #5-107
$$BGNN #5-90 #5-93 #5-94 #5-97 #5-101 #5-105 #5-107 #5-110
$$ELSE #5-90 #5-101 #5-110
$$GEN1 #5-90 5-90 5-92 5-93 5-94 5-95 5-97 5-98 5-101 5-101
5-104 5-105 5-105 5-107 5-108 5-110 5-110 5-112 5-113
$$GEN2 #5-90 #5-94 #5-97 #5-107
$$GNAB #5-90 #5-93 #5-94 #5-97 #5-107
$$GNBT #5-90
$$GNCM #5-90 5-93 5-94 5-97 5-107
$$INMC #5-90 5-90
$$INSY #5-90 5-90
$$LAB #5-90 #5-92 #5-95 #5-98 #5-101 #5-104 #5-105 #5-108 #5-110 #5-112
$$POP #5-90 #5-104 #5-104 #5-105 #5-105 #5-112 #5-112
$$POPI #5-90 5-104 5-104 5-105 5-105 5-112 5-112
$$PUSH #5-90 5-92 5-92 5-96 5-96 5-106 5-106
$$STSM #5-90 5-92 5-92 5-96 5-96 5-106 5-106
$$SYS #5-90
$$TRCE #5-90 5-90 5-113