[PATCH] update "info scope" with new symtypes

Andrew Cagney cagney@gnu.org
Fri May 7 22:55:00 GMT 2004


> Add LOC_COMPUTED etc. to scope_info.

Michael, most of this patch is white space changes and as such should 
separated out and committed separatly.

Andrew

> 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;
>   	    }
>   	  if (SYMBOL_TYPE (sym))
>   	    printf_filtered (", length %d.\n",
> ! 			     TYPE_LENGTH (check_typedef (SYMBOL_TYPE (sym))));
>   	}
>         if (BLOCK_FUNCTION (block))
>   	break;



More information about the Gdb-patches mailing list