Mercurial > pub > Impl

comparison Lib/IMPL/Object/Disposable.pm @ 33:0004faa276dc

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
small fixes, some new tests
author Sergey
date Mon, 09 Nov 2009 16:49:39 +0300
parents 03e58a454b20
children 16ada169ca75
comparison
equal deleted inserted replaced
32:56cef8e3cda6 33:0004faa276dc
29 our $AUTOLOAD; 29 our $AUTOLOAD;
30 sub AUTOLOAD { 30 sub AUTOLOAD {
31 return if $AUTOLOAD eq __PACKAGE__.'::DESTROY'; 31 return if $AUTOLOAD eq __PACKAGE__.'::DESTROY';
32 die new IMPL::Exception('Object have been disposed',$AUTOLOAD); 32 die new IMPL::Exception('Object have been disposed',$AUTOLOAD);
33 } 33 }
34
35 sub isDisposed {
36 1;
37 }
38
34 1; 39 1;