in reply to Re^2: Constructor in derived class
in thread Constructor in derived class
This is the line:ClearCase-Argv> perl -Iblib/lib -Iblib/arch -e 'use ClearCase::Argv;su +b p{$a=shift;print"--${a}--\n";system(qw(pgrep cleartool))}sub v{$c=s +hift;$c->argv(q(pwv))->system}ClearCase::Argv->ipc(1);p(1);$c1=ClearC +ase::Argv->new;p(2);$c2=ClearCase::Argv->new;v($c1);p(3);$c1->clone-> +argv(q(pwv));p(4);v($c1);p(5);v($c1);' --1-- 22003 --2-- 22003 Working directory view: emagiro Set view: emagiro --3-- 22003 Attempt to bless into a reference at blib/lib/ClearCase/Argv.pm line 6 +37, <GEN1> line 3.
I assume it is wrong to bless the reference I got in the case this was used as a copy constructor.bless $self, $proto;
This makes my test happy...bless $self, ref($proto) ? ref($proto) : $proto;
Marc
|
|---|