X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2Fop%2Fcrypt.t;h=27c878f1bd5d3a01f512ba3df917201cc621aefa;hb=235bddc8d16c512a7d89f327f65cee68b1f5848c;hp=d11a2a08b7ca5598f02d6bae960e4925ed9f2d58;hpb=fc87b71cde2dcc7c5c2201d512e38000eb8087ab;p=p5sagit%2Fp5-mst-13.2.git diff --git a/t/op/crypt.t b/t/op/crypt.t index d11a2a0..27c878f 100644 --- a/t/op/crypt.t +++ b/t/op/crypt.t @@ -28,7 +28,10 @@ BEGIN { # bets, given alternative encryption/hashing schemes like MD5, # C2 (or higher) security schemes, and non-UNIX platforms. -ok(substr(crypt("ab", "cd"), 2) ne substr(crypt("ab", "ce"), 2), "salt makes a difference"); +SKIP: { + skip ("VOS crypt ignores salt.", 1) if ($^O eq 'vos'); + ok(substr(crypt("ab", "cd"), 2) ne substr(crypt("ab", "ce"), 2), "salt makes a difference"); +} $a = "a\xFF\x{100}";