NAME
SPVM::EqualityChecker::SameObject - a equality checker to check the equality of adresses of two object.
SYNOPSYS
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.