The London Perl and Raku Workshop takes place on 26th Oct 2024. If your company depends on Perl, please consider sponsoring and/or attending.

Name

SPVM::EqualityChecker - Interface Type for Object Equality Checking Callback

Usage

use EqualityChecker;
use Point;

my $equality_checker = (EqualityChecker)method : int ($object1 : object, $object2 : object) {
  my $point1 = (Point)$object1;
  my $point2 = (Point)$object2;
  
  if ($point1->x == $point2->x && $point1->y == $point2->y) {
    return 1;
  }
  else {
    return 0;
  }
};

my $point1 = Point->new(1, 2);
my $point2 = Point->new(5, 6);

my $is_equal = $equality_checker->($point1, $point2);

Description

EqualityChecker is the interface type for the object equality checking callback.

Interface Methods

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

The implementation must receive two objects and if they are equal, return 1. Otherwise, return 0.

Copyright & License

Copyright (c) 2023 Yuki Kimoto

MIT License