if (ref ($p1)) { return 0 unless $p1->equals ($p2, $cmp); }