Test nqp::objectid.

Author: pmurias

t/nqp/92-where.t

@@ -1,7 +1,10 @@
-plan(2);
+plan(4);
 class Foo {
 }
 my $a := Foo.new;
 my $b := Foo.new;
 ok(nqp::where($a) == nqp::where($a), 'nqp::where returns the same value for the same object');
 ok(nqp::where($a) != nqp::where($b), 'nqp::where returns different values for different objects');
+
+ok(nqp::objectid($a) == nqp::objectid($a), 'nqp::objectid returns the same value for the same object');
+ok(nqp::objectid($a) != nqp::objectid($b), 'nqp::objectid returns different values for different objects');