The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
SPVM-0.9618
River stage two • 23 direct dependents • 26 total dependents
31 ++
/ SPVM::EqualityChecker::SameObject

Name

SPVM::EqualityChecker::SameObject - a callback implementation of EqualityChecker to check if the memory addresses of the two objects are equal.

Synopsys

  use EqualityChecker::SameObject;
  
  my $equality_checker = EqualityChecker::SameObject->new;
  
  my $point1 = Point->new(1, 2);
  my $point2 = $point1;
  my $point3 = Point->new(1, 2);
  
  # Equals
  my $is_equal = $equality_checker->($point1, $point2);
  
  # Not equals
  my $is_equal = $equality_checker->($point1, $point3);

Description

EqualityChecker::SameObject is a callback implementation of EqualityChecker to check if the memory addresses of the two objects are equal.

Class Methods

new

  static method new : EqualityChecker::SameObject ()

Create a new EqualityChecker::SameObject object.

Interface Method IMPLEMENTATION

  method : int ($object1 : object, $object2 : object)

If the address of the two objects are equal, return 1, otherwise return 0.