Mercurial > pub > Impl

comparison Lib/IMPL/Object/Abstract.pm @ 164:eb3e9861a761

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
SQL traits in progress
author wizard
date Mon, 28 Mar 2011 01:36:24 +0400
parents b56ebc31bf18
children 4267a2ac3d46
comparison
equal deleted inserted replaced
163:6ce1f052b90a 164:eb3e9861a761
57 sub callCTOR { 57 sub callCTOR {
58 my $self = shift; 58 my $self = shift;
59 my $class = ref $self; 59 my $class = ref $self;
60 60
61 $self->$_(@_) foreach @{$cacheCTOR{$class} || cache_ctor($class)}; 61 $self->$_(@_) foreach @{$cacheCTOR{$class} || cache_ctor($class)};
62 }
63
64 sub superCTOR {
65 my $this = shift;
66
67 warn "The mehod is deprecated, at " . caller;
68 } 62 }
69 63
70 sub toString { 64 sub toString {
71 my $self = shift; 65 my $self = shift;
72 66