--- a/Lib/IMPL/Object/AutoDispose.pm	Wed Jan 30 03:30:28 2013 +0400
+++ b/Lib/IMPL/Object/AutoDispose.pm	Thu Jan 31 02:18:31 2013 +0400
@@ -1,12 +1,6 @@
 package IMPL::Object::AutoDispose;
 use strict;
 
-use IMPL::declare {
-    base => [
-        'IMPL::Object::Abstract' => undef
-    ]
-};
-
 sub new {
     my $self = shift;
         
@@ -26,18 +20,10 @@
     ${shift(@_)}->can(@_);
 }
 
-sub DTOR {
+sub DESTROY {
     ${shift(@_)}->Dispose();
 }
 
-sub typeof {
-    ${shift(@_)}->typeof(@_);
-}
-
-sub toString {
-    ${shift(@_)}->toString(@_);
-}
-
 sub AUTOLOAD {
     our $AUTOLOAD;
     my ($method) = ($AUTOLOAD =~ m/(\w+)$/);