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
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
|
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">
<html>
<head>
<meta http-equiv="content-type" content="text/html; charset=UTF-8">
<title>Mu - 100trace_browser.cc</title>
<meta name="Generator" content="Vim/7.4">
<meta name="plugin-version" content="vim7.4_v2">
<meta name="syntax" content="cpp">
<meta name="settings" content="number_lines,use_css,pre_wrap,no_foldcolumn,expand_tabs,line_ids,prevent_copy=">
<meta name="colorscheme" content="minimal">
<style type="text/css">
<!--
pre { white-space: pre-wrap; font-family: monospace; color: #aaaaaa; background-color: #080808; }
body { font-size: 12pt; font-family: monospace; color: #aaaaaa; background-color: #080808; }
a { color:#eeeeee; text-decoration: none; }
a:hover { text-decoration: underline; }
* { font-size: 12pt; font-size: 1em; }
.Constant { color: #00a0a0; }
.Conceal { color: #4e4e4e; }
.Comment { color: #9090ff; }
.Comment a { color:#0000ee; text-decoration:underline; }
.Delimiter { color: #800080; }
.LineNr { color: #444444; }
.Identifier { color: #c0a020; }
.Normal { color: #aaaaaa; background-color: #080808; padding-bottom: 1px; }
.cSpecial { color: #008000; }
-->
</style>
<script type='text/javascript'>
<!--
/* function to open any folds containing a jumped-to line before jumping to it */
function JumpToLine()
{
var lineNum;
lineNum = window.location.hash;
lineNum = lineNum.substr(1); /* strip off '#' */
if (lineNum.indexOf('L') == -1) {
lineNum = 'L'+lineNum;
}
lineElem = document.getElementById(lineNum);
/* Always jump to new location even if the line was hidden inside a fold, or
* we corrected the raw number to a line ID.
*/
if (lineElem) {
lineElem.scrollIntoView(true);
}
return true;
}
if ('onhashchange' in window) {
window.onhashchange = JumpToLine;
}
-->
</script>
</head>
<body onload='JumpToLine();'>
<pre id='vimCodeElement'>
<span id="L1" class="LineNr"> 1 </span><span class="Comment">//: A debugging helper that lets you zoom in/out on a trace.</span>
<span id="L2" class="LineNr"> 2 </span><span class="Comment">//:</span>
<span id="L3" class="LineNr"> 3 </span><span class="Comment">//: To try it out, first create an example trace:</span>
<span id="L4" class="LineNr"> 4 </span><span class="Comment">//: mu --trace nqueens.mu</span>
<span id="L5" class="LineNr"> 5 </span><span class="Comment">//: Then to browse the trace, which was stored in a file called 'last_run':</span>
<span id="L6" class="LineNr"> 6 </span><span class="Comment">//: mu browse-trace last_run</span>
<span id="L7" class="LineNr"> 7 </span><span class="Comment">//:</span>
<span id="L8" class="LineNr"> 8 </span><span class="Comment">//: You should now find yourself in a UI showing a subsequence of lines from</span>
<span id="L9" class="LineNr"> 9 </span><span class="Comment">//: the trace, each line starting with a numeric depth, and ending with a</span>
<span id="L10" class="LineNr"> 10 </span><span class="Comment">//: parenthetical count of trace lines hidden after it with greater depths.</span>
<span id="L11" class="LineNr"> 11 </span><span class="Comment">//:</span>
<span id="L12" class="LineNr"> 12 </span><span class="Comment">//: For example, this line:</span>
<span id="L13" class="LineNr"> 13 </span><span class="Comment">//: 2 app: line1 (30)</span>
<span id="L14" class="LineNr"> 14 </span><span class="Comment">//: indicates that it was logged with depth 2, and that 30 following lines</span>
<span id="L15" class="LineNr"> 15 </span><span class="Comment">//: have been hidden at a depth greater than 2.</span>
<span id="L16" class="LineNr"> 16 </span><span class="Comment">//:</span>
<span id="L17" class="LineNr"> 17 </span><span class="Comment">//: As an experiment, hidden counts of 1000 or more are in red to highlight</span>
<span id="L18" class="LineNr"> 18 </span><span class="Comment">//: where you might be particularly interested in expanding.</span>
<span id="L19" class="LineNr"> 19 </span><span class="Comment">//:</span>
<span id="L20" class="LineNr"> 20 </span><span class="Comment">//: The UI provides the following hotkeys:</span>
<span id="L21" class="LineNr"> 21 </span><span class="Comment">//:</span>
<span id="L22" class="LineNr"> 22 </span><span class="Comment">//: `q` or `ctrl-c`: Quit.</span>
<span id="L23" class="LineNr"> 23 </span><span class="Comment">//:</span>
<span id="L24" class="LineNr"> 24 </span><span class="Comment">//: `Enter`: 'Zoom into' this line. Expand some or all of the hidden lines</span>
<span id="L25" class="LineNr"> 25 </span><span class="Comment">//: at the next higher level, updating parenthetical counts of hidden lines.</span>
<span id="L26" class="LineNr"> 26 </span><span class="Comment">//:</span>
<span id="L27" class="LineNr"> 27 </span><span class="Comment">//: `Backspace`: 'Zoom out' on a line after zooming in, collapsing expanded</span>
<span id="L28" class="LineNr"> 28 </span><span class="Comment">//: lines below by some series of <Enter> commands.</span>
<span id="L29" class="LineNr"> 29 </span><span class="Comment">//:</span>
<span id="L30" class="LineNr"> 30 </span><span class="Comment">//: `j` or `down-arrow`: Move/scroll cursor down one line.</span>
<span id="L31" class="LineNr"> 31 </span><span class="Comment">//: `k` or `up-arrow`: Move/scroll cursor up one line.</span>
<span id="L32" class="LineNr"> 32 </span><span class="Comment">//: `J` or `ctrl-f` or `page-down`: Scroll cursor down one page.</span>
<span id="L33" class="LineNr"> 33 </span><span class="Comment">//: `K` or `ctrl-b` or `page-up`: Scroll cursor up one page.</span>
<span id="L34" class="LineNr"> 34 </span><span class="Comment">//: `h` or `left-arrow`: Scroll cursor left one character.</span>
<span id="L35" class="LineNr"> 35 </span><span class="Comment">//: `l` or `right-arrow`: Scroll cursor right one character.</span>
<span id="L36" class="LineNr"> 36 </span><span class="Comment">//: `H`: Scroll cursor left one screen-width.</span>
<span id="L37" class="LineNr"> 37 </span><span class="Comment">//: `L`: Scroll cursor right one screen-width.</span>
<span id="L38" class="LineNr"> 38 </span><span class="Comment">//:</span>
<span id="L39" class="LineNr"> 39 </span><span class="Comment">//: `g` or `home`: Move cursor to start of trace.</span>
<span id="L40" class="LineNr"> 40 </span><span class="Comment">//: `G` or `end`: Move cursor to end of trace.</span>
<span id="L41" class="LineNr"> 41 </span><span class="Comment">//:</span>
<span id="L42" class="LineNr"> 42 </span><span class="Comment">//: `t`: Move cursor to top line on screen.</span>
<span id="L43" class="LineNr"> 43 </span><span class="Comment">//: `c`: Move cursor to center line on screen.</span>
<span id="L44" class="LineNr"> 44 </span><span class="Comment">//: `b`: Move cursor to bottom line on screen.</span>
<span id="L45" class="LineNr"> 45 </span><span class="Comment">//: `T`: Scroll line at cursor to top of screen.</span>
<span id="L46" class="LineNr"> 46 </span>
<span id="L47" class="LineNr"> 47 </span><span class="Delimiter">:(before "End Primitive Recipe Declarations")</span>
<span id="L48" class="LineNr"> 48 </span>_BROWSE_TRACE<span class="Delimiter">,</span>
<span id="L49" class="LineNr"> 49 </span><span class="Delimiter">:(before "End Primitive Recipe Numbers")</span>
<span id="L50" class="LineNr"> 50 </span><a href='001help.cc.html#L218'>put</a><span class="Delimiter">(</span>Recipe_ordinal<span class="Delimiter">,</span> <span class="Constant">"$browse-trace"</span><span class="Delimiter">,</span> _BROWSE_TRACE<span class="Delimiter">);</span>
<span id="L51" class="LineNr"> 51 </span><span class="Delimiter">:(before "End Primitive Recipe Checks")</span>
<span id="L52" class="LineNr"> 52 </span><span class="Normal">case</span> _BROWSE_TRACE: <span class="Delimiter">{</span>
<span id="L53" class="LineNr"> 53 </span> <span class="Identifier">break</span><span class="Delimiter">;</span>
<span id="L54" class="LineNr"> 54 </span><span class="Delimiter">}</span>
<span id="L55" class="LineNr"> 55 </span><span class="Delimiter">:(before "End Primitive Recipe Implementations")</span>
<span id="L56" class="LineNr"> 56 </span><span class="Normal">case</span> _BROWSE_TRACE: <span class="Delimiter">{</span>
<span id="L57" class="LineNr"> 57 </span> <a href='100trace_browser.cc.html#L77'>start_trace_browser</a><span class="Delimiter">();</span>
<span id="L58" class="LineNr"> 58 </span> <span class="Identifier">break</span><span class="Delimiter">;</span>
<span id="L59" class="LineNr"> 59 </span><span class="Delimiter">}</span>
<span id="L60" class="LineNr"> 60 </span>
<span id="L61" class="LineNr"> 61 </span><span class="Comment">//: browse a trace loaded from a file</span>
<span id="L62" class="LineNr"> 62 </span><span class="Delimiter">:(after "Commandline Parsing")</span>
<span id="L63" class="LineNr"> 63 </span><span class="Normal">if</span> <span class="Delimiter">(</span>argc == <span class="Constant">3</span> && <a href='001help.cc.html#L70'>is_equal</a><span class="Delimiter">(</span>argv[<span class="Constant">1</span>]<span class="Delimiter">,</span> <span class="Constant">"browse-trace"</span><span class="Delimiter">))</span> <span class="Delimiter">{</span>
<span id="L64" class="LineNr"> 64 </span> <a href='100trace_browser.cc.html#L295'>load_trace</a><span class="Delimiter">(</span>argv[<span class="Constant">2</span>]<span class="Delimiter">);</span>
<span id="L65" class="LineNr"> 65 </span> <a href='100trace_browser.cc.html#L77'>start_trace_browser</a><span class="Delimiter">();</span>
<span id="L66" class="LineNr"> 66 </span> <span class="Identifier">return</span> <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L67" class="LineNr"> 67 </span><span class="Delimiter">}</span>
<span id="L68" class="LineNr"> 68 </span>
<span id="L69" class="LineNr"> 69 </span><span class="Delimiter">:(before "End Globals")</span>
<span id="L70" class="LineNr"> 70 </span>set<<span class="Normal">int</span>> Visible<span class="Delimiter">;</span>
<span id="L71" class="LineNr"> 71 </span><span class="Normal">int</span> Top_of_screen = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L72" class="LineNr"> 72 </span><span class="Normal">int</span> Left_of_screen = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L73" class="LineNr"> 73 </span><span class="Normal">int</span> Last_printed_row = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L74" class="LineNr"> 74 </span>map<<span class="Normal">int</span><span class="Delimiter">,</span> <span class="Normal">int</span>> Trace_index<span class="Delimiter">;</span> <span class="Comment">// screen row -> trace index</span>
<span id="L75" class="LineNr"> 75 </span>
<span id="L76" class="LineNr"> 76 </span><span class="Delimiter">:(code)</span>
<span id="L77" class="LineNr"> 77 </span><span class="Normal">void</span> <a href='100trace_browser.cc.html#L77'>start_trace_browser</a><span class="Delimiter">()</span> <span class="Delimiter">{</span>
<span id="L78" class="LineNr"> 78 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!Trace_stream<span class="Delimiter">)</span> <span class="Identifier">return</span><span class="Delimiter">;</span>
<span id="L79" class="LineNr"> 79 </span> cerr << <span class="Constant">"computing min depth to display</span><span class="cSpecial">\n</span><span class="Constant">"</span><span class="Delimiter">;</span>
<span id="L80" class="LineNr"> 80 </span> <span class="Normal">int</span> min_depth = <span class="Constant">9999</span><span class="Delimiter">;</span>
<span id="L81" class="LineNr"> 81 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L82" class="LineNr"> 82 </span> <span class="Conceal">¦</span> trace_line& curr_line = Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">);</span>
<span id="L83" class="LineNr"> 83 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>curr_line<span class="Delimiter">.</span>depth < min_depth<span class="Delimiter">)</span> min_depth = curr_line<span class="Delimiter">.</span>depth<span class="Delimiter">;</span>
<span id="L84" class="LineNr"> 84 </span> <span class="Delimiter">}</span>
<span id="L85" class="LineNr"> 85 </span> cerr << <span class="Constant">"min depth is "</span> << min_depth << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span>
<span id="L86" class="LineNr"> 86 </span> cerr << <span class="Constant">"computing lines to display</span><span class="cSpecial">\n</span><span class="Constant">"</span><span class="Delimiter">;</span>
<span id="L87" class="LineNr"> 87 </span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> i = <span class="Constant">0</span><span class="Delimiter">;</span> i < <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">);</span> ++i<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L88" class="LineNr"> 88 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>i<span class="Delimiter">).</span>depth == min_depth<span class="Delimiter">)</span>
<span id="L89" class="LineNr"> 89 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Visible<span class="Delimiter">.</span>insert<span class="Delimiter">(</span>i<span class="Delimiter">);</span>
<span id="L90" class="LineNr"> 90 </span> <span class="Delimiter">}</span>
<span id="L91" class="LineNr"> 91 </span> tb_init<span class="Delimiter">();</span>
<span id="L92" class="LineNr"> 92 </span> Display_row = Display_column = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L93" class="LineNr"> 93 </span> tb_event event<span class="Delimiter">;</span>
<span id="L94" class="LineNr"> 94 </span> Top_of_screen = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L95" class="LineNr"> 95 </span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L96" class="LineNr"> 96 </span> <span class="Normal">while</span> <span class="Delimiter">(</span><span class="Constant">true</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L97" class="LineNr"> 97 </span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L246'>render</a><span class="Delimiter">();</span>
<span id="L98" class="LineNr"> 98 </span> <span class="Conceal">¦</span> <span class="Normal">do</span> <span class="Delimiter">{</span>
<span id="L99" class="LineNr"> 99 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> tb_poll_event<span class="Delimiter">(</span>&event<span class="Delimiter">);</span>
<span id="L100" class="LineNr">100 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span> <span class="Normal">while</span> <span class="Delimiter">(</span>event<span class="Delimiter">.</span>type != TB_EVENT_KEY<span class="Delimiter">);</span>
<span id="L101" class="LineNr">101 </span> <span class="Conceal">¦</span> <span class="Normal">int</span> key = event<span class="Delimiter">.</span>key ? event<span class="Delimiter">.</span>key : event<span class="Delimiter">.</span>ch<span class="Delimiter">;</span>
<span id="L102" class="LineNr">102 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'q'</span> || key == <span class="Constant">'Q'</span> || key == TB_KEY_CTRL_C<span class="Delimiter">)</span> <span class="Identifier">break</span><span class="Delimiter">;</span>
<span id="L103" class="LineNr">103 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'j'</span> || key == TB_KEY_ARROW_DOWN<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L104" class="LineNr">104 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// move cursor one line down</span>
<span id="L105" class="LineNr">105 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Display_row < Last_printed_row<span class="Delimiter">)</span> ++Display_row<span class="Delimiter">;</span>
<span id="L106" class="LineNr">106 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L107" class="LineNr">107 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'k'</span> || key == TB_KEY_ARROW_UP<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L108" class="LineNr">108 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// move cursor one line up</span>
<span id="L109" class="LineNr">109 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Display_row > <span class="Constant">0</span><span class="Delimiter">)</span> --Display_row<span class="Delimiter">;</span>
<span id="L110" class="LineNr">110 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L111" class="LineNr">111 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'t'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L112" class="LineNr">112 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// move cursor to top of screen</span>
<span id="L113" class="LineNr">113 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Display_row = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L114" class="LineNr">114 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L115" class="LineNr">115 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'c'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L116" class="LineNr">116 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// move cursor to center of screen</span>
<span id="L117" class="LineNr">117 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Display_row = tb_height<span class="Delimiter">()</span>/<span class="Constant">2</span><span class="Delimiter">;</span>
<span id="L118" class="LineNr">118 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L119" class="LineNr">119 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'b'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L120" class="LineNr">120 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// move cursor to bottom of screen</span>
<span id="L121" class="LineNr">121 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Display_row = tb_height<span class="Delimiter">()</span>-<span class="Constant">1</span><span class="Delimiter">;</span>
<span id="L122" class="LineNr">122 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L123" class="LineNr">123 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'T'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L124" class="LineNr">124 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// move cursor _row_ to top of screen</span>
<span id="L125" class="LineNr">125 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Top_of_screen = get<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> Display_row<span class="Delimiter">);</span>
<span id="L126" class="LineNr">126 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Display_row = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L127" class="LineNr">127 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L128" class="LineNr">128 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L129" class="LineNr">129 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'h'</span> || key == TB_KEY_ARROW_LEFT<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L130" class="LineNr">130 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// pan screen one character right</span>
<span id="L131" class="LineNr">131 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> --Left_of_screen<span class="Delimiter">;</span>
<span id="L132" class="LineNr">132 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L133" class="LineNr">133 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'l'</span> || key == TB_KEY_ARROW_RIGHT<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L134" class="LineNr">134 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// pan screen one character left</span>
<span id="L135" class="LineNr">135 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> ++Left_of_screen<span class="Delimiter">;</span>
<span id="L136" class="LineNr">136 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L137" class="LineNr">137 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'H'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L138" class="LineNr">138 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// pan screen one screen-width left</span>
<span id="L139" class="LineNr">139 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Left_of_screen -= <span class="Delimiter">(</span>tb_width<span class="Delimiter">()</span> - <span class="Constant">5</span><span class="Delimiter">);</span>
<span id="L140" class="LineNr">140 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Left_of_screen < <span class="Constant">0</span><span class="Delimiter">)</span> Left_of_screen = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L141" class="LineNr">141 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L142" class="LineNr">142 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'L'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L143" class="LineNr">143 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// pan screen one screen-width right</span>
<span id="L144" class="LineNr">144 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Left_of_screen += <span class="Delimiter">(</span>tb_width<span class="Delimiter">()</span> - <span class="Constant">5</span><span class="Delimiter">);</span>
<span id="L145" class="LineNr">145 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L146" class="LineNr">146 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'J'</span> || key == TB_KEY_PGDN || key == TB_KEY_CTRL_F<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L147" class="LineNr">147 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// page-down</span>
<span id="L148" class="LineNr">148 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Trace_index<span class="Delimiter">.</span>find<span class="Delimiter">(</span>tb_height<span class="Delimiter">()</span>-<span class="Constant">1</span><span class="Delimiter">)</span> != Trace_index<span class="Delimiter">.</span><a href='003trace.cc.html#L185'>end</a><span class="Delimiter">())</span> <span class="Delimiter">{</span>
<span id="L149" class="LineNr">149 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Top_of_screen = get<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> tb_height<span class="Delimiter">()</span>-<span class="Constant">1</span><span class="Delimiter">)</span> + <span class="Constant">1</span><span class="Delimiter">;</span>
<span id="L150" class="LineNr">150 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L151" class="LineNr">151 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L152" class="LineNr">152 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L153" class="LineNr">153 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'K'</span> || key == TB_KEY_PGUP || key == TB_KEY_CTRL_B<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L154" class="LineNr">154 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// page-up is more convoluted</span>
<span id="L155" class="LineNr">155 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> screen_row = tb_height<span class="Delimiter">();</span> screen_row > <span class="Constant">0</span> && Top_of_screen > <span class="Constant">0</span><span class="Delimiter">;</span> --screen_row<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L156" class="LineNr">156 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> --Top_of_screen<span class="Delimiter">;</span>
<span id="L157" class="LineNr">157 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Top_of_screen <= <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Identifier">break</span><span class="Delimiter">;</span>
<span id="L158" class="LineNr">158 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">while</span> <span class="Delimiter">(</span>Top_of_screen > <span class="Constant">0</span> && !contains_key<span class="Delimiter">(</span>Visible<span class="Delimiter">,</span> Top_of_screen<span class="Delimiter">))</span>
<span id="L159" class="LineNr">159 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> --Top_of_screen<span class="Delimiter">;</span>
<span id="L160" class="LineNr">160 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L161" class="LineNr">161 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Top_of_screen >= <span class="Constant">0</span><span class="Delimiter">)</span>
<span id="L162" class="LineNr">162 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L163" class="LineNr">163 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L164" class="LineNr">164 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'g'</span> || key == TB_KEY_HOME<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L165" class="LineNr">165 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Top_of_screen = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L166" class="LineNr">166 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Last_printed_row = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L167" class="LineNr">167 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Display_row = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L168" class="LineNr">168 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L169" class="LineNr">169 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L170" class="LineNr">170 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == <span class="Constant">'G'</span> || key == TB_KEY_END<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L171" class="LineNr">171 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// go to bottom of screen; largely like page-up, interestingly</span>
<span id="L172" class="LineNr">172 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Top_of_screen = <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">)</span>-<span class="Constant">1</span><span class="Delimiter">;</span>
<span id="L173" class="LineNr">173 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span><span class="Normal">int</span> screen_row = tb_height<span class="Delimiter">();</span> screen_row > <span class="Constant">0</span> && Top_of_screen > <span class="Constant">0</span><span class="Delimiter">;</span> --screen_row<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L174" class="LineNr">174 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> --Top_of_screen<span class="Delimiter">;</span>
<span id="L175" class="LineNr">175 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>Top_of_screen <= <span class="Constant">0</span><span class="Delimiter">)</span> <span class="Identifier">break</span><span class="Delimiter">;</span>
<span id="L176" class="LineNr">176 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">while</span> <span class="Delimiter">(</span>Top_of_screen > <span class="Constant">0</span> && !contains_key<span class="Delimiter">(</span>Visible<span class="Delimiter">,</span> Top_of_screen<span class="Delimiter">))</span>
<span id="L177" class="LineNr">177 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> --Top_of_screen<span class="Delimiter">;</span>
<span id="L178" class="LineNr">178 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L179" class="LineNr">179 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L180" class="LineNr">180 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// move cursor to bottom</span>
<span id="L181" class="LineNr">181 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Display_row = Last_printed_row<span class="Delimiter">;</span>
<span id="L182" class="LineNr">182 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L183" class="LineNr">183 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L184" class="LineNr">184 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == TB_KEY_CARRIAGE_RETURN<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L185" class="LineNr">185 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// expand lines under current by one level</span>
<span id="L186" class="LineNr">186 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>contains_key<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> Display_row<span class="Delimiter">));</span>
<span id="L187" class="LineNr">187 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> start_index = get<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> Display_row<span class="Delimiter">);</span>
<span id="L188" class="LineNr">188 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> index = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L189" class="LineNr">189 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// simultaneously compute end_index and min_depth</span>
<span id="L190" class="LineNr">190 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> min_depth = <span class="Constant">9999</span><span class="Delimiter">;</span>
<span id="L191" class="LineNr">191 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span>index = start_index+<span class="Constant">1</span><span class="Delimiter">;</span> index < <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">);</span> ++index<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L192" class="LineNr">192 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>contains_key<span class="Delimiter">(</span>Visible<span class="Delimiter">,</span> index<span class="Delimiter">))</span> <span class="Identifier">break</span><span class="Delimiter">;</span>
<span id="L193" class="LineNr">193 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> trace_line& curr_line = Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>index<span class="Delimiter">);</span>
<span id="L194" class="LineNr">194 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>curr_line<span class="Delimiter">.</span>depth > Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>start_index<span class="Delimiter">).</span>depth<span class="Delimiter">);</span>
<span id="L195" class="LineNr">195 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>curr_line<span class="Delimiter">.</span>depth < min_depth<span class="Delimiter">)</span> min_depth = curr_line<span class="Delimiter">.</span>depth<span class="Delimiter">;</span>
<span id="L196" class="LineNr">196 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L197" class="LineNr">197 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> end_index = index<span class="Delimiter">;</span>
<span id="L198" class="LineNr">198 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// mark as visible all intervening indices at min_depth</span>
<span id="L199" class="LineNr">199 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span>index = start_index<span class="Delimiter">;</span> index < end_index<span class="Delimiter">;</span> ++index<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L200" class="LineNr">200 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> trace_line& curr_line = Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>index<span class="Delimiter">);</span>
<span id="L201" class="LineNr">201 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>curr_line<span class="Delimiter">.</span>depth == min_depth<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L202" class="LineNr">202 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Visible<span class="Delimiter">.</span>insert<span class="Delimiter">(</span>index<span class="Delimiter">);</span>
<span id="L203" class="LineNr">203 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L204" class="LineNr">204 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L205" class="LineNr">205 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L206" class="LineNr">206 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L207" class="LineNr">207 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>key == TB_KEY_BACKSPACE || key == TB_KEY_BACKSPACE2<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L208" class="LineNr">208 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// collapse all lines under current</span>
<span id="L209" class="LineNr">209 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>contains_key<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> Display_row<span class="Delimiter">));</span>
<span id="L210" class="LineNr">210 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> start_index = get<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> Display_row<span class="Delimiter">);</span>
<span id="L211" class="LineNr">211 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> index = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L212" class="LineNr">212 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// end_index is the next line at a depth same as or lower than start_index</span>
<span id="L213" class="LineNr">213 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> initial_depth = Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>start_index<span class="Delimiter">).</span>depth<span class="Delimiter">;</span>
<span id="L214" class="LineNr">214 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span>index = start_index+<span class="Constant">1</span><span class="Delimiter">;</span> index < <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">);</span> ++index<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L215" class="LineNr">215 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!contains_key<span class="Delimiter">(</span>Visible<span class="Delimiter">,</span> index<span class="Delimiter">))</span> <span class="Identifier">continue</span><span class="Delimiter">;</span>
<span id="L216" class="LineNr">216 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> trace_line& curr_line = Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>index<span class="Delimiter">);</span>
<span id="L217" class="LineNr">217 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>curr_line<span class="Delimiter">.</span>depth <= initial_depth<span class="Delimiter">)</span> <span class="Identifier">break</span><span class="Delimiter">;</span>
<span id="L218" class="LineNr">218 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L219" class="LineNr">219 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> end_index = index<span class="Delimiter">;</span>
<span id="L220" class="LineNr">220 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// mark as visible all intervening indices at min_depth</span>
<span id="L221" class="LineNr">221 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">for</span> <span class="Delimiter">(</span>index = start_index+<span class="Constant">1</span><span class="Delimiter">;</span> index < end_index<span class="Delimiter">;</span> ++index<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L222" class="LineNr">222 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> Visible<span class="Delimiter">.</span>erase<span class="Delimiter">(</span>index<span class="Delimiter">);</span>
<span id="L223" class="LineNr">223 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L224" class="LineNr">224 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">();</span>
<span id="L225" class="LineNr">225 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L226" class="LineNr">226 </span> <span class="Delimiter">}</span>
<span id="L227" class="LineNr">227 </span> tb_shutdown<span class="Delimiter">();</span>
<span id="L228" class="LineNr">228 </span><span class="Delimiter">}</span>
<span id="L229" class="LineNr">229 </span>
<span id="L230" class="LineNr">230 </span><span class="Comment">// update Trace_indices for each screen_row on the basis of Top_of_screen and Visible</span>
<span id="L231" class="LineNr">231 </span><span class="Normal">void</span> <a href='100trace_browser.cc.html#L231'>refresh_screen_rows</a><span class="Delimiter">()</span> <span class="Delimiter">{</span>
<span id="L232" class="LineNr">232 </span> <span class="Normal">int</span> screen_row = <span class="Constant">0</span><span class="Delimiter">,</span> index = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L233" class="LineNr">233 </span> Trace_index<span class="Delimiter">.</span><a href='050scenario.cc.html#L60'>clear</a><span class="Delimiter">();</span>
<span id="L234" class="LineNr">234 </span> <span class="Normal">for</span> <span class="Delimiter">(</span>screen_row = <span class="Constant">0</span><span class="Delimiter">,</span> index = Top_of_screen<span class="Delimiter">;</span> screen_row < tb_height<span class="Delimiter">()</span> && index < <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">);</span> ++screen_row<span class="Delimiter">,</span> ++index<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L235" class="LineNr">235 </span> <span class="Conceal">¦</span> <span class="Comment">// skip lines without depth for now</span>
<span id="L236" class="LineNr">236 </span> <span class="Conceal">¦</span> <span class="Normal">while</span> <span class="Delimiter">(</span>!contains_key<span class="Delimiter">(</span>Visible<span class="Delimiter">,</span> index<span class="Delimiter">))</span> <span class="Delimiter">{</span>
<span id="L237" class="LineNr">237 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> ++index<span class="Delimiter">;</span>
<span id="L238" class="LineNr">238 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>index >= <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">))</span> <span class="Identifier">goto</span> done<span class="Delimiter">;</span>
<span id="L239" class="LineNr">239 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L240" class="LineNr">240 </span> <span class="Conceal">¦</span> assert<span class="Delimiter">(</span>index < <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">));</span>
<span id="L241" class="LineNr">241 </span> <span class="Conceal">¦</span> <a href='001help.cc.html#L218'>put</a><span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> screen_row<span class="Delimiter">,</span> index<span class="Delimiter">);</span>
<span id="L242" class="LineNr">242 </span> <span class="Delimiter">}</span>
<span id="L243" class="LineNr">243 </span><span class="Normal">done</span>:<span class="Delimiter">;</span>
<span id="L244" class="LineNr">244 </span><span class="Delimiter">}</span>
<span id="L245" class="LineNr">245 </span>
<span id="L246" class="LineNr">246 </span><span class="Normal">void</span> <a href='100trace_browser.cc.html#L246'>render</a><span class="Delimiter">()</span> <span class="Delimiter">{</span>
<span id="L247" class="LineNr">247 </span> <span class="Normal">int</span> screen_row = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L248" class="LineNr">248 </span> <span class="Normal">for</span> <span class="Delimiter">(</span>screen_row = <span class="Constant">0</span><span class="Delimiter">;</span> screen_row < tb_height<span class="Delimiter">();</span> ++screen_row<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L249" class="LineNr">249 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!contains_key<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> screen_row<span class="Delimiter">))</span> <span class="Identifier">break</span><span class="Delimiter">;</span>
<span id="L250" class="LineNr">250 </span> <span class="Conceal">¦</span> trace_line& curr_line = Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>at<span class="Delimiter">(</span>get<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> screen_row<span class="Delimiter">));</span>
<span id="L251" class="LineNr">251 </span> <span class="Conceal">¦</span> ostringstream out<span class="Delimiter">;</span>
<span id="L252" class="LineNr">252 </span> <span class="Conceal">¦</span> out << std::setw<span class="Delimiter">(</span><span class="Constant">4</span><span class="Delimiter">)</span> << curr_line<span class="Delimiter">.</span>depth << <span class="Constant">' '</span> << curr_line<span class="Delimiter">.</span>label << <span class="Constant">": "</span> << curr_line<span class="Delimiter">.</span>contents<span class="Delimiter">;</span>
<span id="L253" class="LineNr">253 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>screen_row < tb_height<span class="Delimiter">()</span>-<span class="Constant">1</span><span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L254" class="LineNr">254 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">int</span> delta = <a href='100trace_browser.cc.html#L272'>lines_hidden</a><span class="Delimiter">(</span>screen_row<span class="Delimiter">);</span>
<span id="L255" class="LineNr">255 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Comment">// home-brew escape sequence for red</span>
<span id="L256" class="LineNr">256 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>delta > <span class="Constant">999</span><span class="Delimiter">)</span> out << <span class="Normal">static_cast</span><<span class="Normal">char</span>><span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span>
<span id="L257" class="LineNr">257 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> out << <span class="Constant">" ("</span> << delta << <span class="Constant">")"</span><span class="Delimiter">;</span>
<span id="L258" class="LineNr">258 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>delta > <span class="Constant">999</span><span class="Delimiter">)</span> out << <span class="Normal">static_cast</span><<span class="Normal">char</span>><span class="Delimiter">(</span><span class="Constant">2</span><span class="Delimiter">);</span>
<span id="L259" class="LineNr">259 </span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L260" class="LineNr">260 </span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L280'>render_line</a><span class="Delimiter">(</span>screen_row<span class="Delimiter">,</span> out<span class="Delimiter">.</span>str<span class="Delimiter">(),</span> screen_row == Display_row<span class="Delimiter">);</span>
<span id="L261" class="LineNr">261 </span> <span class="Delimiter">}</span>
<span id="L262" class="LineNr">262 </span> <span class="Comment">// clear rest of screen</span>
<span id="L263" class="LineNr">263 </span> Last_printed_row = screen_row-<span class="Constant">1</span><span class="Delimiter">;</span>
<span id="L264" class="LineNr">264 </span> <span class="Normal">for</span> <span class="Delimiter">(;</span> screen_row < tb_height<span class="Delimiter">();</span> ++screen_row<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L265" class="LineNr">265 </span> <span class="Conceal">¦</span> <a href='100trace_browser.cc.html#L280'>render_line</a><span class="Delimiter">(</span>screen_row<span class="Delimiter">,</span> <span class="Constant">"~"</span><span class="Delimiter">,</span> <span class="Comment">/*</span><span class="Comment">highlight?</span><span class="Comment">*/</span><span class="Constant">false</span><span class="Delimiter">);</span>
<span id="L266" class="LineNr">266 </span> <span class="Delimiter">}</span>
<span id="L267" class="LineNr">267 </span> <span class="Comment">// move cursor back to display row at the end</span>
<span id="L268" class="LineNr">268 </span> tb_set_cursor<span class="Delimiter">(</span><span class="Constant">0</span><span class="Delimiter">,</span> Display_row<span class="Delimiter">);</span>
<span id="L269" class="LineNr">269 </span> tb_present<span class="Delimiter">();</span>
<span id="L270" class="LineNr">270 </span><span class="Delimiter">}</span>
<span id="L271" class="LineNr">271 </span>
<span id="L272" class="LineNr">272 </span><span class="Normal">int</span> <a href='100trace_browser.cc.html#L272'>lines_hidden</a><span class="Delimiter">(</span><span class="Normal">int</span> screen_row<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L273" class="LineNr">273 </span> assert<span class="Delimiter">(</span>contains_key<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> screen_row<span class="Delimiter">));</span>
<span id="L274" class="LineNr">274 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!contains_key<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> screen_row+<span class="Constant">1</span><span class="Delimiter">))</span>
<span id="L275" class="LineNr">275 </span> <span class="Conceal">¦</span> <span class="Identifier">return</span> <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">)</span> - get<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> screen_row<span class="Delimiter">);</span>
<span id="L276" class="LineNr">276 </span> <span class="Normal">else</span>
<span id="L277" class="LineNr">277 </span> <span class="Conceal">¦</span> <span class="Identifier">return</span> get<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> screen_row+<span class="Constant">1</span><span class="Delimiter">)</span> - get<span class="Delimiter">(</span>Trace_index<span class="Delimiter">,</span> screen_row<span class="Delimiter">);</span>
<span id="L278" class="LineNr">278 </span><span class="Delimiter">}</span>
<span id="L279" class="LineNr">279 </span>
<span id="L280" class="LineNr">280 </span><span class="Normal">void</span> <a href='100trace_browser.cc.html#L280'>render_line</a><span class="Delimiter">(</span><span class="Normal">int</span> screen_row<span class="Delimiter">,</span> <span class="Normal">const</span> string& s<span class="Delimiter">,</span> <span class="Normal">bool</span> highlight<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L281" class="LineNr">281 </span> <span class="Normal">int</span> col = <span class="Constant">0</span><span class="Delimiter">;</span>
<span id="L282" class="LineNr">282 </span> <span class="Normal">int</span> color = TB_WHITE<span class="Delimiter">;</span>
<span id="L283" class="LineNr">283 </span> <span class="Normal">for</span> <span class="Delimiter">(</span>col = <span class="Constant">0</span><span class="Delimiter">;</span> col < tb_width<span class="Delimiter">()</span> && col+Left_of_screen < <a href='001help.cc.html#L138'>SIZE</a><span class="Delimiter">(</span>s<span class="Delimiter">);</span> ++col<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L284" class="LineNr">284 </span> <span class="Conceal">¦</span> <span class="Normal">char</span> c = s<span class="Delimiter">.</span>at<span class="Delimiter">(</span>col+Left_of_screen<span class="Delimiter">);</span> <span class="Comment">// todo: unicode</span>
<span id="L285" class="LineNr">285 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>c == <span class="cSpecial">'\n'</span><span class="Delimiter">)</span> c = <span class="Constant">';'</span><span class="Delimiter">;</span> <span class="Comment">// replace newlines with semi-colons</span>
<span id="L286" class="LineNr">286 </span> <span class="Conceal">¦</span> <span class="Comment">// escapes. hack: can't start a line with them.</span>
<span id="L287" class="LineNr">287 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>c == <span class="cSpecial">'\1'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> color = <span class="Comment">/*</span><span class="Comment">red</span><span class="Comment">*/</span><span class="Constant">1</span><span class="Delimiter">;</span> c = <span class="Constant">' '</span><span class="Delimiter">;</span> <span class="Delimiter">}</span>
<span id="L288" class="LineNr">288 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>c == <span class="cSpecial">'\2'</span><span class="Delimiter">)</span> <span class="Delimiter">{</span> color = TB_WHITE<span class="Delimiter">;</span> c = <span class="Constant">' '</span><span class="Delimiter">;</span> <span class="Delimiter">}</span>
<span id="L289" class="LineNr">289 </span> <span class="Conceal">¦</span> tb_change_cell<span class="Delimiter">(</span>col<span class="Delimiter">,</span> screen_row<span class="Delimiter">,</span> c<span class="Delimiter">,</span> color<span class="Delimiter">,</span> highlight ? <span class="Comment">/*</span><span class="Comment">subtle grey</span><span class="Comment">*/</span><span class="Constant">240</span> : TB_BLACK<span class="Delimiter">);</span>
<span id="L290" class="LineNr">290 </span> <span class="Delimiter">}</span>
<span id="L291" class="LineNr">291 </span> <span class="Normal">for</span> <span class="Delimiter">(;</span> col < tb_width<span class="Delimiter">();</span> ++col<span class="Delimiter">)</span>
<span id="L292" class="LineNr">292 </span> <span class="Conceal">¦</span> tb_change_cell<span class="Delimiter">(</span>col<span class="Delimiter">,</span> screen_row<span class="Delimiter">,</span> <span class="Constant">' '</span><span class="Delimiter">,</span> TB_WHITE<span class="Delimiter">,</span> highlight ? <span class="Comment">/*</span><span class="Comment">subtle grey</span><span class="Comment">*/</span><span class="Constant">240</span> : TB_BLACK<span class="Delimiter">);</span>
<span id="L293" class="LineNr">293 </span><span class="Delimiter">}</span>
<span id="L294" class="LineNr">294 </span>
<span id="L295" class="LineNr">295 </span><span class="Normal">void</span> <a href='100trace_browser.cc.html#L295'>load_trace</a><span class="Delimiter">(</span><span class="Normal">const</span> <span class="Normal">char</span>* filename<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L296" class="LineNr">296 </span> ifstream tin<span class="Delimiter">(</span>filename<span class="Delimiter">);</span>
<span id="L297" class="LineNr">297 </span> <span class="Normal">if</span> <span class="Delimiter">(</span>!tin<span class="Delimiter">)</span> <span class="Delimiter">{</span>
<span id="L298" class="LineNr">298 </span> <span class="Conceal">¦</span> cerr << <span class="Constant">"no such file: "</span> << filename << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span>
<span id="L299" class="LineNr">299 </span> <span class="Conceal">¦</span> exit<span class="Delimiter">(</span><span class="Constant">1</span><span class="Delimiter">);</span>
<span id="L300" class="LineNr">300 </span> <span class="Delimiter">}</span>
<span id="L301" class="LineNr">301 </span> Trace_stream = <span class="Normal">new</span> trace_stream<span class="Delimiter">;</span>
<span id="L302" class="LineNr">302 </span> <span class="Normal">while</span> <span class="Delimiter">(</span><a href='001help.cc.html#L235'>has_data</a><span class="Delimiter">(</span>tin<span class="Delimiter">))</span> <span class="Delimiter">{</span>
<span id="L303" class="LineNr">303 </span> <span class="Conceal">¦</span> tin >> std::noskipws<span class="Delimiter">;</span>
<span id="L304" class="LineNr">304 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> skip_whitespace_but_not_newline<span class="Delimiter">(</span>tin<span class="Delimiter">);</span>
<span id="L305" class="LineNr">305 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>!isdigit<span class="Delimiter">(</span>tin<span class="Delimiter">.</span>peek<span class="Delimiter">()))</span> <span class="Delimiter">{</span>
<span id="L306" class="LineNr">306 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> string dummy<span class="Delimiter">;</span>
<span id="L307" class="LineNr">307 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> getline<span class="Delimiter">(</span>tin<span class="Delimiter">,</span> dummy<span class="Delimiter">);</span>
<span id="L308" class="LineNr">308 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Identifier">continue</span><span class="Delimiter">;</span>
<span id="L309" class="LineNr">309 </span> <span class="Conceal">¦</span> <span class="Conceal">¦</span> <span class="Delimiter">}</span>
<span id="L310" class="LineNr">310 </span> <span class="Conceal">¦</span> tin >> std::skipws<span class="Delimiter">;</span>
<span id="L311" class="LineNr">311 </span> <span class="Conceal">¦</span> <span class="Normal">int</span> depth<span class="Delimiter">;</span>
<span id="L312" class="LineNr">312 </span> <span class="Conceal">¦</span> tin >> depth<span class="Delimiter">;</span>
<span id="L313" class="LineNr">313 </span> <span class="Conceal">¦</span> string label<span class="Delimiter">;</span>
<span id="L314" class="LineNr">314 </span> <span class="Conceal">¦</span> tin >> label<span class="Delimiter">;</span>
<span id="L315" class="LineNr">315 </span> <span class="Conceal">¦</span> <span class="Normal">if</span> <span class="Delimiter">(</span>*--label<span class="Delimiter">.</span><a href='003trace.cc.html#L185'>end</a><span class="Delimiter">()</span> == <span class="Constant">':'</span><span class="Delimiter">)</span> label<span class="Delimiter">.</span>erase<span class="Delimiter">(</span>--label<span class="Delimiter">.</span><a href='003trace.cc.html#L185'>end</a><span class="Delimiter">());</span>
<span id="L316" class="LineNr">316 </span> <span class="Conceal">¦</span> string line<span class="Delimiter">;</span>
<span id="L317" class="LineNr">317 </span> <span class="Conceal">¦</span> getline<span class="Delimiter">(</span>tin<span class="Delimiter">,</span> line<span class="Delimiter">);</span>
<span id="L318" class="LineNr">318 </span> <span class="Conceal">¦</span> Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>push_back<span class="Delimiter">(</span>trace_line<span class="Delimiter">(</span>depth<span class="Delimiter">,</span> label<span class="Delimiter">,</span> line<span class="Delimiter">));</span>
<span id="L319" class="LineNr">319 </span> <span class="Delimiter">}</span>
<span id="L320" class="LineNr">320 </span> cerr << <span class="Constant">"lines read: "</span> << Trace_stream<span class="Delimiter">-></span>past_lines<span class="Delimiter">.</span>size<span class="Delimiter">()</span> << <span class="cSpecial">'\n'</span><span class="Delimiter">;</span>
<span id="L321" class="LineNr">321 </span><span class="Delimiter">}</span>
</pre>
</body>
</html>
<!-- vim: set foldmethod=manual : -->
|