NAME

SPVM::EqualityChecker::SameObject - a equality checker to check the equality of adresses of two object.

SYNOPSYS

            

              
              
use SPVM::EqualityChecker::SameObject;
my $equality_checker : SPVM::EqualityChecker = SPVM::EqualityChecker::SameObject->new;
my $point1 = SPVM::Point->new(1, 2);
my $point2 = SPVM::Point->new(5, 6);
my $is_equal = $equality_checker->($point1, $point2);
            
          

DESCRIPTION

SPVM::EqualityChecker::SameObject is a equality checker to check the equality of adresses of two object.

STATIC METHODS

new

            

              
              
sub new : SPVM::EqualityChecker::SameObject ()
            
          

Create a new SPVM::EqualityChecker::SameObject object.

INSTANCE METHODS

ANON

            

              
              
sub : int ($self : self, $obj1 : object, $obj2 : object)
            
          

This method receive tow objects and return 1 if the address of the two object equals, return 0 if not.