Permalink
Browse files

adde tests for RT #84594

  • Loading branch information...
1 parent e49ad1b commit 57bc8e443f3d0cb58f5bcdc2b056fd7b27275f95 Jimmy Zhuo committed Feb 27, 2011
Showing with 8 additions and 6 deletions.
  1. +8 −6 S03-operators/identity.t
View
@@ -2,20 +2,22 @@ use v6;
use Test;
-plan 43;
+plan 45;
=begin pod
C<=:=> is only for containers, not values
ok(1 =:= 1, "int");
-ok(!(2 =:= 1), "int (neg)");
+nok(2 =:= 1, "int (neg)");
ok("foo" =:= "foo", "str");
-ok(!("foo" =:= "foe"), "str (neg)");
+nok("foo" =:= "foe", "str (neg)");
+isa_ok 1 =:=1, Bool, '=:= returns Bool';
+isa_ok 2 =:=1, Bool, '=:= returns Bool';
-ok(("7" == 7), "sanity");
-ok(("7" eq 7), "sanity");
-ok(!("7" =:= 7), "identify checks type mismatch");
+ok("7" == 7, "sanity");
+ok("7" eq 7, "sanity");
+nok("7" =:= 7, "identify checks type mismatch");
=end pod

0 comments on commit 57bc8e4

Please sign in to comment.