# New Ticket Created by Will Coleda
# Please include the string: [perl #46731]
# in the subject line of all future correspondence about this issue.
# <URL: http://rt.perl.org/rt3/Ticket/Display.html?id=46731 >
$ cat foo.pir
.sub test :main
$P1 = get_class 'String'
$P2 = subclass $P1, 'Goofy'
$P3 = new 'Goofy'
$P4 = new Super, $P3
$P4.'set_string_native'('urk')
.end
$ ./parrot foo.pir
Method 'set_string_native' not found
current instr.: 'test' pc 20 (foo.pir:8)
We wanted to do this in Tcl to simplify TclConst, but were unable to.
Presumably it's just that it's a vtable we're trying to super, not a
method...
--
Will "Coke" Coleda
[EMAIL PROTECTED]