From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 25473 invoked by alias); 28 Nov 2002 20:18:52 -0000 Mailing-List: contact gdb-patches-help@sources.redhat.com; run by ezmlm Precedence: bulk List-Subscribe: List-Archive: List-Post: List-Help: , Sender: gdb-patches-owner@sources.redhat.com Received: (qmail 25464 invoked from network); 28 Nov 2002 20:18:49 -0000 Received: from unknown (HELO localhost.redhat.com) (216.138.202.10) by sources.redhat.com with SMTP; 28 Nov 2002 20:18:49 -0000 Received: from redhat.com (localhost [127.0.0.1]) by localhost.redhat.com (Postfix) with ESMTP id EB33E3F30 for ; Thu, 28 Nov 2002 15:18:43 -0500 (EST) Message-ID: <3DE67A23.3020108@redhat.com> Date: Thu, 28 Nov 2002 12:18:00 -0000 From: Andrew Cagney User-Agent: Mozilla/5.0 (X11; U; NetBSD macppc; en-US; rv:1.0.0) Gecko/20020824 X-Accept-Language: en-us, en MIME-Version: 1.0 To: gdb-patches@sources.redhat.com Subject: [patch/rfc] Add get_selected_frame(), deprecate selected_frame global Content-Type: multipart/mixed; boundary="------------070001000302070207020102" X-SW-Source: 2002-11/txt/msg00726.txt.bz2 This is a multi-part message in MIME format. --------------070001000302070207020102 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit Content-length: 918 Hello, Hello, this another long overdue step towards getting the frame cache under better control. It introduces the accesor method: get_selected_frame() and then deprecates the old global `selected_frame'. Breaking down the uses of `selected_frame': *-tdep.c: These are eliminated byupdating the code to current interfaces. Targets like the i386 and rs6000, for instance, don't refer to selected_frame. varobj.c, breakpoints.c, ada-lang.c: These are all pulling the switch selected frame hack (the thing that needs to go). Eliminating these will take a bit of time. Stopping these cases breading is the principle motivation behind clearly marking selected_frame as deprecated. stack.c: This, since it implements things like up/down and info frame, has legetimate references to selected_frame. They can be changed to get_selected_frame(). I'll look to committing this one in a few days, Andrew --------------070001000302070207020102 Content-Type: text/plain; name="diffs" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="diffs" Content-length: 64294 2002-11-28 Andrew Cagney * stack.c (selected_frame, select_frame): Move from here ... * frame.c (selected_frame, select_frame): ... to here. Include "language.h". * Makefile.in (frame.o): Update dependencies. * frame.c (get_selected_frame): New function. * frame.h (get_selected_frame): Declare. (deprecated_selected_frame): Rename selected_frame. * ada-lang.c, ada-tasks.c, breakpoint.c, corelow.c: Update. * eval.c, f-valprint.c, findvar.c, frame.c, frame.h: Update. * h8300-tdep.c, h8500-tdep.c, hppa-tdep.c, infcmd.c: Update. * inflow.c, infrun.c, macroscope.c, mips-tdep.c: Update. * mn10300-tdep.c, ocd.c, regcache.h, remote-e7000.c: Update. * remote-mips.c, remote-rdp.c, sh-tdep.c, sparc-tdep.c: Update. * stack.c, thread.c, tracepoint.c, valops.c, varobj.c: Update. * z8k-tdep.c, cli/cli-cmds.c: Update. Index: Makefile.in =================================================================== RCS file: /cvs/src/src/gdb/Makefile.in,v retrieving revision 1.286 diff -u -r1.286 Makefile.in --- Makefile.in 27 Nov 2002 19:13:08 -0000 1.286 +++ Makefile.in 28 Nov 2002 20:02:03 -0000 @@ -1706,8 +1706,9 @@ $(terminal_h) $(gdbthread_h) $(command_h) # OBSOLETE fr30-tdep.o: fr30-tdep.c frame.o: frame.c $(defs_h) $(frame_h) $(target_h) $(value_h) $(inferior_h) \ - $(regcache_h) $(gdb_assert_h) $(gdb_obstack_h) $(dummy_frame_h) \ - $(gdbcore_h) $(annotate_h) + $(regcache_h) $(gdb_assert_h) $(gdb_string_h) $(builtin_regs_h) \ + $(gdb_obstack_h) $(dummy_frame_h) $(gdbcore_h) $(annotate_h) \ + $(language_h) frv-tdep.o: frv-tdep.c $(defs_h) $(inferior_h) $(symfile_h) $(gdbcore_h) \ $(arch_utils_h) $(regcache_h) gcore.o: gcore.c $(defs_h) $(cli_decode_h) $(inferior_h) $(gdbcore_h) \ Index: ada-lang.c =================================================================== RCS file: /cvs/src/src/gdb/ada-lang.c,v retrieving revision 1.14 diff -u -r1.14 ada-lang.c --- ada-lang.c 24 Nov 2002 03:20:08 -0000 1.14 +++ ada-lang.c 28 Nov 2002 20:02:05 -0000 @@ -3536,7 +3536,7 @@ -(long) TYPE_LENGTH (SYMBOL_TYPE (static_link)); } - frame = selected_frame; + frame = deprecated_selected_frame; while (frame != NULL && ndefns == 0) { struct block *block; @@ -5056,7 +5056,7 @@ STREQ (sal.symtab->objfile->name, "/usr/shlib/libpthread.so")) continue; #endif - selected_frame = fi; + deprecated_selected_frame = fi; break; } } Index: ada-tasks.c =================================================================== RCS file: /cvs/src/src/gdb/ada-tasks.c,v retrieving revision 1.5 diff -u -r1.5 ada-tasks.c --- ada-tasks.c 8 Sep 2002 17:43:40 -0000 1.5 +++ ada-tasks.c 28 Nov 2002 20:02:05 -0000 @@ -795,10 +795,10 @@ { /* FIXME: find_printable_frame should be defined in frame.h, and implemented in ada-lang.c */ - /* find_printable_frame (selected_frame, frame_relative_level (selected_frame)); */ + /* find_printable_frame (deprecated_selected_frame, frame_relative_level (deprecated_selected_frame)); */ printf_filtered ("[Switching to task %d]\n", num); - print_stack_frame (selected_frame, - frame_relative_level (selected_frame), 1); + print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 1); } else printf_filtered ("Unable to switch to task %d\n", num); Index: breakpoint.c =================================================================== RCS file: /cvs/src/src/gdb/breakpoint.c,v retrieving revision 1.95 diff -u -r1.95 breakpoint.c --- breakpoint.c 24 Nov 2002 03:20:09 -0000 1.95 +++ breakpoint.c 28 Nov 2002 20:02:07 -0000 @@ -952,8 +952,8 @@ /* Save the current frame and level so we can restore it after evaluating the watchpoint expression on its own frame. */ - saved_frame = selected_frame; - saved_level = frame_relative_level (selected_frame); + saved_frame = deprecated_selected_frame; + saved_level = frame_relative_level (deprecated_selected_frame); /* Determine if the watchpoint is within scope. */ if (b->exp_valid_block == NULL) @@ -1049,8 +1049,8 @@ } /* Restore the frame and level. */ - if ((saved_frame != selected_frame) || - (saved_level != frame_relative_level (selected_frame))) + if ((saved_frame != deprecated_selected_frame) || + (saved_level != frame_relative_level (deprecated_selected_frame))) select_frame (saved_frame); if (val) @@ -4963,9 +4963,9 @@ if (default_breakpoint_valid) { - if (selected_frame) + if (deprecated_selected_frame) { - selected_pc = selected_frame->pc; + selected_pc = deprecated_selected_frame->pc; if (arg) if_arg = 1; } @@ -5041,10 +5041,10 @@ { if (default_breakpoint_valid) { - if (selected_frame) + if (deprecated_selected_frame) { addr_string = (char *) xmalloc (15); - sprintf (addr_string, "*0x%s", paddr_nz (selected_frame->pc)); + sprintf (addr_string, "*0x%s", paddr_nz (deprecated_selected_frame->pc)); if (arg) if_arg = 1; } @@ -5583,7 +5583,7 @@ { struct symtabs_and_lines sals; struct symtab_and_line sal; - struct frame_info *prev_frame = get_prev_frame (selected_frame); + struct frame_info *prev_frame = get_prev_frame (deprecated_selected_frame); struct breakpoint *breakpoint; struct cleanup *old_chain; struct continuation_arg *arg1; @@ -5612,7 +5612,7 @@ resolve_sal_pc (&sal); - breakpoint = set_momentary_breakpoint (sal, selected_frame, bp_until); + breakpoint = set_momentary_breakpoint (sal, deprecated_selected_frame, bp_until); if (!event_loop_p || !target_can_async_p ()) old_chain = make_cleanup_delete_breakpoint (breakpoint); @@ -5770,10 +5770,10 @@ /* Not sure whether an error message is always the correct response, but it's better than a core dump. */ - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) error ("No selected frame."); - block = get_frame_block (selected_frame, 0); - pc = selected_frame->pc; + block = get_frame_block (deprecated_selected_frame, 0); + pc = deprecated_selected_frame->pc; sals.nelts = 0; sals.sals = NULL; @@ -7368,8 +7368,8 @@ return; } - save_selected_frame = selected_frame; - save_selected_frame_level = frame_relative_level (selected_frame); + save_selected_frame = deprecated_selected_frame; + save_selected_frame_level = frame_relative_level (deprecated_selected_frame); select_frame (fr); } Index: corelow.c =================================================================== RCS file: /cvs/src/src/gdb/corelow.c,v retrieving revision 1.24 diff -u -r1.24 corelow.c --- corelow.c 16 Nov 2002 19:23:51 -0000 1.24 +++ corelow.c 28 Nov 2002 20:02:07 -0000 @@ -364,8 +364,8 @@ /* Now, set up the frame cache, and print the top of stack. */ flush_cached_frames (); select_frame (get_current_frame ()); - print_stack_frame (selected_frame, - frame_relative_level (selected_frame), 1); + print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 1); } else { Index: eval.c =================================================================== RCS file: /cvs/src/src/gdb/eval.c,v retrieving revision 1.24 diff -u -r1.24 eval.c --- eval.c 25 Sep 2002 20:30:37 -0000 1.24 +++ eval.c 28 Nov 2002 20:02:07 -0000 @@ -445,7 +445,7 @@ case OP_REGISTER: { int regno = longest_to_int (exp->elts[pc + 1].longconst); - struct value *val = value_of_register (regno, selected_frame); + struct value *val = value_of_register (regno, deprecated_selected_frame); (*pos) += 2; if (val == NULL) error ("Value of register %s not available.", Index: f-valprint.c =================================================================== RCS file: /cvs/src/src/gdb/f-valprint.c,v retrieving revision 1.7 diff -u -r1.7 f-valprint.c --- f-valprint.c 12 Oct 2002 01:48:17 -0000 1.7 +++ f-valprint.c 28 Nov 2002 20:02:07 -0000 @@ -74,7 +74,7 @@ switch (TYPE_ARRAY_LOWER_BOUND_TYPE (type)) { case BOUND_BY_VALUE_ON_STACK: - current_frame_addr = selected_frame->frame; + current_frame_addr = deprecated_selected_frame->frame; if (current_frame_addr > 0) { *lower_bound = @@ -98,7 +98,7 @@ break; case BOUND_BY_REF_ON_STACK: - current_frame_addr = selected_frame->frame; + current_frame_addr = deprecated_selected_frame->frame; if (current_frame_addr > 0) { ptr_to_lower_bound = @@ -132,7 +132,7 @@ switch (TYPE_ARRAY_UPPER_BOUND_TYPE (type)) { case BOUND_BY_VALUE_ON_STACK: - current_frame_addr = selected_frame->frame; + current_frame_addr = deprecated_selected_frame->frame; if (current_frame_addr > 0) { *upper_bound = @@ -161,7 +161,7 @@ break; case BOUND_BY_REF_ON_STACK: - current_frame_addr = selected_frame->frame; + current_frame_addr = deprecated_selected_frame->frame; if (current_frame_addr > 0) { ptr_to_upper_bound = @@ -587,7 +587,7 @@ first make sure that it is visible and if so, let us display its contents */ - fi = selected_frame; + fi = deprecated_selected_frame; if (fi == NULL) error ("No frame selected"); @@ -679,7 +679,7 @@ if (comname == NULL) error ("Cannot deal with NULL common name!"); - fi = selected_frame; + fi = deprecated_selected_frame; if (fi == NULL) error ("No frame selected"); Index: findvar.c =================================================================== RCS file: /cvs/src/src/gdb/findvar.c,v retrieving revision 1.41 diff -u -r1.41 findvar.c --- findvar.c 24 Nov 2002 19:48:12 -0000 1.41 +++ findvar.c 28 Nov 2002 20:02:08 -0000 @@ -303,7 +303,7 @@ /* Builtin registers lie completly outside of the range of normal registers. Catch them early so that the target never sees them. */ if (regnum >= NUM_REGS + NUM_PSEUDO_REGS) - return value_of_builtin_reg (regnum, selected_frame); + return value_of_builtin_reg (regnum, deprecated_selected_frame); get_saved_register (raw_buffer, &optim, &addr, frame, regnum, &lval); @@ -418,7 +418,7 @@ and a stack frame id, read the value of the variable and return a (pointer to a) struct value containing the value. If the variable cannot be found, return a zero pointer. - If FRAME is NULL, use the selected_frame. */ + If FRAME is NULL, use the deprecated_selected_frame. */ struct value * read_var_value (register struct symbol *var, struct frame_info *frame) @@ -435,7 +435,7 @@ len = TYPE_LENGTH (type); if (frame == NULL) - frame = selected_frame; + frame = deprecated_selected_frame; switch (SYMBOL_CLASS (var)) { Index: frame.c =================================================================== RCS file: /cvs/src/src/gdb/frame.c,v retrieving revision 1.32 diff -u -r1.32 frame.c --- frame.c 24 Nov 2002 19:48:12 -0000 1.32 +++ frame.c 28 Nov 2002 20:02:08 -0000 @@ -33,6 +33,7 @@ #include "dummy-frame.h" #include "gdbcore.h" #include "annotate.h" +#include "language.h" /* Return a frame uniq ID that can be used to, later re-find the frame. */ @@ -440,6 +441,63 @@ set_current_frame (struct frame_info *frame) { current_frame = frame; +} + +/* The "selected" stack frame is used by default for local and arg + access. May be zero, for no selected frame. */ + +struct frame_info *deprecated_selected_frame; + +/* Return the selected frame. Always non-null (unless there isn't an + inferior sufficient for creating a frame) in which case an error is + thrown. */ + +struct frame_info * +get_selected_frame (void) +{ + if (deprecated_selected_frame == NULL) + /* Hey! Don't trust this. It should really be re-finding the + last selected frame of the currently selected thread. This, + though, is better than nothing. */ + select_frame (get_current_frame ()); + return deprecated_selected_frame; +} + +/* Select frame FI (or NULL - to invalidate the current frame). */ + +void +select_frame (struct frame_info *fi) +{ + register struct symtab *s; + + deprecated_selected_frame = fi; + /* NOTE: cagney/2002-05-04: FI can be NULL. This occures when the + frame is being invalidated. */ + if (selected_frame_level_changed_hook) + selected_frame_level_changed_hook (frame_relative_level (fi)); + + /* FIXME: kseitz/2002-08-28: It would be nice to call + selected_frame_level_changed_event right here, but due to limitations + in the current interfaces, we would end up flooding UIs with events + because select_frame is used extensively internally. + + Once we have frame-parameterized frame (and frame-related) commands, + the event notification can be moved here, since this function will only + be called when the users selected frame is being changed. */ + + /* Ensure that symbols for this frame are read in. Also, determine the + source language of this frame, and switch to it if desired. */ + if (fi) + { + s = find_pc_symtab (fi->pc); + if (s + && s->language != current_language->la_language + && s->language != language_unknown + && language_mode == language_mode_auto) + { + set_language (s->language); + } + } } /* Return the register saved in the simplistic ``saved_regs'' cache. Index: frame.h =================================================================== RCS file: /cvs/src/src/gdb/frame.h,v retrieving revision 1.38 diff -u -r1.38 frame.h --- frame.h 28 Nov 2002 17:11:41 -0000 1.38 +++ frame.h 28 Nov 2002 20:02:08 -0000 @@ -71,15 +71,24 @@ flush_cached_frames() and reinit_frame_cache() is that the latter explicitly sets the selected frame back to the current frame there isn't any real difference (except that one delays the selection of - a new frame). There should instead be a get_selected_frame() - method that reinit's the frame cache on-demand. As for - invalidating the cache, there should be two methods one that - reverts the thread's selected frame back to current frame (for when - the inferior resumes) and one that does not (for when the user - modifies the target invalidating the frame cache). */ + a new frame). Code can instead simply rely on get_selected_frame() + to reinit's the selected frame as needed. As for invalidating the + cache, there should be two methods one that reverts the thread's + selected frame back to current frame (for when the inferior + resumes) and one that does not (for when the user modifies the + target invalidating the frame cache). */ extern void flush_cached_frames (void); extern void reinit_frame_cache (void); +/* On demand, create the selected frame and then return it. If the + selected frame can not be created, this function throws an error. */ +/* FIXME: cagney/2002-11-28: At present, when there is no selected + frame, this function always returns the current (inner most) frame. + It should instead, when a thread has previously had its frame + selected (but not resumed) and the frame cache invalidated, find + and then return that thread's previously selected frame. */ +extern struct frame_info *get_selected_frame (void); + /* Select a specific frame. NULL, apparently implies re-select the inner most frame. */ extern void select_frame (struct frame_info *); @@ -517,21 +526,21 @@ The relevant code needs to be audited to determine if it is possible (or pratical) to instead pass the applicable frame in as a parameter. For instance, DEPRECATED_DO_REGISTERS_INFO() relied on - the selected_frame global, but its replacement, + the deprecated_selected_frame global, while its replacement, PRINT_REGISTERS_INFO(), is parameterized with the selected frame. The only real exceptions occure at the edge (in the CLI code) where user commands need to pick up the selected frame before proceeding. This is important. GDB is trying to stamp out the hack: - saved_frame = selected_frame; - selected_frame = ...; + saved_frame = deprecated_selected_frame; + deprecated_selected_frame = ...; hack_using_global_selected_frame (); - selected_frame = saved_frame; + deprecated_selected_frame = saved_frame; Take care! */ -extern struct frame_info *selected_frame; +extern struct frame_info *deprecated_selected_frame; /* NOTE: cagney/2002-11-28: Index: h8300-tdep.c =================================================================== RCS file: /cvs/src/src/gdb/h8300-tdep.c,v retrieving revision 1.25 diff -u -r1.25 h8300-tdep.c --- h8300-tdep.c 28 Nov 2002 18:15:58 -0000 1.25 +++ h8300-tdep.c 28 Nov 2002 20:02:09 -0000 @@ -904,7 +904,7 @@ int C, Z, N, V; unsigned char b[h8300h_reg_size]; unsigned char l; - frame_register_read (selected_frame, regno, b); + frame_register_read (deprecated_selected_frame, regno, b); l = b[REGISTER_VIRTUAL_SIZE (E_CCR_REGNUM) - 1]; fprintf_filtered (file, "\t"); fprintf_filtered (file, "I-%d ", (l & 0x80) != 0); @@ -945,7 +945,7 @@ /* EXR register */ unsigned char b[h8300h_reg_size]; unsigned char l; - frame_register_read (selected_frame, regno, b); + frame_register_read (deprecated_selected_frame, regno, b); l = b[REGISTER_VIRTUAL_SIZE (E_EXR_REGNUM) - 1]; fprintf_filtered (file, "\t"); fprintf_filtered (file, "T-%d - - - ", (l & 0x80) != 0); Index: h8500-tdep.c =================================================================== RCS file: /cvs/src/src/gdb/h8500-tdep.c,v retrieving revision 1.14 diff -u -r1.14 h8500-tdep.c --- h8500-tdep.c 24 Nov 2002 19:48:12 -0000 1.14 +++ h8500-tdep.c 28 Nov 2002 20:02:09 -0000 @@ -186,7 +186,7 @@ unsigned char b[2]; unsigned char l; - frame_register_read (selected_frame, regno, b); + frame_register_read (deprecated_selected_frame, regno, b); l = b[1]; printf_unfiltered ("\t"); printf_unfiltered ("I-%d - ", (l & 0x80) != 0); @@ -328,7 +328,7 @@ void h8500_do_registers_info (int regnum, int all) { - h8500_print_registers_info (current_gdbarch, gdb_stdout, selected_frame, + h8500_print_registers_info (current_gdbarch, gdb_stdout, deprecated_selected_frame, regnum, all); } @@ -617,10 +617,10 @@ break; } - get_saved_register (regbuf, NULL, NULL, selected_frame, page_regnum, NULL); + get_saved_register (regbuf, NULL, NULL, deprecated_selected_frame, page_regnum, NULL); regval = regbuf[0] << 16; - get_saved_register (regbuf, NULL, NULL, selected_frame, regnum, NULL); + get_saved_register (regbuf, NULL, NULL, deprecated_selected_frame, regnum, NULL); regval |= regbuf[0] << 8 | regbuf[1]; /* XXX host/target byte order */ xfree (var->value); /* Free up old value */ Index: hppa-tdep.c =================================================================== RCS file: /cvs/src/src/gdb/hppa-tdep.c,v retrieving revision 1.35 diff -u -r1.35 hppa-tdep.c --- hppa-tdep.c 24 Nov 2002 19:48:12 -0000 1.35 +++ hppa-tdep.c 28 Nov 2002 20:02:11 -0000 @@ -2511,7 +2511,7 @@ /* Make a copy of gdb's save area (may cause actual reads from the target). */ for (i = 0; i < NUM_REGS; i++) - frame_register_read (selected_frame, i, raw_regs + REGISTER_BYTE (i)); + frame_register_read (deprecated_selected_frame, i, raw_regs + REGISTER_BYTE (i)); if (regnum == -1) pa_print_registers (raw_regs, regnum, fpregs); @@ -2555,7 +2555,7 @@ /* Make a copy of gdb's save area (may cause actual reads from the target). */ for (i = 0; i < NUM_REGS; i++) - frame_register_read (selected_frame, i, raw_regs + REGISTER_BYTE (i)); + frame_register_read (deprecated_selected_frame, i, raw_regs + REGISTER_BYTE (i)); if (regnum == -1) pa_strcat_registers (raw_regs, regnum, fpregs, stream); @@ -2807,7 +2807,7 @@ char virtual_buffer[MAX_REGISTER_VIRTUAL_SIZE]; /* Get 32bits of data. */ - frame_register_read (selected_frame, i, raw_buffer); + frame_register_read (deprecated_selected_frame, i, raw_buffer); /* Put it in the buffer. No conversions are ever necessary. */ memcpy (virtual_buffer, raw_buffer, REGISTER_RAW_SIZE (i)); @@ -2825,7 +2825,7 @@ if ((i % 2) == 0) { /* Get the data in raw format for the 2nd half. */ - frame_register_read (selected_frame, i + 1, raw_buffer); + frame_register_read (deprecated_selected_frame, i + 1, raw_buffer); /* Copy it into the appropriate part of the virtual buffer. */ memcpy (virtual_buffer + REGISTER_RAW_SIZE (i), raw_buffer, @@ -2853,7 +2853,7 @@ print_spaces_filtered (8 - strlen (REGISTER_NAME (i)), stream); /* Get 32bits of data. */ - frame_register_read (selected_frame, i, raw_buffer); + frame_register_read (deprecated_selected_frame, i, raw_buffer); /* Put it in the buffer. No conversions are ever necessary. */ memcpy (virtual_buffer, raw_buffer, REGISTER_RAW_SIZE (i)); @@ -2864,7 +2864,7 @@ char raw_buf[MAX_REGISTER_RAW_SIZE]; /* Get the data in raw format for the 2nd half. */ - frame_register_read (selected_frame, i + 1, raw_buf); + frame_register_read (deprecated_selected_frame, i + 1, raw_buf); /* Copy it into the appropriate part of the virtual buffer. */ memcpy (virtual_buffer + REGISTER_RAW_SIZE (i), raw_buf, REGISTER_RAW_SIZE (i)); Index: infcmd.c =================================================================== RCS file: /cvs/src/src/gdb/infcmd.c,v retrieving revision 1.63 diff -u -r1.63 infcmd.c --- infcmd.c 24 Nov 2002 19:48:12 -0000 1.63 +++ infcmd.c 28 Nov 2002 20:02:11 -0000 @@ -1263,10 +1263,10 @@ error ("The \"finish\" command does not take any arguments."); if (!target_has_execution) error ("The program is not running."); - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) error ("No selected frame."); - frame = get_prev_frame (selected_frame); + frame = get_prev_frame (deprecated_selected_frame); if (frame == 0) error ("\"finish\" not meaningful in the outermost frame."); @@ -1284,15 +1284,15 @@ /* Find the function we will return from. */ - function = find_pc_function (selected_frame->pc); + function = find_pc_function (deprecated_selected_frame->pc); /* Print info on the selected frame, including level number but not source. */ if (from_tty) { printf_filtered ("Run till exit from "); - print_stack_frame (selected_frame, - frame_relative_level (selected_frame), 0); + print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 0); } /* If running asynchronously and the target support asynchronous @@ -1680,13 +1680,13 @@ if (!target_has_registers) error ("The program has no registers now."); - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) error ("No selected frame."); if (!addr_exp) { gdbarch_print_registers_info (current_gdbarch, gdb_stdout, - selected_frame, -1, fpregs); + deprecated_selected_frame, -1, fpregs); return; } @@ -1723,7 +1723,7 @@ if (regnum >= 0) { gdbarch_print_registers_info (current_gdbarch, gdb_stdout, - selected_frame, regnum, fpregs); + deprecated_selected_frame, regnum, fpregs); continue; } } @@ -1737,7 +1737,7 @@ && regnum < NUM_REGS + NUM_PSEUDO_REGS) { gdbarch_print_registers_info (current_gdbarch, gdb_stdout, - selected_frame, regnum, fpregs); + deprecated_selected_frame, regnum, fpregs); continue; } } @@ -1763,7 +1763,7 @@ if (gdbarch_register_reggroup_p (current_gdbarch, regnum, (*group))) gdbarch_print_registers_info (current_gdbarch, - gdb_stdout, selected_frame, + gdb_stdout, deprecated_selected_frame, regnum, fpregs); } continue; @@ -1793,7 +1793,7 @@ { if (!target_has_registers) error ("The program has no registers now."); - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) error ("No selected frame."); if (gdbarch_print_vector_info_p (gdbarch)) @@ -1819,7 +1819,7 @@ static void vector_info (char *args, int from_tty) { - print_vector_info (current_gdbarch, gdb_stdout, selected_frame, args); + print_vector_info (current_gdbarch, gdb_stdout, deprecated_selected_frame, args); } @@ -1960,7 +1960,7 @@ { if (!target_has_registers) error ("The program has no registers now."); - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) error ("No selected frame."); if (gdbarch_print_float_info_p (gdbarch)) @@ -1994,7 +1994,7 @@ static void float_info (char *args, int from_tty) { - print_float_info (current_gdbarch, gdb_stdout, selected_frame, args); + print_float_info (current_gdbarch, gdb_stdout, deprecated_selected_frame, args); } /* ARGSUSED */ Index: inflow.c =================================================================== RCS file: /cvs/src/src/gdb/inflow.c,v retrieving revision 1.16 diff -u -r1.16 inflow.c --- inflow.c 18 Sep 2002 22:44:31 -0000 1.16 +++ inflow.c 28 Nov 2002 20:02:11 -0000 @@ -608,11 +608,11 @@ if (target_has_stack) { printf_filtered ("In %s,\n", target_longname); - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) fputs_filtered ("No selected stack frame.\n", gdb_stdout); else - print_stack_frame (selected_frame, - frame_relative_level (selected_frame), 1); + print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 1); } } Index: infrun.c =================================================================== RCS file: /cvs/src/src/gdb/infrun.c,v retrieving revision 1.78 diff -u -r1.78 infrun.c --- infrun.c 24 Nov 2002 19:48:12 -0000 1.78 +++ infrun.c 28 Nov 2002 20:02:12 -0000 @@ -3342,7 +3342,7 @@ bpstat_print() contains the logic deciding in detail what to print, based on the event(s) that just occurred. */ - if (stop_print_frame && selected_frame) + if (stop_print_frame && deprecated_selected_frame) { int bpstat_ret; int source_flag; @@ -3386,7 +3386,7 @@ LOCATION: Print only location SRC_AND_LOC: Print location and source line */ if (do_frame_printing) - show_and_print_stack_frame (selected_frame, -1, source_flag); + show_and_print_stack_frame (deprecated_selected_frame, -1, source_flag); /* Display the auto-display expressions. */ do_displays (); @@ -3856,7 +3856,7 @@ inf_status->registers = regcache_dup (current_regcache); - get_frame_id (selected_frame, &inf_status->selected_frame_id); + get_frame_id (deprecated_selected_frame, &inf_status->selected_frame_id); return inf_status; } Index: macroscope.c =================================================================== RCS file: /cvs/src/src/gdb/macroscope.c,v retrieving revision 1.5 diff -u -r1.5 macroscope.c --- macroscope.c 7 Nov 2002 20:43:22 -0000 1.5 +++ macroscope.c 28 Nov 2002 20:02:13 -0000 @@ -87,8 +87,8 @@ struct macro_scope *ms; /* If there's a selected frame, use its PC. */ - if (selected_frame) - sal = find_pc_line (selected_frame->pc, 0); + if (deprecated_selected_frame) + sal = find_pc_line (deprecated_selected_frame->pc, 0); /* If the target has any registers at all, then use its PC. Why we would have registers but no stack, I'm not sure. */ Index: mips-tdep.c =================================================================== RCS file: /cvs/src/src/gdb/mips-tdep.c,v retrieving revision 1.139 diff -u -r1.139 mips-tdep.c --- mips-tdep.c 28 Nov 2002 18:15:58 -0000 1.139 +++ mips-tdep.c 28 Nov 2002 20:02:14 -0000 @@ -3946,7 +3946,7 @@ int raw_size = REGISTER_RAW_SIZE (regno); char *raw_buffer = alloca (raw_size); - if (!frame_register_read (selected_frame, regno, raw_buffer)) + if (!frame_register_read (deprecated_selected_frame, regno, raw_buffer)) error ("can't read register %d (%s)", regno, REGISTER_NAME (regno)); if (raw_size == 8) { @@ -3980,7 +3980,7 @@ { /* We have a 64-bit value for this register, and we should use all 64 bits. */ - if (!frame_register_read (selected_frame, regno, rare_buffer)) + if (!frame_register_read (deprecated_selected_frame, regno, rare_buffer)) error ("can't read register %d (%s)", regno, REGISTER_NAME (regno)); } else @@ -4011,7 +4011,7 @@ char *raw_buffer = alloca (MAX_REGISTER_RAW_SIZE); /* Get the data in raw format. */ - if (!frame_register_read (selected_frame, regnum, raw_buffer)) + if (!frame_register_read (deprecated_selected_frame, regnum, raw_buffer)) { printf_filtered ("%s: [Invalid]", REGISTER_NAME (regnum)); return; @@ -4191,7 +4191,7 @@ if (TYPE_CODE (REGISTER_VIRTUAL_TYPE (regnum)) == TYPE_CODE_FLT) break; /* end row: reached FP register */ /* OK: get the data in raw format. */ - if (!frame_register_read (selected_frame, regnum, raw_buffer)) + if (!frame_register_read (deprecated_selected_frame, regnum, raw_buffer)) error ("can't read register %d (%s)", regnum, REGISTER_NAME (regnum)); /* pad small registers */ for (byte = 0; byte < (MIPS_REGSIZE - REGISTER_VIRTUAL_SIZE (regnum)); byte++) Index: mn10300-tdep.c =================================================================== RCS file: /cvs/src/src/gdb/mn10300-tdep.c,v retrieving revision 1.38 diff -u -r1.38 mn10300-tdep.c --- mn10300-tdep.c 28 Nov 2002 18:15:58 -0000 1.38 +++ mn10300-tdep.c 28 Nov 2002 20:02:14 -0000 @@ -1012,7 +1012,7 @@ printf_filtered ("%s: ", name); /* Get the data */ - if (!frame_register_read (selected_frame, regnum, raw_buffer)) + if (!frame_register_read (deprecated_selected_frame, regnum, raw_buffer)) { printf_filtered ("[invalid]"); return; Index: ocd.c =================================================================== RCS file: /cvs/src/src/gdb/ocd.c,v retrieving revision 1.21 diff -u -r1.21 ocd.c --- ocd.c 5 May 2002 01:15:13 -0000 1.21 +++ ocd.c 28 Nov 2002 20:02:14 -0000 @@ -256,7 +256,7 @@ stop_pc = read_pc (); set_current_frame (create_new_frame (read_fp (), stop_pc)); select_frame (get_current_frame ()); - print_stack_frame (selected_frame, -1, 1); + print_stack_frame (deprecated_selected_frame, -1, 1); buf[0] = OCD_LOG_FILE; buf[1] = 3; /* close existing WIGGLERS.LOG */ Index: regcache.h =================================================================== RCS file: /cvs/src/src/gdb/regcache.h,v retrieving revision 1.27 diff -u -r1.27 regcache.h --- regcache.h 14 Nov 2002 20:37:28 -0000 1.27 +++ regcache.h 28 Nov 2002 20:02:14 -0000 @@ -159,13 +159,13 @@ simple substitution is required when updating the code. The change, as far as practical, should avoid adding references to global variables (e.g., current_regcache, current_frame, - current_gdbarch or selected_frame) and instead refer to the FRAME - or REGCACHE that has been passed into the containing function as - parameters. Consequently, the change typically involves modifying - the containing function so that it takes a FRAME or REGCACHE - parameter. In the case of an architecture vector method, there - should already be a non-deprecated variant that is parameterized - with FRAME or REGCACHE. */ + current_gdbarch or deprecated_selected_frame) and instead refer to + the FRAME or REGCACHE that has been passed into the containing + function as parameters. Consequently, the change typically + involves modifying the containing function so that it takes a FRAME + or REGCACHE parameter. In the case of an architecture vector + method, there should already be a non-deprecated variant that is + parameterized with FRAME or REGCACHE. */ extern char *deprecated_grub_regcache_for_registers (struct regcache *); extern char *deprecated_grub_regcache_for_register_valid (struct regcache *); Index: remote-e7000.c =================================================================== RCS file: /cvs/src/src/gdb/remote-e7000.c,v retrieving revision 1.29 diff -u -r1.29 remote-e7000.c --- remote-e7000.c 12 Nov 2002 21:43:55 -0000 1.29 +++ remote-e7000.c 28 Nov 2002 20:02:15 -0000 @@ -631,7 +631,7 @@ stop_pc = read_pc (); set_current_frame (create_new_frame (read_fp (), stop_pc)); select_frame (get_current_frame ()); - print_stack_frame (selected_frame, -1, 1); + print_stack_frame (deprecated_selected_frame, -1, 1); return 1; } Index: remote-mips.c =================================================================== RCS file: /cvs/src/src/gdb/remote-mips.c,v retrieving revision 1.28 diff -u -r1.28 remote-mips.c --- remote-mips.c 7 Nov 2002 02:40:28 -0000 1.28 +++ remote-mips.c 28 Nov 2002 20:02:16 -0000 @@ -1622,7 +1622,7 @@ stop_pc = read_pc (); set_current_frame (create_new_frame (read_fp (), stop_pc)); select_frame (get_current_frame ()); - print_stack_frame (selected_frame, -1, 1); + print_stack_frame (deprecated_selected_frame, -1, 1); xfree (serial_port_name); } Index: remote-rdp.c =================================================================== RCS file: /cvs/src/src/gdb/remote-rdp.c,v retrieving revision 1.30 diff -u -r1.30 remote-rdp.c --- remote-rdp.c 12 Nov 2002 21:43:55 -0000 1.30 +++ remote-rdp.c 28 Nov 2002 20:02:16 -0000 @@ -1165,7 +1165,7 @@ stop_pc = read_pc (); set_current_frame (create_new_frame (read_fp (), stop_pc)); select_frame (get_current_frame ()); - print_stack_frame (selected_frame, -1, 1); + print_stack_frame (deprecated_selected_frame, -1, 1); } Index: sh-tdep.c =================================================================== RCS file: /cvs/src/src/gdb/sh-tdep.c,v retrieving revision 1.79 diff -u -r1.79 sh-tdep.c --- sh-tdep.c 28 Nov 2002 18:15:59 -0000 1.79 +++ sh-tdep.c 28 Nov 2002 20:02:17 -0000 @@ -2937,7 +2937,7 @@ static void sh64_show_regs (void) { - if (pc_is_isa32 (selected_frame->pc)) + if (pc_is_isa32 (deprecated_selected_frame->pc)) sh64_show_media_regs (); else sh64_show_compact_regs (); @@ -3919,7 +3919,7 @@ raw_buffer = (char *) alloca (REGISTER_RAW_SIZE (FP0_REGNUM)); /* Get the data in raw format. */ - if (!frame_register_read (selected_frame, regnum, raw_buffer)) + if (!frame_register_read (deprecated_selected_frame, regnum, raw_buffer)) error ("can't read register %d (%s)", regnum, REGISTER_NAME (regnum)); /* Get the register as a number */ @@ -4001,7 +4001,7 @@ print_spaces_filtered (15 - strlen (REGISTER_NAME (regnum)), gdb_stdout); /* Get the data in raw format. */ - if (!frame_register_read (selected_frame, regnum, raw_buffer)) + if (!frame_register_read (deprecated_selected_frame, regnum, raw_buffer)) printf_filtered ("*value not available*\n"); val_print (REGISTER_VIRTUAL_TYPE (regnum), raw_buffer, 0, 0, @@ -4112,7 +4112,7 @@ void sh64_do_registers_info (int regnum, int fpregs) { - if (pc_is_isa32 (selected_frame->pc)) + if (pc_is_isa32 (deprecated_selected_frame->pc)) sh_do_registers_info (regnum, fpregs); else sh_compact_do_registers_info (regnum, fpregs); Index: sparc-tdep.c =================================================================== RCS file: /cvs/src/src/gdb/sparc-tdep.c,v retrieving revision 1.49 diff -u -r1.49 sparc-tdep.c --- sparc-tdep.c 28 Nov 2002 18:15:59 -0000 1.49 +++ sparc-tdep.c 28 Nov 2002 20:02:18 -0000 @@ -816,10 +816,10 @@ /* error ("No selected frame."); */ if (!target_has_registers) error ("The program has no registers now."); - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) error ("No selected frame."); /* Try to use selected frame */ - frame = get_prev_frame (selected_frame); + frame = get_prev_frame (deprecated_selected_frame); if (frame == 0) error ("Cmd not meaningful in the outermost frame."); } @@ -1871,8 +1871,8 @@ { char value[16]; - if (frame_register_read (selected_frame, regno, value) - && frame_register_read (selected_frame, regno + 1, value + 4)) + if (frame_register_read (deprecated_selected_frame, regno, value) + && frame_register_read (deprecated_selected_frame, regno + 1, value + 4)) { printf_unfiltered ("\t"); print_floating (value, builtin_type_double, gdb_stdout); @@ -1880,8 +1880,8 @@ #if 0 /* FIXME: gdb doesn't handle long doubles */ if ((regno & 3) == 0) { - if (frame_register_read (selected_frame, regno + 2, value + 8) - && frame_register_read (selected_frame, regno + 3, value + 12)) + if (frame_register_read (deprecated_selected_frame, regno + 2, value + 8) + && frame_register_read (deprecated_selected_frame, regno + 3, value + 12)) { printf_unfiltered ("\t"); print_floating (value, builtin_type_long_double, gdb_stdout); @@ -1900,8 +1900,8 @@ { char value[16]; - if (frame_register_read (selected_frame, regno, value) - && frame_register_read (selected_frame, regno + 1, value + 8)) + if (frame_register_read (deprecated_selected_frame, regno, value) + && frame_register_read (deprecated_selected_frame, regno + 1, value + 8)) { printf_unfiltered ("\t"); print_floating (value, builtin_type_long_double, gdb_stdout); @@ -2150,7 +2150,7 @@ void sparc_do_registers_info (int regnum, int all) { - sparc_print_registers_info (current_gdbarch, gdb_stdout, selected_frame, + sparc_print_registers_info (current_gdbarch, gdb_stdout, deprecated_selected_frame, regnum, all); } @@ -2166,8 +2166,8 @@ void sparclet_do_registers_info (int regnum, int all) { - sparclet_print_registers_info (current_gdbarch, gdb_stdout, selected_frame, - regnum, all); + sparclet_print_registers_info (current_gdbarch, gdb_stdout, + deprecated_selected_frame, regnum, all); } Index: stack.c =================================================================== RCS file: /cvs/src/src/gdb/stack.c,v retrieving revision 1.52 diff -u -r1.52 stack.c --- stack.c 24 Nov 2002 19:48:13 -0000 1.52 +++ stack.c 28 Nov 2002 20:02:18 -0000 @@ -110,11 +110,6 @@ extern int addressprint; /* Print addresses, or stay symbolic only? */ -/* The "selected" stack frame is used by default for local and arg access. - May be zero, for no selected frame. */ - -struct frame_info *selected_frame; - /* Zero means do things normally; we are interacting directly with the user. One means print the full filename and linenumber when a frame is printed, and do so in a format emacs18/emacs19.22 can @@ -663,9 +658,9 @@ switch (numargs) { case 0: - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) error ("No selected frame."); - return selected_frame; + return deprecated_selected_frame; /* NOTREACHED */ case 1: { @@ -803,10 +798,10 @@ } calling_frame_info = get_prev_frame (fi); - if (!addr_exp && frame_relative_level (selected_frame) >= 0) + if (!addr_exp && frame_relative_level (deprecated_selected_frame) >= 0) { printf_filtered ("Stack level %d, frame at ", - frame_relative_level (selected_frame)); + frame_relative_level (deprecated_selected_frame)); print_address_numeric (fi->frame, 1, gdb_stdout); printf_filtered (":\n"); } @@ -1371,9 +1366,9 @@ void locals_info (char *args, int from_tty) { - if (!selected_frame) + if (!deprecated_selected_frame) error ("No frame selected."); - print_frame_local_vars (selected_frame, 0, gdb_stdout); + print_frame_local_vars (deprecated_selected_frame, 0, gdb_stdout); } static void @@ -1390,17 +1385,17 @@ system to find the list of active handlers, etc. */ fprintf_filtered (gdb_stdout, "Info catch not supported with this target/compiler combination.\n"); #if 0 - if (!selected_frame) + if (!deprecated_selected_frame) error ("No frame selected."); #endif } else { /* Assume g++ compiled code -- old v 4.16 behaviour */ - if (!selected_frame) + if (!deprecated_selected_frame) error ("No frame selected."); - print_frame_label_vars (selected_frame, 0, gdb_stdout); + print_frame_label_vars (deprecated_selected_frame, 0, gdb_stdout); } } @@ -1466,9 +1461,9 @@ void args_info (char *ignore, int from_tty) { - if (!selected_frame) + if (!deprecated_selected_frame) error ("No frame selected."); - print_frame_arg_vars (selected_frame, gdb_stdout); + print_frame_arg_vars (deprecated_selected_frame, gdb_stdout); } @@ -1480,44 +1475,6 @@ } -/* Select frame FI (or NULL - to invalidate the current frame). */ - -void -select_frame (struct frame_info *fi) -{ - register struct symtab *s; - - selected_frame = fi; - /* NOTE: cagney/2002-05-04: FI can be NULL. This occures when the - frame is being invalidated. */ - if (selected_frame_level_changed_hook) - selected_frame_level_changed_hook (frame_relative_level (fi)); - - /* FIXME: kseitz/2002-08-28: It would be nice to call - selected_frame_level_changed_event right here, but due to limitations - in the current interfaces, we would end up flooding UIs with events - because select_frame is used extensively internally. - - Once we have frame-parameterized frame (and frame-related) commands, - the event notification can be moved here, since this function will only - be called when the users selected frame is being changed. */ - - /* Ensure that symbols for this frame are read in. Also, determine the - source language of this frame, and switch to it if desired. */ - if (fi) - { - s = find_pc_symtab (fi->pc); - if (s - && s->language != current_language->la_language - && s->language != language_unknown - && language_mode == language_mode_auto) - { - set_language (s->language); - } - } -} - - /* Select frame FI. Also print the stack frame and show the source if this is the tui version. */ static void @@ -1543,9 +1500,9 @@ if (!target_has_stack) return 0; - if (!selected_frame) + if (!deprecated_selected_frame) return get_current_block (addr_in_block); - return get_frame_block (selected_frame, addr_in_block); + return get_frame_block (deprecated_selected_frame, addr_in_block); } /* Find a frame a certain number of levels away from FRAME. @@ -1606,7 +1563,7 @@ select_frame_command (char *level_exp, int from_tty) { struct frame_info *frame; - int level = frame_relative_level (selected_frame); + int level = frame_relative_level (deprecated_selected_frame); if (!target_has_stack) error ("No stack."); @@ -1614,8 +1571,8 @@ frame = parse_frame_specification (level_exp); select_frame (frame); - if (level != frame_relative_level (selected_frame)) - selected_frame_level_changed_event (frame_relative_level (selected_frame)); + if (level != frame_relative_level (deprecated_selected_frame)) + selected_frame_level_changed_event (frame_relative_level (deprecated_selected_frame)); } /* The "frame" command. With no arg, print selected frame briefly. @@ -1626,8 +1583,8 @@ frame_command (char *level_exp, int from_tty) { select_frame_command (level_exp, from_tty); - show_and_print_stack_frame (selected_frame, - frame_relative_level (selected_frame), 1); + show_and_print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 1); } /* The XDB Compatibility command to print the current frame. */ @@ -1635,10 +1592,10 @@ static void current_frame_command (char *level_exp, int from_tty) { - if (target_has_stack == 0 || selected_frame == 0) + if (target_has_stack == 0 || deprecated_selected_frame == 0) error ("No stack."); - print_only_stack_frame (selected_frame, - frame_relative_level (selected_frame), 1); + print_only_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 1); } /* Select the frame up one or COUNT stack levels @@ -1654,14 +1611,14 @@ count = parse_and_eval_long (count_exp); count1 = count; - if (target_has_stack == 0 || selected_frame == 0) + if (target_has_stack == 0 || deprecated_selected_frame == 0) error ("No stack."); - fi = find_relative_frame (selected_frame, &count1); + fi = find_relative_frame (deprecated_selected_frame, &count1); if (count1 != 0 && count_exp == 0) error ("Initial frame selected; you cannot go up."); select_frame (fi); - selected_frame_level_changed_event (frame_relative_level (selected_frame)); + selected_frame_level_changed_event (frame_relative_level (deprecated_selected_frame)); } static void @@ -1674,8 +1631,8 @@ up_command (char *count_exp, int from_tty) { up_silently_base (count_exp); - show_and_print_stack_frame (selected_frame, - frame_relative_level (selected_frame), 1); + show_and_print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 1); } /* Select the frame down one or COUNT stack levels @@ -1691,10 +1648,10 @@ count = -parse_and_eval_long (count_exp); count1 = count; - if (target_has_stack == 0 || selected_frame == 0) + if (target_has_stack == 0 || deprecated_selected_frame == 0) error ("No stack."); - frame = find_relative_frame (selected_frame, &count1); + frame = find_relative_frame (deprecated_selected_frame, &count1); if (count1 != 0 && count_exp == 0) { @@ -1707,7 +1664,7 @@ } select_frame (frame); - selected_frame_level_changed_event (frame_relative_level (selected_frame)); + selected_frame_level_changed_event (frame_relative_level (deprecated_selected_frame)); } /* ARGSUSED */ @@ -1721,8 +1678,8 @@ down_command (char *count_exp, int from_tty) { down_silently_base (count_exp); - show_and_print_stack_frame (selected_frame, - frame_relative_level (selected_frame), 1); + show_and_print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 1); } void @@ -1734,11 +1691,11 @@ struct frame_info *frame; struct value *return_value = NULL; - if (selected_frame == NULL) + if (deprecated_selected_frame == NULL) error ("No selected frame."); - thisfun = get_frame_function (selected_frame); - selected_frame_addr = get_frame_base (selected_frame); - selected_frame_pc = selected_frame->pc; + thisfun = get_frame_function (deprecated_selected_frame); + selected_frame_addr = get_frame_base (deprecated_selected_frame); + selected_frame_pc = deprecated_selected_frame->pc; /* Compute the return value (if any -- possibly getting errors here). */ @@ -1778,7 +1735,7 @@ } /* Do the real work. Pop until the specified frame is current. We - use this method because the selected_frame is not valid after + use this method because the deprecated_selected_frame is not valid after a POP_FRAME. The pc comparison makes this work even if the selected frame shares its fp with another frame. */ @@ -1867,7 +1824,7 @@ if (!found) printf_filtered ("'%s' not within current stack frame.\n", arg); - else if (fp != selected_frame) + else if (fp != deprecated_selected_frame) select_and_print_frame (fp); } @@ -1879,9 +1836,9 @@ register struct symtab *s; enum language flang; /* The language of the current frame */ - if (selected_frame) + if (deprecated_selected_frame) { - s = find_pc_symtab (selected_frame->pc); + s = find_pc_symtab (deprecated_selected_frame->pc); if (s) flang = s->language; else Index: thread.c =================================================================== RCS file: /cvs/src/src/gdb/thread.c,v retrieving revision 1.23 diff -u -r1.23 thread.c --- thread.c 2 Aug 2002 20:51:21 -0000 1.23 +++ thread.c 28 Nov 2002 20:02:18 -0000 @@ -422,12 +422,12 @@ struct thread_info *tp; ptid_t current_ptid; struct frame_info *cur_frame; - int saved_frame_level = frame_relative_level (selected_frame); + int saved_frame_level = frame_relative_level (deprecated_selected_frame); int counter; char *extra_info; /* Avoid coredumps which would happen if we tried to access a NULL - selected_frame. */ + deprecated_selected_frame. */ if (!target_has_stack) error ("No stack."); @@ -453,8 +453,8 @@ puts_filtered (" "); switch_to_thread (tp->ptid); - if (selected_frame) - print_only_stack_frame (selected_frame, -1, 0); + if (deprecated_selected_frame) + print_only_stack_frame (deprecated_selected_frame, -1, 0); else printf_filtered ("[No stack.]\n"); } @@ -468,12 +468,12 @@ * of the stack (leaf frame). */ counter = saved_frame_level; - cur_frame = find_relative_frame (selected_frame, &counter); + cur_frame = find_relative_frame (deprecated_selected_frame, &counter); if (counter != 0) { /* Ooops, can't restore, tell user where we are. */ warning ("Couldn't restore frame in current thread, at frame 0"); - print_stack_frame (selected_frame, -1, 0); + print_stack_frame (deprecated_selected_frame, -1, 0); } else { @@ -714,7 +714,8 @@ #endif ui_out_text (uiout, ")]"); - print_stack_frame (selected_frame, frame_relative_level (selected_frame), 1); + print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), 1); return GDB_RC_OK; } Index: tracepoint.c =================================================================== RCS file: /cvs/src/src/gdb/tracepoint.c,v retrieving revision 1.43 diff -u -r1.43 tracepoint.c --- tracepoint.c 24 Nov 2002 19:48:13 -0000 1.43 +++ tracepoint.c 28 Nov 2002 20:02:19 -0000 @@ -1954,7 +1954,8 @@ else source_only = 1; - print_stack_frame (selected_frame, frame_relative_level (selected_frame), + print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), source_only); do_displays (); } Index: valops.c =================================================================== RCS file: /cvs/src/src/gdb/valops.c,v retrieving revision 1.81 diff -u -r1.81 valops.c --- valops.c 24 Nov 2002 19:48:13 -0000 1.81 +++ valops.c 28 Nov 2002 20:02:20 -0000 @@ -649,7 +649,7 @@ /* Since modifying a register can trash the frame chain, we save the old frame and then restore the new frame afterwards. */ - get_frame_id (selected_frame, &old_frame); + get_frame_id (deprecated_selected_frame, &old_frame); /* Figure out which frame this is in currently. */ if (VALUE_LVAL (toval) == lval_register) @@ -3327,7 +3327,7 @@ int i; struct value * ret; - if (selected_frame == 0) + if (deprecated_selected_frame == 0) { if (complain) error ("no frame selected"); @@ -3335,7 +3335,7 @@ return 0; } - func = get_frame_function (selected_frame); + func = get_frame_function (deprecated_selected_frame); if (!func) { if (complain) @@ -3365,7 +3365,7 @@ return NULL; } - ret = read_var_value (sym, selected_frame); + ret = read_var_value (sym, deprecated_selected_frame); if (ret == 0 && complain) error ("`%s' argument unreadable", name); return ret; Index: varobj.c =================================================================== RCS file: /cvs/src/src/gdb/varobj.c,v retrieving revision 1.36 diff -u -r1.36 varobj.c --- varobj.c 24 Nov 2002 23:05:03 -0000 1.36 +++ varobj.c 28 Nov 2002 20:02:20 -0000 @@ -441,7 +441,7 @@ /* Allow creator to specify context of variable */ if ((type == USE_CURRENT_FRAME) || (type == USE_SELECTED_FRAME)) - fi = selected_frame; + fi = deprecated_selected_frame; else /* FIXME: cagney/2002-11-23: This code should be doing a lookup using the frame ID and not just the frame's @@ -488,7 +488,7 @@ if (fi != NULL) { get_frame_id (fi, &var->root->frame); - old_fi = selected_frame; + old_fi = deprecated_selected_frame; select_frame (fi); } @@ -898,7 +898,7 @@ /* Save the selected stack frame, since we will need to change it in order to evaluate expressions. */ - get_frame_id (selected_frame, &old_fid); + get_frame_id (deprecated_selected_frame, &old_fid); /* Update the root variable. value_of_root can return NULL if the variable is no longer around, i.e. we stepped out of Index: z8k-tdep.c =================================================================== RCS file: /cvs/src/src/gdb/z8k-tdep.c,v retrieving revision 1.13 diff -u -r1.13 z8k-tdep.c --- z8k-tdep.c 24 Nov 2002 19:48:13 -0000 1.13 +++ z8k-tdep.c 28 Nov 2002 20:02:21 -0000 @@ -327,8 +327,8 @@ { unsigned char l[4]; - frame_register_read (selected_frame, regno, l + 0); - frame_register_read (selected_frame, regno + 1, l + 2); + frame_register_read (deprecated_selected_frame, regno, l + 0); + frame_register_read (deprecated_selected_frame, regno + 1, l + 2); printf_unfiltered ("\t"); printf_unfiltered ("0x%02x%02x%02x%02x", l[0], l[1], l[2], l[3]); } @@ -337,10 +337,10 @@ { unsigned char l[8]; - frame_register_read (selected_frame, regno, l + 0); - frame_register_read (selected_frame, regno + 1, l + 2); - frame_register_read (selected_frame, regno + 2, l + 4); - frame_register_read (selected_frame, regno + 3, l + 6); + frame_register_read (deprecated_selected_frame, regno, l + 0); + frame_register_read (deprecated_selected_frame, regno + 1, l + 2); + frame_register_read (deprecated_selected_frame, regno + 2, l + 4); + frame_register_read (deprecated_selected_frame, regno + 3, l + 6); printf_unfiltered ("\t"); printf_unfiltered ("0x%02x%02x%02x%02x%02x%02x%02x%02x", @@ -351,7 +351,7 @@ unsigned short rval; int i; - frame_register_read (selected_frame, regno, (char *) (&rval)); + frame_register_read (deprecated_selected_frame, regno, (char *) (&rval)); printf_unfiltered ("\n"); for (i = 0; i < 10; i += 2) @@ -469,8 +469,8 @@ void z8k_do_registers_info (int regnum, int all) { - z8k_print_registers_info (current_gdbarch, gdb_stdout, selected_frame, - regnum, all); + z8k_print_registers_info (current_gdbarch, gdb_stdout, + deprecated_selected_frame, regnum, all); } void Index: cli/cli-cmds.c =================================================================== RCS file: /cvs/src/src/gdb/cli/cli-cmds.c,v retrieving revision 1.23 diff -u -r1.23 cli-cmds.c --- cli/cli-cmds.c 8 Nov 2002 03:21:33 -0000 1.23 +++ cli/cli-cmds.c 28 Nov 2002 20:02:28 -0000 @@ -844,10 +844,10 @@ name = NULL; if (!arg) { - if (!selected_frame) + if (!deprecated_selected_frame) error ("No frame selected.\n"); - pc = get_frame_pc (selected_frame); + pc = get_frame_pc (deprecated_selected_frame); if (find_pc_partial_function (pc, &name, &low, &high) == 0) error ("No function contains program counter for selected frame.\n"); #if defined(TUI) Index: mi/ChangeLog =================================================================== RCS file: /cvs/src/src/gdb/mi/ChangeLog,v retrieving revision 1.82 diff -u -r1.82 ChangeLog --- mi/ChangeLog 14 Nov 2002 00:25:05 -0000 1.82 +++ mi/ChangeLog 28 Nov 2002 20:02:30 -0000 @@ -1,3 +1,8 @@ +2002-11-28 Andrew Cagney + + * mi/mi-cmd-stack.c, mi/mi-main.c: Update to use + deprecated_selected_frame. + 2002-11-13 Andrew Cagney * mi-main.c (mi_cmd_data_write_register_values): Use Index: mi/mi-cmd-stack.c =================================================================== RCS file: /cvs/src/src/gdb/mi/mi-cmd-stack.c,v retrieving revision 1.12 diff -u -r1.12 mi-cmd-stack.c --- mi/mi-cmd-stack.c 23 Oct 2002 21:17:51 -0000 1.12 +++ mi/mi-cmd-stack.c 28 Nov 2002 20:02:32 -0000 @@ -142,7 +142,7 @@ if (argc != 1) error ("mi_cmd_stack_list_locals: Usage: PRINT_VALUES"); - list_args_or_locals (1, atoi (argv[0]), selected_frame); + list_args_or_locals (1, atoi (argv[0]), deprecated_selected_frame); return MI_CMD_DONE; } Index: mi/mi-main.c =================================================================== RCS file: /cvs/src/src/gdb/mi/mi-main.c,v retrieving revision 1.37 diff -u -r1.37 mi-main.c --- mi/mi-main.c 14 Nov 2002 00:25:05 -0000 1.37 +++ mi/mi-main.c 28 Nov 2002 20:02:32 -0000 @@ -183,8 +183,8 @@ /* Because we have called return_command with from_tty = 0, we need to print the frame here. */ - show_and_print_stack_frame (selected_frame, - frame_relative_level (selected_frame), + show_and_print_stack_frame (deprecated_selected_frame, + frame_relative_level (deprecated_selected_frame), LOC_AND_ADDRESS); return MI_CMD_DONE; @@ -397,7 +397,7 @@ { char *raw_buffer = alloca (MAX_REGISTER_RAW_SIZE); - if (! frame_register_read (selected_frame, regnum, raw_buffer)) + if (! frame_register_read (deprecated_selected_frame, regnum, raw_buffer)) return -1; if (memcmp (&old_regs[REGISTER_BYTE (regnum)], raw_buffer, @@ -518,7 +518,8 @@ if (format == 'N') format = 0; - get_saved_register (raw_buffer, &optim, (CORE_ADDR *) NULL, selected_frame, + get_saved_register (raw_buffer, &optim, (CORE_ADDR *) NULL, + deprecated_selected_frame, regnum, (enum lval_type *) NULL); if (optim) { Index: tui/ChangeLog =================================================================== RCS file: /cvs/src/src/gdb/tui/ChangeLog,v retrieving revision 1.102 diff -u -r1.102 ChangeLog --- tui/ChangeLog 24 Nov 2002 03:20:09 -0000 1.102 +++ tui/ChangeLog 28 Nov 2002 20:02:33 -0000 @@ -1,3 +1,9 @@ +2002-11-28 Andrew Cagney + + * tui/tui-hooks.c: Update to use deprecated_selected_frame. + * tui/tui.c, tui/tuiDisassem.c, tui/tuiRegs.c: Ditto. + * tui/tuiSource.c, tui/tuiSourceWin.c, tui/tuiWin.c: Ditto. + 2002-11-23 Andrew Cagney * tuiStack.c (tuiShowFrameInfo): Use get_frame_type instead of Index: tui/tui-hooks.c =================================================================== RCS file: /cvs/src/src/gdb/tui/tui-hooks.c,v retrieving revision 1.10 diff -u -r1.10 tui-hooks.c --- tui/tui-hooks.c 21 Nov 2002 21:25:22 -0000 1.10 +++ tui/tui-hooks.c 28 Nov 2002 20:02:33 -0000 @@ -147,7 +147,7 @@ { struct frame_info *fi; - fi = selected_frame; + fi = deprecated_selected_frame; if (fi && tui_refreshing_registers == 0) { tui_refreshing_registers = 1; @@ -163,7 +163,7 @@ { struct frame_info *fi; - fi = selected_frame; + fi = deprecated_selected_frame; if (fi && tui_refreshing_registers == 0) { tui_refreshing_registers = 1; @@ -245,7 +245,7 @@ { struct frame_info *fi; - fi = selected_frame; + fi = deprecated_selected_frame; /* Ensure that symbols for this frame are read in. Also, determine the source language of this frame, and switch to it if desired. */ if (fi) @@ -279,7 +279,7 @@ int stopline, int noerror) { select_source_symtab (s); - tuiShowFrameInfo (selected_frame); + tuiShowFrameInfo (deprecated_selected_frame); } /* Called when the target process died or is detached. Index: tui/tui.c =================================================================== RCS file: /cvs/src/src/gdb/tui/tui.c,v retrieving revision 1.27 diff -u -r1.27 tui.c --- tui/tui.c 30 Sep 2002 00:52:27 -0000 1.27 +++ tui/tui.c 28 Nov 2002 20:02:33 -0000 @@ -395,8 +395,8 @@ tui_version = 1; tui_active = 1; - if (selected_frame) - tuiShowFrameInfo (selected_frame); + if (deprecated_selected_frame) + tuiShowFrameInfo (deprecated_selected_frame); /* Restore TUI keymap. */ tui_set_key_mode (tui_current_key_mode); Index: tui/tuiDisassem.c =================================================================== RCS file: /cvs/src/src/gdb/tui/tuiDisassem.c,v retrieving revision 1.17 diff -u -r1.17 tuiDisassem.c --- tui/tuiDisassem.c 30 Sep 2002 00:52:27 -0000 1.17 +++ tui/tuiDisassem.c 28 Nov 2002 20:02:34 -0000 @@ -420,7 +420,7 @@ content = (TuiWinContent) disassemWin->generic.content; if (cursal.symtab == (struct symtab *) NULL) - s = find_pc_symtab (selected_frame->pc); + s = find_pc_symtab (deprecated_selected_frame->pc); else s = cursal.symtab; Index: tui/tuiRegs.c =================================================================== RCS file: /cvs/src/src/gdb/tui/tuiRegs.c,v retrieving revision 1.14 diff -u -r1.14 tuiRegs.c --- tui/tuiRegs.c 25 Aug 2002 09:12:36 -0000 1.14 +++ tui/tuiRegs.c 28 Nov 2002 20:02:34 -0000 @@ -638,7 +638,7 @@ stream = tui_sfileopen (bufLen); gdb_stdout = stream; cleanups = make_cleanup (tui_restore_gdbout, (void*) old_stdout); - gdbarch_print_registers_info (current_gdbarch, stream, selected_frame, + gdbarch_print_registers_info (current_gdbarch, stream, deprecated_selected_frame, regNum, 1); /* Save formatted output in the buffer. */ @@ -679,7 +679,7 @@ { return (_tuiSetRegsContent (0, NUM_GENERAL_REGS - 1, - selected_frame, + deprecated_selected_frame, TUI_GENERAL_REGS, refreshValuesOnly)); @@ -705,7 +705,7 @@ endRegNum = FP0_REGNUM - 1; ret = _tuiSetRegsContent (START_SPECIAL_REGS, endRegNum, - selected_frame, + deprecated_selected_frame, TUI_SPECIAL_REGS, refreshValuesOnly); @@ -725,7 +725,7 @@ endRegNum = FP0_REGNUM - 1; ret = _tuiSetRegsContent ( - 0, endRegNum, selected_frame, TUI_SPECIAL_REGS, refreshValuesOnly); + 0, endRegNum, deprecated_selected_frame, TUI_SPECIAL_REGS, refreshValuesOnly); return ret; } /* _tuiSetGeneralAndSpecialRegsContent */ @@ -743,7 +743,7 @@ startRegNum = FP0_REGNUM; ret = _tuiSetRegsContent (startRegNum, NUM_REGS - 1, - selected_frame, + deprecated_selected_frame, dpyType, refreshValuesOnly); Index: tui/tuiSource.c =================================================================== RCS file: /cvs/src/src/gdb/tui/tuiSource.c,v retrieving revision 1.13 diff -u -r1.13 tuiSource.c --- tui/tuiSource.c 30 Sep 2002 00:52:27 -0000 1.13 +++ tui/tuiSource.c 28 Nov 2002 20:02:34 -0000 @@ -340,7 +340,7 @@ struct symtab_and_line cursal = get_current_source_symtab_and_line (); if (cursal.symtab == (struct symtab *) NULL) - s = find_pc_symtab (selected_frame->pc); + s = find_pc_symtab (deprecated_selected_frame->pc); else s = cursal.symtab; Index: tui/tuiSourceWin.c =================================================================== RCS file: /cvs/src/src/gdb/tui/tuiSourceWin.c,v retrieving revision 1.22 diff -u -r1.22 tuiSourceWin.c --- tui/tuiSourceWin.c 30 Sep 2002 00:52:27 -0000 1.22 +++ tui/tuiSourceWin.c 28 Nov 2002 20:02:34 -0000 @@ -355,7 +355,7 @@ struct symtab_and_line cursal = get_current_source_symtab_and_line (); if (cursal.symtab == (struct symtab *) NULL) - s = find_pc_symtab (selected_frame->pc); + s = find_pc_symtab (deprecated_selected_frame->pc); else s = cursal.symtab; Index: tui/tuiWin.c =================================================================== RCS file: /cvs/src/src/gdb/tui/tuiWin.c,v retrieving revision 1.25 diff -u -r1.25 tuiWin.c --- tui/tuiWin.c 25 Oct 2002 19:46:04 -0000 1.25 +++ tui/tuiWin.c 28 Nov 2002 20:02:35 -0000 @@ -1397,13 +1397,13 @@ tuiUpdateSourceWindow (winInfo, cursal.symtab, lineOrAddr, TRUE); } - else if (selected_frame != (struct frame_info *) NULL) + else if (deprecated_selected_frame != (struct frame_info *) NULL) { TuiLineOrAddress line; struct symtab_and_line cursal = get_current_source_symtab_and_line (); - s = find_pc_symtab (selected_frame->pc); + s = find_pc_symtab (deprecated_selected_frame->pc); if (winInfo->generic.type == SRC_WIN) line.lineNo = cursal.line; else --------------070001000302070207020102--