[perl #45971] [TODO] Get printable name for real_exception() in fail_if_exist()

[via RT]

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


 In src/objects.c there is the todo item within fail_if_exist():
         /* TODO get printable name */
         real_exception(interp, NULL, INVALID_OPERATION,
                 "Class %Ss already registered!\n",
                 VTABLE_get_string(interp,
name));