Trailing-Edge
-
PDP-10 Archives
-
LCG_Integration_Tools_Clearinghouse_T20_v7_30Apr86
-
tools/tvaxv2/gtvr09.lis
There are 3 other files named gtvr09.lis in the archive. Click here to see a list.
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 1
14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
0000 1 .TITLE GTVR09 - FILE INPUT ROUTINE
0000 2 ; READ INPUT COMMAND OR FILE NAME FROM INPUT FILE
0000 3 ;
0000 4 ; IN R0 = ADDR RAB
0000 5 ; R1 = ADDR INPUT AREA
0000 6 ;
0000 7 ; OUT R0 = LENGTH INPUT, -1 = EOF
0000 8 ;
0000 9 ; ENTRIES: GTVR09 = STOP ON ESC,ESC
0000 10 ; GTVR09R = STOP ON CR OR END OF RECORD
0000 11 ;
0000 12 INIT GTVR09
0238 30 0002 13 BSBW INITR
57 50 D0 0005 14 MOVL R0,R7
56 51 D0 0008 15 MOVL R1,R6
00000293'EF 56 D0 000B 16 MOVL R6,WINPA
0000'C8 B5 0012 17 TSTW WLL(R8)
0016 18 IF. *EQ ;NO PREVIOUS INPUT
0000028D'EF FFFFFFFF 8F D0 001B 19 MOVL #-1,WOLL
01A9 30 0026 20 BSBW GETR
0029 21 ENDIF.
0000028D'EF D4 0029 22 CLRL WOLL
0010'C8 80'8F 93 002F 23 BITB #WXTRUNC,WSTAT(R8)
0035 24 IF. *ON ;PREVIOUS TOO LONG
0010'C8 80'8F 8A 003A 25 BICB2 #WXTRUNC,WSTAT(R8)
0000028D'EF D6 0040 26 INCL WOLL
86 49 8F 90 0046 27 MOVB #^A'I',(R6)+
004A 28 ENDIF.
0000'C8 00000291'EF 02 39 004A 29 ME1: MATCHC #2,WESC,WLL(R8),@WADDR(R8)
0004'D8 0054
0057 30 IF. *EQ ;ESC,ESC FOUND
53 0004'C8 C2 005C 31 SUBL2 WADDR(R8),R3 ;INPUT LENGTH
50 53 0000028D'EF C1 0061 32 ADDL3 WOLL,R3,R0
50 0800 8F B1 0069 33 CMPW #2048,R0
006E 34 IF. *LT ;TOO LONG
50 0000028D'EF B0 0073 35 MOVW WOLL,R0
51 00000293'EF D0 007A 36 MOVL WINPA,R1
FF7C' 30 0081 37 BSBW GWRITR2 ;LOG IN BATCH
66 00000291'EF B0 0084 38 MOVW WESC,(R6)
50 0000028D'EF D0 008B 39 MOVL WOLL,R0
0010'C8 80'8F 88 0092 40 BISB2 #WXTRUNC,WSTAT(R8)
04 0098 41 RET
0099 42 ENDIF.
0000'C8 53 C2 0099 43 SUBL2 R3,WLL(R8)
0000028D'EF 53 C0 009E 44 ADDL2 R3,WOLL
0000028D'EF 02 C2 00A5 45 SUBL2 #2,WOLL ;DO NOT COUNT ESC,ESC
66 0004'D8 53 28 00AC 46 MOVC3 R3,@WADDR(R8),(R6)
0004'C8 51 D0 00B2 47 MOVL R1,WADDR(R8) ;ADVANCE PTR
50 0000028D'EF B0 00B7 48 MOVW WOLL,R0
51 00000293'EF D0 00BE 49 MOVL WINPA,R1
FF38' 30 00C5 50 BSBW GWRITR2 ;LOG IN BATCH
50 0000028D'EF D0 00C8 51 MOVL WOLL,R0 ;LENGTH
04 00CF 52 RET
00D0 53 ELSE. ;NO MATCH
50 0000'C8 0000028D'EF C1 00D3 54 ADDL3 WOLL,WLL(R8),R0
50 07FE 8F B1 00DD 55 CMPW #2046,R0
00E2 56 IF. *LT ;TOO LONG
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 2
14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
50 0000028D'EF B0 00E7 57 MOVW WOLL,R0
51 00000293'EF D0 00EE 58 MOVL WINPA,R1
FF08' 30 00F5 59 BSBW GWRITR2 ;LOG IN BATCH
66 00000291'EF B0 00F8 60 MOVW WESC,(R6)
50 0000028D'EF D0 00FF 61 MOVL WOLL,R0
0010'C8 80'8F 88 0106 62 BISB2 #WXTRUNC,WSTAT(R8)
04 010C 63 RET
010D 64 ENDIF.
0000028D'EF 0000'C8 C0 010D 65 ADDL2 WLL(R8),WOLL
0000028D'EF D6 0116 66 INCL WOLL
66 0004'D8 0000'C8 28 011C 67 MOVC3 WLL(R8),@WADDR(R8),(R6)
56 53 D0 0124 68 MOVL R3,R6
86 0D'8F 90 0127 69 MOVB #CR,(R6)+ ;EXTRA CR FOR END OF REC
00A4 30 012B 70 BSBW GETR ;READ WITH COMMAND EXIT ON EOF
FF19 31 012E 71 BRW ME1
0131 72 ENDIF.
0131 73 ;
0131 74 ;
03FC 0131 75 .ENTRY GTVR09R,^M<R2,R3,R4,R5,R6,R7,R8,R9>
0107 30 0133 76 BSBW INITR
57 50 D0 0136 77 MOVL R0,R7
56 51 D0 0139 78 MOVL R1,R6
00000293'EF 56 D0 013C 79 MOVL R6,WINPA
0000'C8 B5 0143 80 TSTW WLL(R8)
0147 81 IF. *EQ ;NO PREVIOUS INPUT
0000028D'EF FFFFFFFF 8F D0 014C 82 MOVL #-1,WOLL
0078 30 0157 83 BSBW GETR
015A 84 ENDIF.
0000028D'EF D4 015A 85 CLRL WOLL
0004'D8 0000'C8 0D'8F 3A 0160 86 LOCC #CR,WLL(R8),@WADDR(R8)
0169 87 IF. *EQ ;NOT FOUND CR
3C 00 0004'D8 0000'C8 2C 016E 88 MOVC5 WLL(R8),@WADDR(R8),#0,#60,(R6)
66 0177
51 0000'C8 D0 0178 89 MOVL WLL(R8),R1
0000'C8 D4 017D 90 CLRL WLL(R8)
0181 91 ELSE. ;CR FOUND
51 0004'C8 C2 0184 92 SUBL2 WADDR(R8),R1 ;LENGTH
51 DD 0189 93 PUSHL R1
66 3C 00 0004'D8 51 2C 018B 94 MOVC5 R1,@WADDR(R8),#0,#60,(R6)
51 8ED0 0193 95 POPL R1
0000'C8 D4 0196 96 CLRL WLL(R8)
019A 97 ENDIF.
3C 51 B1 019A 98 CMPW R1,#60
019D 99 IF. *LT
0000028D'EF 51 D0 01A2 100 MOVL R1,WOLL
01A9 101 ELSE.
0000028D'EF 3C D0 01AC 102 MOVL #60,WOLL
01B3 103 ENDIF.
50 0000028D'EF B0 01B3 104 MOVW WOLL,R0
51 00000293'EF D0 01BA 105 MOVL WINPA,R1
FE3C' 30 01C1 106 BSBW GWRITR2 ;LOG IN BATCH
50 0000028D'EF D0 01C4 107 MOVL WOLL,R0
00000000'EF B4 01CB 108 CLRW GERRN ;CLEAR ERROR
04 01D1 109 RET
01D2 110 ;
01D2 111 GETR:
0000'C8 D4 01D2 112 CLRL WLL(R8)
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 3
14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
0000'C7 000C'D8 D0 01D6 113 MOVL @WIADDR(R8),RAB$L_UBF(R7)
0000'C7 0800 8F B0 01DD 114 MOVW #2048,RAB$W_USZ(R7)
01E4 115 $GET RAB=(R7)
01ED 116 IF. *ERROR ;EOF OR ERROR
66 00000291'EF B0 01F3 117 MOVW WESC,(R6)
00000000'EF 00'8F 93 01FA 118 BITB #GXEXEC,GSTAT
0202 119 IF. *ON ; ;E COMMAND OUTPUT
50 0000028D'EF D0 0207 120 MOVL WOLL,R0
04 020E 121 RET
020F 122 ENDIF.
00000000'EF 00'8F 8A 020F 123 BICB2 #GX2COM,GSTAT2
00000000'EF 00'8F 88 0217 124 BISB2 #GXCTLL,GSTAT ;FORCE ^L
00000000'EF 00 FB 021F 125 CALLS #0,GTVR02 ;MAKE SCREEN
50 0000028D'EF D0 0226 126 MOVL WOLL,R0
04 022D 127 RET
022E 128 ENDIF.
0000'C8 0000'C7 B0 022E 129 MOVW RAB$W_RSZ(R7),WLL(R8)
0004'C8 000C'D8 D0 0235 130 MOVL @WIADDR(R8),WADDR(R8)
05 023C 131 RSB
023D 132 ;
023D 133 ; FIND BASE FOR WORK FIELDS
023D 134 ;
023D 135 INITR:
58 0000026B'EF 9E 023D 136 MOVAB WIPAR1,R8
0008'C8 D5 0244 137 TSTL WRAB(R8)
0248 138 IF. *EQ ;NOT USED
0008'C8 50 D0 024D 139 MOVL R0,WRAB(R8)
05 0252 140 RSB
0253 141 ENDIF.
0008'C8 50 D1 0253 142 CMPL R0,WRAB(R8)
0258 143 IF. *EQ ;SAME
05 025D 144 RSB
025E 145 ENDIF.
58 0000027C'EF 9E 025E 146 MOVAB WIPAR2,R8
0008'C8 50 D0 0265 147 MOVL R0,WRAB(R8)
05 026A 148 RSB
00000000 026B 149 WLL=0
00000004 026B 150 WADDR=4
00000008 026B 151 WRAB=8
0000000C 026B 152 WIADDR=12
00000010 026B 153 WSTAT=16
00000080 026B 154 WXTRUNC=^X80 ;INPUT TOO LONG
00000277 026B 155 WIPAR1: .BLKL 3
00000000' 0277 156 .LONG GIBUF3A
0000027C 027B 157 .BLKB
00000288 027C 158 WIPAR2: .BLKL 3
00000000' 0288 159 .LONG GIBUF4A
0000028D 028C 160 .BLKB
00000291 028D 161 WOLL: .BLKL
1B 1B 0291 162 WESC: .BYTE 27,27
00000297 0293 163 WINPA: .BLKL
0000000D 0297 164 CR=13
0297 165 .END
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 4
Symbol table 14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
$$.TMP1 = 00000001 WXTRUNC = 00000080
$$.TMP2 = 00000067
CR = 0000000D
EIF.3 00000131 R 02
EIF.7 0000019A R 02
EIF.8 000001B3 R 02
GERRN ******** X 02
GETR 000001D2 R 02
GIBUF3A ******** X 02
GIBUF4A ******** X 02
GSTAT ******** X 02
GSTAT2 ******** X 02
GTVR02 ******** X 02
GTVR09 00000000 RG 02
GTVR09R 00000131 RG 02
GWRITR2 ******** X 02
GX2COM ******** X 02
GXCTLL ******** X 02
GXEXEC ******** X 02
IF.1 00000029 R 02
IF.10 0000020F R 02
IF.11 00000253 R 02
IF.12 0000025E R 02
IF.2 0000004A R 02
IF.3 000000D3 R 02
IF.4 00000099 R 02
IF.5 0000010D R 02
IF.6 0000015A R 02
IF.7 00000184 R 02
IF.8 000001AC R 02
IF.9 0000022E R 02
IF_CNT. = 00000001
IF_I. = 00000001
IF_LAB. = 0000000C
IF_LEV. = 00000000
IF_MAX. = 0000000C
IF_RTC. = 00000001
IF_STAT. = 00000000
IF_STRT. = 0000000B
IF_USE. = 00000002
INITR 0000023D R 02
INITSW. = 00000002
ME1 0000004A R 02
RAB$L_UBF ******** X 02
RAB$W_RSZ ******** X 02
RAB$W_USZ ******** X 02
SYS$GET ******** GX 02
WADDR = 00000004
WESC 00000291 R 02
WIADDR = 0000000C
WINPA 00000293 R 02
WIPAR1 0000026B R 02
WIPAR2 0000027C R 02
WLL = 00000000
WOLL 0000028D R 02
WRAB = 00000008
WSTAT = 00000010
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 5
Psect synopsis 14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
+----------------+
! Psect synopsis !
+----------------+
PSECT name Allocation PSECT No. Attributes
---------- ---------- --------- ----------
. ABS . 00000000 ( 0.) 00 ( 0.) NOPIC USR CON ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE
. BLANK . 00000000 ( 0.) 01 ( 1.) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC BYTE
GTVR09 00000297 ( 663.) 02 ( 2.) NOPIC USR CON REL LCL NOSHR EXE RD WRT NOVEC QUAD
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 6
Cross reference 14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
+------------------------+
! Symbol Cross Reference !
+------------------------+
SYMBOL VALUE DEFINITION REFERENCES...
------ ----- ---------- -------------
$$.TMP1 =00000001 115 (1) 115 (1)
$$.TMP2 =00000067 115 (1) 115 (1)
CR =0000000D 164 (1) #-69 (1) #-86 (1)
EIF.3 00000131-R 72 (1) #-53 (1)
EIF.7 0000019A-R 97 (1) #-91 (1)
EIF.8 000001B3-R 103 (1) #-101 (1)
GERRN 00000000-XR #-108 (1)
GETR 000001D2-R 111 (1) #-20 (1) #-70 (1) #-83 (1)
GIBUF3A 00000000-XR 156 (1)
GIBUF4A 00000000-XR 159 (1)
GSTAT 00000000-XR #-118 (1) #-124 (1)
GSTAT2 00000000-XR #-123 (1)
GTVR02 00000000-XR 125 (1)
GTVR09 00000000-R 12 (1)
GTVR09R 00000131-R 75 (1)
GWRITR2 00000000-XR #-106 (1) #-37 (1) #-50 (1) #-59 (1)
GX2COM 00000000-XR #-123 (1)
GXCTLL 00000000-XR #-124 (1)
GXEXEC 00000000-XR #-118 (1)
IF.1 00000029-R 21 (1) #-18 (1)
IF.10 0000020F-R 122 (1) #-119 (1)
IF.11 00000253-R 141 (1) #-138 (1)
IF.12 0000025E-R 145 (1) #-143 (1)
IF.2 0000004A-R 28 (1) #-24 (1)
IF.3 000000D3-R 53 (1) #-30 (1)
IF.4 00000099-R 42 (1) #-34 (1)
IF.5 0000010D-R 64 (1) #-56 (1)
IF.6 0000015A-R 84 (1) #-81 (1)
IF.7 00000184-R 91 (1) #-87 (1)
IF.8 000001AC-R 101 (1) #-99 (1)
IF.9 0000022E-R 128 (1) #-116 (1)
IF_CNT. =00000001 143 (1) 101 (1) 103 (1) 116 (1) 119 (1) 122 (1)
128 (1) 138 (1) 141 (1) 143 (1) 145 (1)
18 (1) 21 (1) 24 (1) 28 (1) 30 (1)
34 (1) 42 (1) 53 (1) 56 (1) 64 (1)
72 (1) 81 (1) 84 (1) 87 (1) 91 (1)
97 (1) 99 (1)
IF_I. =00000001 145 (1) 101 (1) 103 (1) 122 (1) 128 (1) 141 (1)
145 (1) 21 (1) 28 (1) 42 (1) 53 (1)
64 (1) 72 (1) 84 (1) 91 (1) 97 (1)
IF_LAB. =0000000C 145 (1)
IF_LEV. =00000000 145 (1) 103 (1) 116 (1) 119 (1) 122 (1) 128 (1)
138 (1) 141 (1) 143 (1) 145 (1) 18 (1)
21 (1) 24 (1) 28 (1) 30 (1) 34 (1)
42 (1) 56 (1) 64 (1) 72 (1) 81 (1)
84 (1) 87 (1) 97 (1) 99 (1)
IF_MAX. =0000000C 143 (1) 116 (1) 119 (1) 138 (1) 143 (1) 18 (1)
24 (1) 30 (1) 34 (1) 56 (1) 81 (1)
87 (1) 99 (1)
IF_RTC. =00000001 143 (1)
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 7
Cross reference 14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
IF_STAT. =00000000 145 (1) 101 (1) 103 (1) 116 (1) 119 (1) 122 (1)
128 (1) 138 (1) 141 (1) 143 (1) 145 (1)
18 (1) 21 (1) 24 (1) 28 (1) 30 (1)
34 (1) 42 (1) 53 (1) 56 (1) 64 (1)
72 (1) 81 (1) 84 (1) 87 (1) 91 (1)
97 (1) 99 (1)
IF_STRT. =0000000B 143 (1) 101 (1) 103 (1) 122 (1) 128 (1) 141 (1)
145 (1) 21 (1) 28 (1) 42 (1) 53 (1)
64 (1) 72 (1) 84 (1) 91 (1) 97 (1)
IF_USE. =00000002 145 (1) 101 (1) 103 (1) 122 (1) 128 (1) 141 (1)
145 (1) 21 (1) 28 (1) 42 (1) 53 (1)
64 (1) 72 (1) 84 (1) 91 (1) 97 (1)
INITR 0000023D-R 135 (1) #-13 (1) #-76 (1)
INITSW. =00000002 18 (1) 116 (1) 119 (1) 138 (1) 143 (1) 18 (1)
24 (1) 30 (1) 34 (1) 56 (1) 81 (1)
87 (1) 99 (1)
ME1 0000004A-R 29 (1) #-71 (1)
RAB$L_UBF 00000000-XR #-113 (1)
RAB$W_RSZ 00000000-XR #-129 (1)
RAB$W_USZ 00000000-XR #-114 (1)
SYS$GET 00000000-XR 115 (1)
WADDR =00000004 150 (1) #-130 (1) 29 (1) #-31 (1) 46 (1) #-47 (1)
67 (1) 86 (1) 88 (1) #-92 (1) 94 (1)
WESC 00000291-R 162 (1) #-117 (1) 29 (1) #-38 (1) #-60 (1)
WIADDR =0000000C 152 (1) #-113 (1) #-130 (1)
WINPA 00000293-R 163 (1) #-105 (1) #-16 (1) #-36 (1) #-49 (1) #-58 (1)
#-79 (1)
WIPAR1 0000026B-R 155 (1) 136 (1)
WIPAR2 0000027C-R 158 (1) 146 (1)
WLL =00000000 149 (1) #-112 (1) #-129 (1) #-17 (1) #-29 (1) #-43 (1)
#-54 (1) #-65 (1) #-67 (1) #-80 (1) #-86 (1)
#-88 (1) #-89 (1) #-90 (1) #-96 (1)
WOLL 0000028D-R 161 (1) #-100 (1) #-102 (1) #-104 (1) #-107 (1) #-120 (1)
#-126 (1) #-19 (1) #-22 (1) #-26 (1) #-32 (1)
#-35 (1) #-39 (1) #-44 (1) #-45 (1) #-48 (1)
#-51 (1) #-54 (1) #-57 (1) #-61 (1) #-65 (1)
#-66 (1) #-82 (1) #-85 (1)
WRAB =00000008 151 (1) #-137 (1) #-139 (1) #-142 (1) #-147 (1)
WSTAT =00000010 153 (1) #-23 (1) #-25 (1) #-40 (1) #-62 (1)
WXTRUNC =00000080 154 (1) #-23 (1) #-25 (1) #-40 (1) #-62 (1)
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 8
Cross reference 14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
+------------------------+
! Macros Cross Reference !
+------------------------+
MACRO SIZE DEFINITION REFERENCES...
----- ---- ---------- -------------
$GET 1 115 (1) 115 (1)
$RMSCALL 2 115 (1) 115 (1)
BLAB. 1 53 (1) 101 (1) 53 (1) 91 (1)
ELSE. 1 53 (1) 101 (1) 53 (1) 91 (1)
ENDIF. 1 21 (1) 103 (1) 122 (1) 128 (1) 141 (1) 145 (1)
21 (1) 28 (1) 42 (1) 64 (1) 72 (1)
84 (1) 97 (1)
IF. 1 18 (1) 116 (1) 119 (1) 138 (1) 143 (1) 18 (1)
24 (1) 30 (1) 34 (1) 56 (1) 81 (1)
87 (1) 99 (1)
IFC. 4 18 (1) 116 (1) 119 (1) 138 (1) 143 (1) 18 (1)
24 (1) 30 (1) 34 (1) 56 (1) 81 (1)
87 (1) 99 (1)
IFL. 1 18 (1) 119 (1) 138 (1) 143 (1) 18 (1) 24 (1)
30 (1) 34 (1) 56 (1) 81 (1) 87 (1)
99 (1)
IFL2. 1 116 (1) 116 (1)
INIT 1 12 (1) 12 (1)
LAB. 1 21 (1) 101 (1) 103 (1) 122 (1) 128 (1) 141 (1)
145 (1) 21 (1) 28 (1) 42 (1) 53 (1)
64 (1) 72 (1) 84 (1) 91 (1) 97 (1)
LOCAT. 1 21 (1) 101 (1) 103 (1) 122 (1) 128 (1) 141 (1)
145 (1) 21 (1) 28 (1) 42 (1) 53 (1)
64 (1) 72 (1) 84 (1) 91 (1) 97 (1)
+------------------------+
! Performance indicators !
+------------------------+
Phase Page faults CPU Time Elapsed Time
----- ----------- -------- ------------
Initialization 18 00:00:00.07 00:00:00.28
Command processing 17 00:00:00.32 00:00:01.01
Pass 1 170 00:00:06.09 00:00:10.96
Symbol table sort 0 00:00:00.07 00:00:00.12
Pass 2 50 00:00:01.15 00:00:02.45
Symbol table output 5 00:00:00.09 00:00:00.20
Psect synopsis output 2 00:00:00.04 00:00:00.13
Cross-reference output 26 00:00:00.85 00:00:01.45
Assembler run totals 289 00:00:08.71 00:00:16.63
The working set limit was 678 pages.
14735 bytes (29 pages) of virtual memory were used to buffer the intermediate code.
There were 10 pages of symbol table space allocated to hold 58 non-local and 12 local symbols.
165 source lines were read in Pass 1, producing 19 object records in Pass 2.
16 pages of virtual memory were used to define 12 macros.
GTVR09 - FILE INPUT ROUTINE 26-OCT-1984 16:27:30 VAX-11 Macro V03-00 Page 9
VAX-11 Macro Run Statistics 14-AUG-1984 16:42:11 DUA5:[INTTOOLS.TVAXV2]GTVR09.MAR;1(1)
+--------------------------+
! Macro library statistics !
+--------------------------+
Macro library name Macros defined
------------------ --------------
DUA5:[INTTOOLS.TVAXV2]TV.MLB;2 10
SYS$SYSROOT:[SYSLIB]STARLET.MLB;1 2
TOTALS (all libraries) 12
194 GETS were required to define 12 macros.
There were no errors, warnings or information messages.
/OBJECT GTVR09/LIST/CROSS+TV/LIBRARY