[perl #46145] [TODO] Perform bounds checking in GDB_B()

[via RT]

# New Ticket Created by  Paul Cochrane 
# Please include the string:  [perl #46145]
# in the subject line of all future correspondence about this issue. 
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=46145 >


In src/debug.c:GDB_B() there is the todo item:

/* HACK alarm  pb 45 is passed as the integer not a string */
/* TODO check if in bounds */
pc = interp->code->base.data + (unsigned long)s;