set multiple-symbol ask/cancel not working (was: "Re: GDB 7.4 branching status? (2011-11-23)")

[Joel Brobecker <brobecker at adacore dot com>]

Hi Tom,

It looks like "set multiple-symbols ask/cancel" regressed again :-(.

    (gdb) set multiple-symbols ask
    (gdb) b normal_menu
    Breakpoint 1 at 0x402130: normal_menu. (2 locations)
    (gdb) set multiple-symbols cancel
    (gdb) b normal_menu
    Note: breakpoint 1 also set at pc 0x402130.
    Note: breakpoint 1 also set at pc 0x40213b.
    Breakpoint 2 at 0x402130: normal_menu. (2 locations)

Here is a reproducer:

        package Pck is
           procedure Normal_Menu;
           procedure Normal_Menu (I : Integer);
        end Pck;
        package body Pck is
           procedure Normal_Menu is
           begin
              null;
           end Normal_Menu;
           procedure Normal_Menu (I : Integer) is
           begin
              null;
           end Normal_Menu;
        end Pck;
        with Pck; use Pck;
        procedure Foo is
        begin
           Normal_Menu;
           Normal_Menu (1);
        end Foo;

(put the code above in a file called sources.ada, and then call
"gnatchop sources.ada", and it should create pck.ads, pck.adb and
foo.adb for you).

To produce the executable:

    % gnatmake -g foo

I'll probably work on that last, because you might know where the
problem is without even looking, since you've already fixed it before.

-- 
Joel