search

nayakgi / perl-compiler

Automatically exported from code.google.com/p/perl-compiler
Other
0 stars 0 forks source link

mro cannot call next::can on an undefined package #325

Closed GoogleCodeExporter closed 9 years ago

GoogleCodeExporter commented 9 years ago 
What steps will reproduce the problem?

> perlcc -r -e '{ package Qux; use mro; sub foo { No::Such::Class->next::can } 
} eval { Qux->foo() }; print "ok\n" if !$@;'

What is the expected output? 

> perl -e '{ package Qux; use mro; sub foo { No::Such::Class->next::can } } 
eval { Qux->foo() }; print "ok\n" if !$@;'
ok

Original issue reported on code.google.com by nicolas....@gmail.com on 9 May 2014 at 2:54

GoogleCodeExporter commented 9 years ago 
Already fixed with #324

$ pcc -e'{ package Qux; use mro; sub foo { No::Such::Class->next::can } } eval 
{ Qux->foo() }; print "ok\n" if !$@;'
ok

$ pcc --version
perlcc 2.17, B-C-1.45_10-2485-g7afd39c built for /usr/local/bin/perl5.14.4-nt 
x86_64-linux

Original comment by reini.urban on 9 May 2014 at 3:17