This is the mail archive of the
insight@sources.redhat.com
mailing list for the Insight project.
Re: [RFA] Register values "0x 12 34 56 78 12 34 56 78"
- To: Keith Seitz <keiths at redhat dot com>
- Subject: Re: [RFA] Register values "0x 12 34 56 78 12 34 56 78"
- From: Syd Polk <spolk at redhat dot com>
- Date: Tue, 27 Feb 2001 13:55:15 -0800
- CC: insight at sources dot redhat dot com
- References: <Pine.SOL.3.91.1010227103132.18111R-200000@ryobi.cygnus.com>
Approved
Keith Seitz wrote:
>
> Hi,
>
> This fixes a register value output bug on possibly several platforms. It
> certainly fixes x86...
>
> 2001-02-27 Keith Seitz <kseitz@nwlink.com>
>
> * generic/gdbtk-cmds.c (gdb_fetch_registers): Only
> mark the result as generating a list if it really does
> generate a list.
>
> Keith
>
> ------------------------------------------------------------------------
> Index: gdbtk/generic/gdbtk-cmds.c
> ===================================================================
> RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-cmds.c,v
> retrieving revision 1.21
> diff -p -p -r1.21 gdbtk-cmds.c
> *** gdbtk/generic/gdbtk-cmds.c 2001/02/14 19:05:58 1.21
> --- gdbtk/generic/gdbtk-cmds.c 2001/02/27 18:40:56
> *************** gdb_fetch_registers (clientData, interp,
> *** 1955,1964 ****
> format = *(Tcl_GetStringFromObj (objv[0], NULL));
> objv++;
>
> !
> ! result_ptr->flags |= GDBTK_MAKES_LIST; /* Output the results as a list */
> result = map_arg_registers (objc, objv, get_register, (void *) format);
> ! result_ptr->flags &= ~GDBTK_MAKES_LIST;
>
> return result;
> }
> --- 1955,1965 ----
> format = *(Tcl_GetStringFromObj (objv[0], NULL));
> objv++;
>
> ! if (objc != 1)
> ! result_ptr->flags |= GDBTK_MAKES_LIST; /* Output the results as a list */
> result = map_arg_registers (objc, objv, get_register, (void *) format);
> ! if (objc != 1)
> ! result_ptr->flags &= ~GDBTK_MAKES_LIST;
>
> return result;
> }