1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
|
000,VERSIONS:,1:7.5p1
001,CATCH return ok,17
002,CATCH return error,33
003,CATCH no catch used,9
004,IF if true numeric,61
005,IF elseif true numeric,292
006,IF else true numeric,82
007,IF if true num/num,174
008,IF if false num/num,182
009,IF if false al/num,121
010,IF if true al/al,184
011,IF if false al/al,243
012,IF if true al,76
013,IF elseif true al,154
014,IF else true al,323
015,SWITCH first true,241
016,SWITCH second true,282
017,SWITCH ninth true,284
018,SWITCH default true,292
019,DATA create in a list,29501
020,DATA create in an array,40784
021,DATA access in a list,175028
022,DATA access in an array,39744
023,EVAL cmd eval in list obj var,26
024,EVAL cmd eval as list,52
025,EVAL cmd eval as string,64
026,EVAL cmd and mixed lists,2112
027,EVAL list cmd and mixed lists,2259
028,EVAL list cmd and pure lists,2245
029,EXPR unbraced,365
030,EXPR braced,386
031,EXPR inline,177
032,EXPR one operand,65
033,EXPR ten operands,141
034,EXPR fifty operands,430
035,EXPR incr with incr,45
036,EXPR incr with expr,74
037,FCOPY std: 160010 bytes,26979
038,"STR/LIST length, obj shimmer",2638
039,"LIST length, pure list",1837
040,STR length of a LIST,400
041,"LIST exact search, first item",1693
042,"LIST exact search, middle item",1944
043,"LIST exact search, last item",2009
044,"LIST exact search, non-item",2118
045,"LIST sorted search, first item",1610
046,"LIST sorted search, middle item",2252
047,"LIST sorted search, last item",1784
048,"LIST sorted search, non-item",2057
049,"LIST exact search, untyped item",2218
050,"LIST exact search, typed item",1872
051,"LIST sorted search, typed item",2221
052,LIST sort,9644
053,LIST typed sort,23969
054,LIST remove first element,522
055,LIST remove middle element,677
056,LIST remove last element,675
057,LIST replace first element,978
058,LIST replace middle element,876
059,LIST replace last element,1243
060,LIST replace first el with multiple,612
061,LIST replace middle el with multiple,1123
062,LIST replace last el with multiple,1313
063,LIST replace range,971
064,LIST remove in mixed list,617
065,LIST replace in mixed list,592
066,LIST index first element,375
067,LIST index middle element,536
068,LIST index last element,663
069,LIST insert an item at start,563
070,LIST insert an item at middle,630
071,"LIST insert an item at ""end""",1200
072,"LIST small, early range",383
073,"LIST small, late range",685
074,"LIST large, early range",697
075,"LIST large, late range",551
076,LIST append to list,682
077,LIST join list,3167
078,"LOOP for, iterate list",583297
079,"LOOP foreach, iterate list",12556
080,LOOP for (to 1000),73851
081,LOOP while (to 1000),80404
082,"LOOP for, iterate string",199570
083,"LOOP foreach, iterate string",13206
084,MAP string 1 val,(8.2+)
085,MAP string 2 val,(8.2+)
086,MAP string 3 val,(8.2+)
087,MAP string 4 val,(8.2+)
088,MAP string 1 val -nocase,(8.2+)
089,MAP string 2 val -nocase,(8.2+)
090,MAP string 3 val -nocase,(8.2+)
091,MAP string 4 val -nocase,(8.2+)
092,MAP regsub 1 val,3684
093,MAP regsub 2 val,11576
094,MAP regsub 3 val,12456
095,MAP regsub 4 val,13884
096,MAP regsub 1 val -nocase,4488
097,MAP regsub 2 val -nocase,11911
098,MAP regsub 3 val -nocase,14437
099,MAP regsub 4 val -nocase,16818
100,"MAP string, no match",(8.2+)
101,"MAP string -nocase, no match",(8.2+)
102,"MAP regsub, no match",4823
103,"MAP regsub -nocase, no match",5249
104,MAP string short,(8.2+)
105,MAP regsub short,432
106,PROC explicit return,11
107,PROC implicit return,15
108,PROC explicit return (2),10
109,PROC implicit return (2),24
110,PROC explicit return (3),25
111,PROC implicit return (3),18
112,PROC heavily commented,753
113,"PROC do-nothing, no args",2
114,"PROC do-nothing, one arg",21
115,PROC local links with global,11505
116,PROC local links with upvar,10317
117,PROC local links with variable,9212
118,"READ 595K, gets",985676
119,"READ 595K, read",3834017
120,"READ 595K, read & size",3704813
121,"READ 3050b, gets",2201
122,"READ 3050b, read",415
123,"READ 3050b, read & size",361
124,"BREAD 595K, gets",979961
125,"BREAD 595K, read",3741298
126,"BREAD 595K, read & size",3688120
127,"BREAD 3050b, gets",2178
128,"BREAD 3050b, read",359
129,"BREAD 3050b, read & size",495
130,REGEXP literal regexp,26
131,REGEXP var-based regexp,61
132,REGEXP count all matches,2776
133,REGEXP extract all matches,3620
134,STARTUP time to launch tclsh,90323
135,STR str [string compare],193
136,STR str [string equal],198
137,"STR str $a equal """"",410
138,"STR str num == """"",419
139,STR str $a eq $b,261
140,STR str $a ne $b,265
141,STR str $a eq $b (same obj),338
142,STR str $a ne $b (same obj),235
143,STR length (==4010),867
144,STR index 0,614
145,STR index 100,601
146,STR index 500,493
147,STR index2 0,583
148,STR index2 100,459
149,STR index2 500,468
150,STR first (success),519
151,STR first (failure),822
152,STR first (total failure),631
153,STR last (success),728
154,STR last (failure),859
155,STR last (total failure),1153
156,"STR match, simple (success early)",489
157,"STR match, simple (success late)",502
158,"STR match, simple (failure)",680
159,"STR match, simple (total failure)",378
160,"STR match, complex (success early)",448
161,"STR match, complex (success late)",1676
162,"STR match, complex (failure)",1698
163,"STR match, complex (total failure)",1602
164,"STR range, index 100..200 of 4010",609
165,"STR replace, no replacement",1315
166,"STR replace, equal replacement",1263
167,"STR replace, longer replacement",1309
168,"STR repeat, abcdefghij * 10",963
169,"STR repeat, abcdefghij * 100",9065
170,"STR repeat, abcdefghij * 1000",86928
171,"STR repeat, 4010 chars * 10",7688
172,"STR repeat, 4010 chars * 100",107290
173,"STR reverse iter1, 100 chars",8704
174,"STR reverse iter1, 100 uchars",9034
175,"STR reverse iter2, 100 chars",8292
176,"STR reverse iter2, 100 uchars",5431
177,"STR reverse recur1, 100 chars",11271
178,"STR reverse recur1, 100 uchars",13821
179,"STR split, 4010 chars",3169
180,"STR split, 12000 uchars",9080
181,"STR split iter, 4010 chars",48521
182,"STR split iter, 12000 uchars",156287
183,STR append,1145
184,STR append (1KB + 1KB),290
185,STR append (10KB + 1KB),213
186,STR append (1MB + 2b * 1000),84345
187,STR append (1MB + 1KB),335
188,STR append (1MB + 1KB * 20),1724
189,STR append (1MB + 1KB * 1000),81930
190,STR append (1MB + 1MB * 3),876
191,STR append (1MB + 1MB * 5),342
192,STR append (1MB + (1b + 1K + 1b) * 100),9893
193,STR info locals match,9043
194,TRACE no trace set,91
195,TRACE read,113
196,TRACE write,78
197,TRACE unset,112
198,TRACE all set (rwu),105
199,UNSET var exists,37
200,UNSET catch var exists,58
201,UNSET catch var !exist,96
202,UNSET info check var exists,78
203,UNSET info check var !exist,64
204,UNSET nocomplain var exists,56
205,UNSET nocomplain var !exist,109
206,VAR access locally set,67
207,VAR access local proc arg,110
208,VAR access global,121
209,VAR access upvar,101
210,VAR set scalar,74
211,VAR set array element,35
212,VAR 100 'set's in array,827
213,VAR 'array set' of 100 elems,993
|
