Commit | Line | Data |
---|---|---|
f377b406 | 1 | /* TUI display locator. |
f33c6cbf | 2 | |
32d0add0 | 3 | Copyright (C) 1998-2015 Free Software Foundation, Inc. |
f33c6cbf | 4 | |
f377b406 SC |
5 | Contributed by Hewlett-Packard Company. |
6 | ||
7 | This file is part of GDB. | |
8 | ||
9 | This program is free software; you can redistribute it and/or modify | |
10 | it under the terms of the GNU General Public License as published by | |
a9762ec7 | 11 | the Free Software Foundation; either version 3 of the License, or |
f377b406 SC |
12 | (at your option) any later version. |
13 | ||
14 | This program is distributed in the hope that it will be useful, | |
15 | but WITHOUT ANY WARRANTY; without even the implied warranty of | |
16 | MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
17 | GNU General Public License for more details. | |
18 | ||
19 | You should have received a copy of the GNU General Public License | |
a9762ec7 | 20 | along with this program. If not, see <http://www.gnu.org/licenses/>. */ |
c906108c SS |
21 | |
22 | #include "defs.h" | |
23 | #include "symtab.h" | |
24 | #include "breakpoint.h" | |
25 | #include "frame.h" | |
75fd9bc1 | 26 | #include "command.h" |
50265402 SC |
27 | #include "inferior.h" |
28 | #include "target.h" | |
7563e053 | 29 | #include "top.h" |
50f182aa | 30 | #include "gdb-demangle.h" |
56d397a3 | 31 | #include "source.h" |
d7b2e967 AC |
32 | #include "tui/tui.h" |
33 | #include "tui/tui-data.h" | |
34 | #include "tui/tui-stack.h" | |
35 | #include "tui/tui-wingeneral.h" | |
36 | #include "tui/tui-source.h" | |
37 | #include "tui/tui-winsource.h" | |
38 | #include "tui/tui-file.h" | |
c906108c | 39 | |
6a83354a | 40 | #include "gdb_curses.h" |
c906108c | 41 | |
5564c769 SC |
42 | /* Get a printable name for the function at the address. |
43 | The symbol name is demangled if demangling is turned on. | |
44 | Returns a pointer to a static area holding the result. */ | |
5b6fe301 | 45 | static char *tui_get_function_from_frame (struct frame_info *fi); |
c906108c | 46 | |
56d397a3 JK |
47 | /* Set the full_name portion of the locator. */ |
48 | static void tui_set_locator_fullname (const char *fullname); | |
2e17b763 SC |
49 | |
50 | /* Update the locator, with the provided arguments. */ | |
b5fca6d7 PP |
51 | static int tui_set_locator_info (struct gdbarch *gdbarch, |
52 | const char *fullname, | |
53 | const char *procname, | |
54 | int lineno, CORE_ADDR addr); | |
2e17b763 | 55 | |
7563e053 | 56 | static void tui_update_command (char *, int); |
7d6dd1e9 | 57 | \f |
c906108c | 58 | |
1cc6d956 MS |
59 | /* Create the status line to display as much information as we can on |
60 | this single line: target name, process number, current function, | |
61 | current line, current PC, SingleKey mode. */ | |
50265402 | 62 | static char* |
5b6fe301 | 63 | tui_make_status_line (struct tui_locator_element *loc) |
50265402 | 64 | { |
5b6fe301 | 65 | char *string; |
a42a37b7 | 66 | char line_buf[50], *pname; |
5b6fe301 | 67 | char *buf; |
a42a37b7 | 68 | int status_size; |
50265402 | 69 | int i, proc_width; |
5b6fe301 MS |
70 | const char *pid_name; |
71 | const char *pc_buf; | |
50265402 SC |
72 | int target_width; |
73 | int pid_width; | |
74 | int line_width; | |
75 | int pc_width; | |
76 | struct ui_file *pc_out; | |
77 | ||
78 | if (ptid_equal (inferior_ptid, null_ptid)) | |
79 | pid_name = "No process"; | |
80 | else | |
81 | pid_name = target_pid_to_str (inferior_ptid); | |
82 | ||
83 | target_width = strlen (target_shortname); | |
84 | if (target_width > MAX_TARGET_WIDTH) | |
85 | target_width = MAX_TARGET_WIDTH; | |
86 | ||
87 | pid_width = strlen (pid_name); | |
88 | if (pid_width > MAX_PID_WIDTH) | |
89 | pid_width = MAX_PID_WIDTH; | |
a42a37b7 | 90 | |
dd1abb8c | 91 | status_size = tui_term_width (); |
50265402 | 92 | string = (char *) xmalloc (status_size + 1); |
a42a37b7 | 93 | buf = (char*) alloca (status_size + 1); |
50265402 SC |
94 | |
95 | /* Translate line number and obtain its size. */ | |
6d012f14 | 96 | if (loc->line_no > 0) |
8c042590 | 97 | xsnprintf (line_buf, sizeof (line_buf), "%d", loc->line_no); |
50265402 SC |
98 | else |
99 | strcpy (line_buf, "??"); | |
100 | line_width = strlen (line_buf); | |
101 | if (line_width < MIN_LINE_WIDTH) | |
102 | line_width = MIN_LINE_WIDTH; | |
103 | ||
104 | /* Translate PC address. */ | |
105 | pc_out = tui_sfileopen (128); | |
2d5f09f0 UW |
106 | fputs_filtered (loc->gdbarch? paddress (loc->gdbarch, loc->addr) : "??", |
107 | pc_out); | |
50265402 SC |
108 | pc_buf = tui_file_get_strbuf (pc_out); |
109 | pc_width = strlen (pc_buf); | |
110 | ||
111 | /* First determine the amount of proc name width we have available. | |
112 | The +1 are for a space separator between fields. | |
113 | The -1 are to take into account the \0 counted by sizeof. */ | |
114 | proc_width = (status_size | |
115 | - (target_width + 1) | |
116 | - (pid_width + 1) | |
117 | - (sizeof (PROC_PREFIX) - 1 + 1) | |
118 | - (sizeof (LINE_PREFIX) - 1 + line_width + 1) | |
119 | - (sizeof (PC_PREFIX) - 1 + pc_width + 1) | |
6d012f14 | 120 | - (tui_current_key_mode == TUI_SINGLE_KEY_MODE |
50265402 SC |
121 | ? (sizeof (SINGLE_KEY) - 1 + 1) |
122 | : 0)); | |
123 | ||
124 | /* If there is no room to print the function name, try by removing | |
125 | some fields. */ | |
126 | if (proc_width < MIN_PROC_WIDTH) | |
127 | { | |
128 | proc_width += target_width + 1; | |
129 | target_width = 0; | |
130 | if (proc_width < MIN_PROC_WIDTH) | |
131 | { | |
132 | proc_width += pid_width + 1; | |
133 | pid_width = 0; | |
134 | if (proc_width <= MIN_PROC_WIDTH) | |
135 | { | |
136 | proc_width += pc_width + sizeof (PC_PREFIX) - 1 + 1; | |
137 | pc_width = 0; | |
138 | if (proc_width < 0) | |
139 | { | |
140 | proc_width += line_width + sizeof (LINE_PREFIX) - 1 + 1; | |
141 | line_width = 0; | |
142 | if (proc_width < 0) | |
143 | proc_width = 0; | |
144 | } | |
145 | } | |
146 | } | |
147 | } | |
148 | ||
1cc6d956 | 149 | /* Now convert elements to string form. */ |
6d012f14 | 150 | pname = loc->proc_name; |
50265402 | 151 | |
1cc6d956 MS |
152 | /* Now create the locator line from the string version of the |
153 | elements. We could use sprintf() here but that wouldn't ensure | |
154 | that we don't overrun the size of the allocated buffer. | |
155 | strcat_to_buf() will. */ | |
50265402 SC |
156 | *string = (char) 0; |
157 | ||
158 | if (target_width > 0) | |
159 | { | |
160 | sprintf (buf, "%*.*s ", | |
161 | -target_width, target_width, target_shortname); | |
162 | strcat_to_buf (string, status_size, buf); | |
163 | } | |
164 | if (pid_width > 0) | |
165 | { | |
166 | sprintf (buf, "%*.*s ", | |
167 | -pid_width, pid_width, pid_name); | |
168 | strcat_to_buf (string, status_size, buf); | |
169 | } | |
170 | ||
171 | /* Show whether we are in SingleKey mode. */ | |
6d012f14 | 172 | if (tui_current_key_mode == TUI_SINGLE_KEY_MODE) |
50265402 SC |
173 | { |
174 | strcat_to_buf (string, status_size, SINGLE_KEY); | |
175 | strcat_to_buf (string, status_size, " "); | |
176 | } | |
177 | ||
1cc6d956 | 178 | /* Procedure/class name. */ |
50265402 SC |
179 | if (proc_width > 0) |
180 | { | |
181 | if (strlen (pname) > proc_width) | |
182 | sprintf (buf, "%s%*.*s* ", PROC_PREFIX, | |
183 | 1 - proc_width, proc_width - 1, pname); | |
184 | else | |
185 | sprintf (buf, "%s%*.*s ", PROC_PREFIX, | |
186 | -proc_width, proc_width, pname); | |
187 | strcat_to_buf (string, status_size, buf); | |
188 | } | |
189 | ||
190 | if (line_width > 0) | |
191 | { | |
192 | sprintf (buf, "%s%*.*s ", LINE_PREFIX, | |
193 | -line_width, line_width, line_buf); | |
194 | strcat_to_buf (string, status_size, buf); | |
195 | } | |
196 | if (pc_width > 0) | |
197 | { | |
198 | strcat_to_buf (string, status_size, PC_PREFIX); | |
199 | strcat_to_buf (string, status_size, pc_buf); | |
200 | } | |
201 | ||
202 | ||
203 | for (i = strlen (string); i < status_size; i++) | |
204 | string[i] = ' '; | |
205 | string[status_size] = (char) 0; | |
206 | ||
207 | ui_file_delete (pc_out); | |
208 | return string; | |
209 | } | |
210 | ||
1cc6d956 MS |
211 | /* Get a printable name for the function at the address. The symbol |
212 | name is demangled if demangling is turned on. Returns a pointer to | |
213 | a static area holding the result. */ | |
5564c769 SC |
214 | static char* |
215 | tui_get_function_from_frame (struct frame_info *fi) | |
216 | { | |
217 | static char name[256]; | |
218 | struct ui_file *stream = tui_sfileopen (256); | |
219 | char *p; | |
220 | ||
22e722e1 DJ |
221 | print_address_symbolic (get_frame_arch (fi), get_frame_pc (fi), |
222 | stream, demangle, ""); | |
5564c769 SC |
223 | p = tui_file_get_strbuf (stream); |
224 | ||
1cc6d956 MS |
225 | /* Use simple heuristics to isolate the function name. The symbol |
226 | can be demangled and we can have function parameters. Remove | |
227 | them because the status line is too short to display them. */ | |
5564c769 SC |
228 | if (*p == '<') |
229 | p++; | |
086dbf66 | 230 | strncpy (name, p, sizeof (name) - 1); |
4e2af517 | 231 | name[sizeof (name) - 1] = 0; |
5564c769 SC |
232 | p = strchr (name, '('); |
233 | if (!p) | |
234 | p = strchr (name, '>'); | |
235 | if (p) | |
236 | *p = 0; | |
237 | p = strchr (name, '+'); | |
238 | if (p) | |
239 | *p = 0; | |
240 | ui_file_delete (stream); | |
241 | return name; | |
242 | } | |
c906108c | 243 | |
c906108c | 244 | void |
47d3492a | 245 | tui_show_locator_content (void) |
c906108c SS |
246 | { |
247 | char *string; | |
5b6fe301 | 248 | struct tui_gen_win_info *locator; |
c906108c | 249 | |
dd1abb8c | 250 | locator = tui_locator_win_info_ptr (); |
c906108c | 251 | |
6d012f14 | 252 | if (locator != NULL && locator->handle != (WINDOW *) NULL) |
c906108c | 253 | { |
5b6fe301 | 254 | struct tui_win_element *element; |
50265402 | 255 | |
63ed8182 | 256 | element = locator->content[0]; |
50265402 | 257 | |
6d012f14 | 258 | string = tui_make_status_line (&element->which_element.locator); |
50265402 | 259 | wmove (locator->handle, 0, 0); |
cae3f17b JB |
260 | /* We ignore the return value from wstandout and wstandend, casting |
261 | them to void in order to avoid a compiler warning. The warning | |
262 | itself was introduced by a patch to ncurses 5.7 dated 2009-08-29, | |
263 | changing these macro to expand to code that causes the compiler | |
264 | to generate an unused-value warning. */ | |
ae3bccd4 | 265 | (void) wstandout (locator->handle); |
50265402 SC |
266 | waddstr (locator->handle, string); |
267 | wclrtoeol (locator->handle); | |
ae3bccd4 | 268 | (void) wstandend (locator->handle); |
ec7d9e56 | 269 | tui_refresh_win (locator); |
50265402 SC |
270 | wmove (locator->handle, 0, 0); |
271 | xfree (string); | |
6d012f14 | 272 | locator->content_in_use = TRUE; |
c906108c | 273 | } |
50265402 | 274 | } |
c906108c | 275 | |
c906108c | 276 | |
2e17b763 SC |
277 | /* Set the filename portion of the locator. */ |
278 | static void | |
56d397a3 | 279 | tui_set_locator_fullname (const char *fullname) |
2e17b763 | 280 | { |
5b6fe301 MS |
281 | struct tui_gen_win_info *locator = tui_locator_win_info_ptr (); |
282 | struct tui_locator_element *element; | |
2e17b763 | 283 | |
22940a24 | 284 | if (locator->content[0] == NULL) |
7d6dd1e9 | 285 | { |
56d397a3 | 286 | tui_set_locator_info (NULL, fullname, NULL, 0, 0); |
7d6dd1e9 SC |
287 | return; |
288 | } | |
2e17b763 | 289 | |
63ed8182 | 290 | element = &locator->content[0]->which_element.locator; |
56d397a3 JK |
291 | element->full_name[0] = 0; |
292 | strcat_to_buf (element->full_name, MAX_LOCATOR_ELEMENT_LEN, fullname); | |
2e17b763 | 293 | } |
c906108c | 294 | |
b5fca6d7 PP |
295 | /* Update the locator, with the provided arguments. |
296 | ||
297 | Returns 1 if any of the locator's fields were actually changed, | |
298 | and 0 otherwise. */ | |
299 | ||
300 | static int | |
13274fc3 | 301 | tui_set_locator_info (struct gdbarch *gdbarch, |
56d397a3 | 302 | const char *fullname, |
08ef48c5 MS |
303 | const char *procname, |
304 | int lineno, | |
7d6dd1e9 | 305 | CORE_ADDR addr) |
c906108c | 306 | { |
5b6fe301 MS |
307 | struct tui_gen_win_info *locator = tui_locator_win_info_ptr (); |
308 | struct tui_locator_element *element; | |
b5fca6d7 | 309 | int locator_changed_p = 0; |
7d6dd1e9 SC |
310 | |
311 | /* Allocate the locator content if necessary. */ | |
6d012f14 | 312 | if (locator->content_size <= 0) |
7d6dd1e9 | 313 | { |
c45613e3 | 314 | locator->content = tui_alloc_content (1, LOCATOR_WIN); |
6d012f14 | 315 | locator->content_size = 1; |
b5fca6d7 | 316 | locator_changed_p = 1; |
7d6dd1e9 SC |
317 | } |
318 | ||
b5fca6d7 PP |
319 | if (procname == NULL) |
320 | procname = ""; | |
321 | ||
322 | if (fullname == NULL) | |
323 | fullname = ""; | |
324 | ||
63ed8182 | 325 | element = &locator->content[0]->which_element.locator; |
b5fca6d7 PP |
326 | |
327 | locator_changed_p |= strncmp (element->proc_name, procname, | |
328 | MAX_LOCATOR_ELEMENT_LEN) != 0; | |
329 | locator_changed_p |= lineno != element->line_no; | |
330 | locator_changed_p |= addr != element->addr; | |
331 | locator_changed_p |= gdbarch != element->gdbarch; | |
332 | locator_changed_p |= strncmp (element->full_name, fullname, | |
333 | MAX_LOCATOR_ELEMENT_LEN) != 0; | |
334 | ||
6d012f14 AC |
335 | element->proc_name[0] = (char) 0; |
336 | strcat_to_buf (element->proc_name, MAX_LOCATOR_ELEMENT_LEN, procname); | |
337 | element->line_no = lineno; | |
c774cec6 | 338 | element->addr = addr; |
13274fc3 | 339 | element->gdbarch = gdbarch; |
56d397a3 | 340 | tui_set_locator_fullname (fullname); |
b5fca6d7 PP |
341 | |
342 | return locator_changed_p; | |
c7c228ed | 343 | } |
c906108c | 344 | |
56d397a3 | 345 | /* Update only the full_name portion of the locator. */ |
c906108c | 346 | void |
56d397a3 | 347 | tui_update_locator_fullname (const char *fullname) |
c906108c | 348 | { |
56d397a3 | 349 | tui_set_locator_fullname (fullname); |
47d3492a | 350 | tui_show_locator_content (); |
2e17b763 | 351 | } |
c906108c | 352 | |
b5fca6d7 | 353 | /* Function to print the frame information for the TUI. The windows are |
bbcbf914 | 354 | refreshed only if frame information has changed since the last refresh. |
b5fca6d7 | 355 | |
bbcbf914 PP |
356 | Return 1 if frame information has changed (and windows subsequently |
357 | refreshed), 0 otherwise. */ | |
358 | ||
359 | int | |
47d3492a | 360 | tui_show_frame_info (struct frame_info *fi) |
c906108c | 361 | { |
5b6fe301 | 362 | struct tui_win_info *win_info; |
b5fca6d7 | 363 | int locator_changed_p; |
d02c80cd | 364 | int i; |
c906108c SS |
365 | |
366 | if (fi) | |
367 | { | |
d02c80cd | 368 | int start_line, i; |
c906108c | 369 | CORE_ADDR low; |
5b6fe301 | 370 | struct tui_gen_win_info *locator = tui_locator_win_info_ptr (); |
6ba8e26f | 371 | int source_already_displayed; |
7d6dd1e9 | 372 | struct symtab_and_line sal; |
e3eebbd7 | 373 | CORE_ADDR pc; |
7d6dd1e9 | 374 | |
3d7442da | 375 | find_frame_sal (fi, &sal); |
7d6dd1e9 | 376 | |
6ba8e26f | 377 | source_already_displayed = sal.symtab != 0 |
56d397a3 | 378 | && tui_source_is_displayed (symtab_to_fullname (sal.symtab)); |
e3eebbd7 PA |
379 | |
380 | if (get_frame_pc_if_available (fi, &pc)) | |
b5fca6d7 PP |
381 | locator_changed_p |
382 | = tui_set_locator_info (get_frame_arch (fi), | |
383 | (sal.symtab == 0 | |
384 | ? "??" : symtab_to_fullname (sal.symtab)), | |
385 | tui_get_function_from_frame (fi), | |
386 | sal.line, | |
387 | pc); | |
e3eebbd7 | 388 | else |
b5fca6d7 PP |
389 | locator_changed_p |
390 | = tui_set_locator_info (get_frame_arch (fi), | |
391 | "??", _("<unavailable>"), sal.line, 0); | |
392 | ||
393 | /* If the locator information has not changed, then frame information has | |
394 | not changed. If frame information has not changed, then the windows' | |
395 | contents will not change. So don't bother refreshing the windows. */ | |
396 | if (!locator_changed_p) | |
bbcbf914 | 397 | return 0; |
e3eebbd7 | 398 | |
47d3492a | 399 | tui_show_locator_content (); |
6d012f14 | 400 | start_line = 0; |
dd1abb8c | 401 | for (i = 0; i < (tui_source_windows ())->count; i++) |
c906108c | 402 | { |
2a8854a7 | 403 | union tui_which_element *item; |
1c5313c5 | 404 | |
96c1eda2 | 405 | win_info = (tui_source_windows ())->list[i]; |
a4b99e53 | 406 | |
63ed8182 | 407 | item = &locator->content[0]->which_element; |
6d012f14 | 408 | if (win_info == TUI_SRC_WIN) |
c906108c | 409 | { |
6d012f14 AC |
410 | start_line = (item->locator.line_no - |
411 | (win_info->generic.viewport_height / 2)) + 1; | |
412 | if (start_line <= 0) | |
413 | start_line = 1; | |
c906108c SS |
414 | } |
415 | else | |
416 | { | |
2c02bd72 DE |
417 | if (find_pc_partial_function (get_frame_pc (fi), |
418 | (const char **) NULL, | |
87177905 | 419 | &low, (CORE_ADDR) 0) == 0) |
c04b3e8f JK |
420 | { |
421 | /* There is no symbol available for current PC. There is no | |
422 | safe way how to "disassemble backwards". */ | |
423 | low = get_frame_pc (fi); | |
424 | } | |
c906108c | 425 | else |
13274fc3 UW |
426 | low = tui_get_low_disassembly_address (get_frame_arch (fi), |
427 | low, get_frame_pc (fi)); | |
c906108c SS |
428 | } |
429 | ||
6d012f14 | 430 | if (win_info == TUI_SRC_WIN) |
c906108c | 431 | { |
362c05fe | 432 | struct tui_line_or_address l; |
1c5313c5 | 433 | |
362c05fe AS |
434 | l.loa = LOA_LINE; |
435 | l.u.line_no = start_line; | |
6ba8e26f | 436 | if (!(source_already_displayed |
9a2b4c1b MS |
437 | && tui_line_is_displayed (item->locator.line_no, |
438 | win_info, TRUE))) | |
13274fc3 UW |
439 | tui_update_source_window (win_info, get_frame_arch (fi), |
440 | sal.symtab, l, TRUE); | |
c906108c | 441 | else |
a4b99e53 | 442 | { |
362c05fe | 443 | l.u.line_no = item->locator.line_no; |
6d012f14 | 444 | tui_set_is_exec_point_at (l, win_info); |
a4b99e53 | 445 | } |
c906108c SS |
446 | } |
447 | else | |
448 | { | |
6d012f14 | 449 | if (win_info == TUI_DISASM_WIN) |
c906108c | 450 | { |
362c05fe | 451 | struct tui_line_or_address a; |
1c5313c5 | 452 | |
362c05fe AS |
453 | a.loa = LOA_ADDRESS; |
454 | a.u.addr = low; | |
9a2b4c1b MS |
455 | if (!tui_addr_is_displayed (item->locator.addr, |
456 | win_info, TRUE)) | |
13274fc3 UW |
457 | tui_update_source_window (win_info, get_frame_arch (fi), |
458 | sal.symtab, a, TRUE); | |
c906108c | 459 | else |
a4b99e53 | 460 | { |
362c05fe | 461 | a.u.addr = item->locator.addr; |
6d012f14 | 462 | tui_set_is_exec_point_at (a, win_info); |
a4b99e53 | 463 | } |
c906108c SS |
464 | } |
465 | } | |
6d012f14 | 466 | tui_update_exec_info (win_info); |
c906108c | 467 | } |
bbcbf914 PP |
468 | |
469 | return 1; | |
c906108c SS |
470 | } |
471 | else | |
472 | { | |
b5fca6d7 PP |
473 | locator_changed_p |
474 | = tui_set_locator_info (NULL, NULL, NULL, 0, (CORE_ADDR) 0); | |
475 | ||
476 | if (!locator_changed_p) | |
bbcbf914 | 477 | return 0; |
b5fca6d7 | 478 | |
47d3492a | 479 | tui_show_locator_content (); |
dd1abb8c | 480 | for (i = 0; i < (tui_source_windows ())->count; i++) |
c906108c | 481 | { |
96c1eda2 | 482 | win_info = (tui_source_windows ())->list[i]; |
6d012f14 AC |
483 | tui_clear_source_content (win_info, EMPTY_SOURCE_PROMPT); |
484 | tui_update_exec_info (win_info); | |
c906108c | 485 | } |
bbcbf914 PP |
486 | |
487 | return 1; | |
c906108c | 488 | } |
7d6dd1e9 | 489 | } |
c906108c | 490 | |
6ba8e26f AC |
491 | /* Function to initialize gdb commands, for tui window stack |
492 | manipulation. */ | |
2c0b251b PA |
493 | |
494 | /* Provide a prototype to silence -Wmissing-prototypes. */ | |
495 | extern initialize_file_ftype _initialize_tui_stack; | |
496 | ||
c906108c | 497 | void |
6ba8e26f | 498 | _initialize_tui_stack (void) |
c906108c | 499 | { |
9a2b4c1b MS |
500 | add_com ("update", class_tui, tui_update_command, |
501 | _("Update the source window and locator to " | |
502 | "display the current execution point.\n")); | |
41783295 | 503 | } |
c906108c | 504 | |
7563e053 | 505 | /* Command to update the display with the current execution point. */ |
c906108c | 506 | static void |
7563e053 | 507 | tui_update_command (char *arg, int from_tty) |
c906108c | 508 | { |
7563e053 | 509 | char cmd[sizeof("frame 0")]; |
c906108c | 510 | |
7563e053 SC |
511 | strcpy (cmd, "frame 0"); |
512 | execute_command (cmd, from_tty); | |
513 | } |