[t/spec] Add !eq tests to S03-operators/equality.t

git-svn-id: http://svn.pugscode.org/pugs@30118 c213334d-75ef-0310-aa23-eaa082d1ae64
Raku · Mar 17, 2010 · c5f4109 · c5f4109
1 parent d052ec4
commit c5f4109
Showing 1 changed file with 4 additions and 0 deletions.
diff --git a/S03-operators/equality.t b/S03-operators/equality.t
@@ -39,8 +39,12 @@ ok(2 == 2,         "== true");
 ok(!(2 == 3),      "== false");
 ok(2 != 3,         "!= true");
 ok(!(2 != 2),      "!= false");
+
+#L<S03/Negated relational operators>
 ok(2 !== 3,         "!== true");
 ok(!(2 !== 2),      "!== false");
+ok($foo !eq "f",    "!eq true");
+ok(!($foo !eq ""),  "!eq false");
 
 # numeric context on undefined values
 #?rakudo skip "+Any doesn't work yet"