This is an automatically generated mail to inform you that tests are now
available in t/spec/S03-operators/bit.t
commit 8579d5842f0fa3907dc40cf7f9747019fdf4670c
Author: kyle <k...@c213334d-75ef-0310-aa23-eaa082d1ae64>
Date: Fri Jul 24 20:19:49 2009 +0000
[t/spec] Test for RT #67852
git-svn-id: http://svn.pugscode.org/p...@27716
c213334d-75ef-0310-aa23-eaa082d1ae64
diff --git a/t/spec/S03-operators/bit.t b/t/spec/S03-operators/bit.t
index 514d215..56500dc 100644
--- a/t/spec/S03-operators/bit.t
+++ b/t/spec/S03-operators/bit.t
@@ -4,7 +4,7 @@ use Test;
# Mostly copied from Perl 5.8.4 s t/op/bop.t
-plan 22;
+plan 24;
# test the bit operators '&', '|', '^', '+<', and '+>'
@@ -98,5 +98,9 @@ plan 22;
#if ("ok \xFF\x{FF}\n" ~& "ok 41\n" eq "ok 41\n") { say "ok 19" } else { say
"not ok 19" }
#if ("ok \x{FF}\xFF\n" ~& "ok 42\n" eq "ok 42\n") { say "ok 20" } else { say
"not ok 20" }
-
-
+# RT #67852
+{
+ lives_ok { 'normal'.trans() }, 'can .trans() on normal string';
+ #?rakudo todo 'RT #67852'
+ lives_ok { ('bit' ~& 'wise').trans() }, 'can .trans() on bitwise result';
+}
