From mboxrd@z Thu Jan 1 00:00:00 1970 Return-Path: Received: (qmail 3306 invoked by alias); 7 May 2004 21:28:19 -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 3299 invoked from network); 7 May 2004 21:28:19 -0000 Received: from unknown (HELO mx1.redhat.com) (66.187.233.31) by sourceware.org with SMTP; 7 May 2004 21:28:19 -0000 Received: from int-mx2.corp.redhat.com (int-mx2.corp.redhat.com [172.16.27.26]) by mx1.redhat.com (8.12.10/8.12.10) with ESMTP id i47LSI0m018005 for ; Fri, 7 May 2004 17:28:18 -0400 Received: from potter.sfbay.redhat.com (potter.sfbay.redhat.com [172.16.27.15]) by int-mx2.corp.redhat.com (8.11.6/8.11.6) with ESMTP id i47LSHw32590 for ; Fri, 7 May 2004 17:28:17 -0400 Received: from redhat.com (dhcp-172-16-25-160.sfbay.redhat.com [172.16.25.160]) by potter.sfbay.redhat.com (8.11.6/8.11.6) with ESMTP id i47LSHC24222 for ; Fri, 7 May 2004 14:28:17 -0700 Message-ID: <409BFF70.8020304@redhat.com> Date: Fri, 07 May 2004 21:28:00 -0000 From: Michael Snyder Organization: Red Hat, Inc. User-Agent: Mozilla/5.0 (X11; U; Linux i686; es-ES; rv:1.4.2) Gecko/20040301 MIME-Version: 1.0 To: gdb-patches@sources.redhat.com Subject: [PATCH] update "info scope" with new symtypes Content-Type: multipart/mixed; boundary="------------020303050509040804060204" X-RedHat-Spam-Score: 0.261 X-SW-Source: 2004-05/txt/msg00220.txt.bz2 This is a multi-part message in MIME format. --------------020303050509040804060204 Content-Type: text/plain; charset=us-ascii; format=flowed Content-Transfer-Encoding: 7bit Content-length: 38 Add LOC_COMPUTED etc. to scope_info. --------------020303050509040804060204 Content-Type: text/plain; name="aaa" Content-Transfer-Encoding: 7bit Content-Disposition: inline; filename="aaa" Content-length: 4427 2004-05-07 Michael Snyder * tracepoint.c (scope_info): Add handling for LOC_COMPUTED, LOC_COMPUTED_ARG, and LOC_INDIRECT. Index: tracepoint.c =================================================================== RCS file: /cvs/src/src/gdb/tracepoint.c,v retrieving revision 1.59 diff -p -r1.59 tracepoint.c *** tracepoint.c 28 Apr 2004 16:36:25 -0000 1.59 --- tracepoint.c 7 May 2004 21:26:22 -0000 *************** scope_info (char *args, int from_tty) *** 2345,2351 **** sals = decode_line_1 (&args, 1, NULL, 0, &canonical, NULL); if (sals.nelts == 0) ! return; /* presumably decode_line_1 has already warned */ /* Resolve line numbers to PC */ resolve_sal_pc (&sals.sals[0]); --- 2345,2351 ---- sals = decode_line_1 (&args, 1, NULL, 0, &canonical, NULL); if (sals.nelts == 0) ! return; /* presumably decode_line_1 has already warned */ /* Resolve line numbers to PC */ resolve_sal_pc (&sals.sals[0]); *************** scope_info (char *args, int from_tty) *** 2387,2393 **** break; case LOC_STATIC: printf_filtered ("in static storage at address "); ! print_address_numeric (SYMBOL_VALUE_ADDRESS (sym), 1, gdb_stdout); break; case LOC_REGISTER: printf_filtered ("a local variable in register $%s", --- 2387,2394 ---- break; case LOC_STATIC: printf_filtered ("in static storage at address "); ! print_address_numeric (SYMBOL_VALUE_ADDRESS (sym), ! 1, gdb_stdout); break; case LOC_REGISTER: printf_filtered ("a local variable in register $%s", *************** scope_info (char *args, int from_tty) *** 2419,2430 **** continue; case LOC_LABEL: printf_filtered ("a label at address "); ! print_address_numeric (SYMBOL_VALUE_ADDRESS (sym), 1, gdb_stdout); break; case LOC_BLOCK: printf_filtered ("a function at address "); ! print_address_numeric (BLOCK_START (SYMBOL_BLOCK_VALUE (sym)), 1, ! gdb_stdout); break; case LOC_BASEREG: printf_filtered ("a variable at offset %ld from register $%s", --- 2420,2432 ---- continue; case LOC_LABEL: printf_filtered ("a label at address "); ! print_address_numeric (SYMBOL_VALUE_ADDRESS (sym), ! 1, gdb_stdout); break; case LOC_BLOCK: printf_filtered ("a function at address "); ! print_address_numeric (BLOCK_START (SYMBOL_BLOCK_VALUE (sym)), ! 1, gdb_stdout); break; case LOC_BASEREG: printf_filtered ("a variable at offset %ld from register $%s", *************** scope_info (char *args, int from_tty) *** 2437,2443 **** REGISTER_NAME (SYMBOL_BASEREG (sym))); break; case LOC_UNRESOLVED: ! msym = lookup_minimal_symbol (DEPRECATED_SYMBOL_NAME (sym), NULL, NULL); if (msym == NULL) printf_filtered ("Unresolved Static"); else --- 2439,2446 ---- REGISTER_NAME (SYMBOL_BASEREG (sym))); break; case LOC_UNRESOLVED: ! msym = lookup_minimal_symbol (DEPRECATED_SYMBOL_NAME (sym), ! NULL, NULL); if (msym == NULL) printf_filtered ("Unresolved Static"); else *************** scope_info (char *args, int from_tty) *** 2450,2459 **** case LOC_OPTIMIZED_OUT: printf_filtered ("optimized out.\n"); continue; } if (SYMBOL_TYPE (sym)) printf_filtered (", length %d.\n", ! TYPE_LENGTH (check_typedef (SYMBOL_TYPE (sym)))); } if (BLOCK_FUNCTION (block)) break; --- 2453,2474 ---- case LOC_OPTIMIZED_OUT: printf_filtered ("optimized out.\n"); continue; + case LOC_HP_THREAD_LOCAL_STATIC: + printf_filtered ("HP thread local static "); + break; + case LOC_INDIRECT: + printf_filtered ("extern (local indirect) at address "); + print_address_numeric (SYMBOL_VALUE_ADDRESS (sym), + 1, gdb_stdout); + break; + case LOC_COMPUTED: + case LOC_COMPUTED_ARG: + SYMBOL_OPS (sym)->describe_location (sym, gdb_stdout); + break; } if (SYMBOL_TYPE (sym)) printf_filtered (", length %d.\n", ! TYPE_LENGTH (check_typedef (SYMBOL_TYPE (sym)))); } if (BLOCK_FUNCTION (block)) break; --------------020303050509040804060204--